external dJointGroupCreate : unit -> dJointGroupID = "ocamlode_dJointGroupCreate"