external dJointGetHinge2Angle1 : dJointID -> float = "ocamlode_dJointGetHinge2Angle1"