external dGeomGetQuaternion : 'a dGeomID -> dQuaternion = "ocamlode_dGeomGetQuaternion"