external dJointSetPRParam : dJointID -> parameter:int -> value:float -> unit = "ocamlode_dJointSetPRParam"