     (set! (. (. camera position) y) y-val)
     (.update camera)))
 
-(defn y
-  "Returns the y position of the camera in `screen`."
+(defn z
+  "Returns the z position of the camera in `screen`."
   [screen]
   (let [^Camera camera (u/get-obj screen :camera)]
-    (. (. camera position) y)))
+    (. (. camera position) z)))
 
 (defn z!
   "Sets only the z position of the camera in `screen`."

    (.lookAt camera x y z)
    (.update camera)))

(defn direction
  "Returns the direction of the camera in `screen`."
  [screen]
  (let [^Camera camera (u/get-obj screen :camera)]
    (. camera direction)))

(defn near!
  "Sets the near clipping plane distance of the camera in `screen`."

    (set! (. (. camera position) x) x-val)
    (.update camera)))

(defn y
  "Returns the y position of the camera in `screen`."
  [screen]
  (let [^Camera camera (u/get-obj screen :camera)]
    (. (. camera position) y)))

(defn y!
  "Sets only the y position of the camera in `screen`."
