external dCreateSphere : dSpaceID option -> radius:float -> sphere_geom dGeomID = "ocamlode_dCreateSphere"