external dBodySetQuaternion : dBodyID -> dQuaternion -> unit = "ocamlode_dBodySetQuaternion"