   (body-position! entity (body-x entity) y (body-angle entity)))
 
 (defn body-angle!
-  "Changes the `angle` of the body in `entity`."
+  "Changes the `angle` (degrees) of the body in `entity`."
   [entity angle]
   (body-position! entity (body-x entity) (body-y entity) angle))
 

             (assoc e
                    :x (body-x e)
                    :y (body-y e)
                    :angle (body-angle e))
             e))
         entities)))


(defn ^:private body-angle
  [entity]
  (* (body! entity :get-angle) MathUtils/radiansToDegrees))

(defn ^:private body-origin-x
  [entity]
  (. ^Vector2 (body! entity :get-local-center) x))

(defn ^:private body-origin-y
  [entity]
  (. ^Vector2 (body! entity :get-local-center) y))

(defn body-position!
  "Changes the position of the body in `entity`. The angle is in degrees."
  [entity x y angle]
  (body! entity :set-transform x y (* angle MathUtils/degreesToRadians)))

(defn body-x!
  "Changes the `x` of the body in `entity`."
