external dGeomGetData : 'a dGeomID -> int = "ocamlode_dGeomGetData"