external dRGetIdentity : unit -> dMatrix3 = "ocamlode_dRSetIdentity"