external dJointGetLMotorParam : dJointID -> dJointParam -> float = "ocamlode_dJointGetLMotorParam"