external dBodySetData : dBodyID -> int -> unit = "ocamlode_dBodySetData"