external dCreateBox : dSpaceID option -> lx:float -> ly:float -> lz:float -> box_geom dGeomID = "ocamlode_dCreateBox"