XorShiftと呼ばれる疑似乱数のうち状態ベクトルが64ビットである例を一つとり、これが最長の周期2^64-1を達することを確認する。 \\ determine that order of g equals to n isprimitive(g, n, e=1) = { my(factors, p); if (g^n != e, return(0)); factors …