external dJointAddHingeTorque : dJointID -> torque:float -> unit = "ocamlode_dJointAddHingeTorque"