external dCreateCapsule : dSpaceID option -> radius:float -> length:float -> capsule_geom dGeomID = "ocamlode_dCreateCapsule"