external dJointSetSliderParam : dJointID -> dJointParam -> float -> unit = "ocamlode_dJointSetSliderParam"