external dJointSetAMotorAngle : dJointID -> anum:int -> angle:float -> unit = "ocamlode_dJointSetAMotorAngle"