     (.lookAt camera x y z)
     (.update camera)))
 
-(defn direction
-  "Returns the direction of the camera in `screen`."
+(defn near
+  "Returns the near clipping plane distance of the camera in `screen`."
   [screen]
   (let [^Camera camera (u/get-obj screen :camera)]
-    (. camera direction)))
+    (. camera near)))
 
 (defn near!
   "Sets the near clipping plane distance of the camera in `screen`."

    (set! (. (. camera position) y) y-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 z!
  "Sets only the z position of the camera in `screen`."

  [screen new-width]
  (size! screen new-width (* new-width (/ (game :height) (game :width)))))

(defn height
  "Returns the height of the camera in `screen`.

    (height screen)"
  [screen]
  (let [^Camera camera (u/get-obj screen :camera)]
    (. camera viewportHeight)))

(defn height!
  "Sets the height of the camera in `screen`, adjusting the width so the ratio
