   (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))
 


(defn ^:private body-angle
  [entity]
  (.getRotation ^Transform (body! entity :get-transform)))

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

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

  (:require [play-clj.core :as c]
            [play-clj.math :as m]
            [play-clj.utils :as u])
  (:import [com.badlogic.gdx.math MathUtils Vector2]
           [com.badlogic.gdx.physics.box2d Body BodyDef ChainShape CircleShape
            Contact ContactListener EdgeShape Fixture FixtureDef Joint JointDef
            PolygonShape Transform]))
