external dBodyCreate : dWorldID -> dBodyID = "ocamlode_dBodyCreate"