external dJointCreateSlider : dWorldID -> dJointGroupID option -> dJointID = "ocamlode_dJointCreateSlider"