external dGeomSphereGetRadius : sphere_geom dGeomID -> float = "ocamlode_dGeomSphereGetRadius"