external dJointGetUniversalParam : dJointID -> dJointParam -> float = "ocamlode_dJointGetUniversalParam"