OFFSET
1,2
COMMENTS
Periodic with period 2^32.
Also used by Borland Delphi and Virtual Pascal.
LINKS
FORMULA
a(n) = (134775813 * a(n-1) + 1) mod 2^32.
MAPLE
a:= proc(n) option remember; `if`(n=1, 1,
irem(134775813*a(n-1)+1, 2^32))
end:
seq(a(n), n=1..23); # Alois P. Heinz, May 30 2025
MATHEMATICA
NestList[Mod[134775813*# + 1, 2^32] &, 1, 50] (* Paolo Xausa, Jun 04 2025 *)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Sean A. Irvine, May 30 2025
STATUS
approved
