external dGeomDisable : 'a dGeomID -> unit = "ocamlode_dGeomDisable"