external dJointSetAMotorParam : dJointID -> dJointParam -> float -> unit = "ocamlode_dJointSetAMotorParam"