external dGeomSetData : 'a dGeomID -> int -> unit = "ocamlode_dGeomSetData"