external dJointCreateBall : dWorldID -> dJointGroupID option -> dJointID = "ocamlode_dJointCreateBall"