external dBodySetPosition : dBodyID -> x:float -> y:float -> z:float -> unit = "ocamlode_dBodySetPosition"