external dConnectingJoint : dBodyID -> dBodyID -> dJointID = "ocamlode_dConnectingJoint"