external dInfiniteAABB : 'a dGeomID -> float array = "ocamlode_dInfiniteAABB"