external dBodyGetForce : dBodyID -> dVector3 = "ocamlode_dBodyGetForce"