external dMassSetCylinder : dMass -> density:float -> direction:direction -> radius:float -> length:float -> unit = "ocamlode_dMassSetCylinder"