A096556 Consecutive internal states of the linear congruential pseudo-random number generator used in the Watcom FORTRAN Function URAND when started with SEED=0.

0, 453816693, 2013878382, 1461722811, 653338732, 1830525137, 1741773690, 526418231, 109789464, 1577774445, 1454795974, 1716389619, 180917764, 1381854025, 70154322, 301698031, 2068689712, 1594166885, 1923590686, 579939371, 2056610972, 914297537, 1800695338, 1283998631

Offset: 1

Author

Hugo Pfoertner, Jul 20 2004

Keywords

• nonn

Links

• Alois P. Heinz, Table of n, a(n) for n = 1..10000
• Open Watcom, Sybase Watcom C/C++ and FORTRAN compiler.
• Index entries for sequences related to pseudo-random numbers.

Crossrefs

Cf. A096550-A096561 other pseudo-random number generators.

Programs

Maple

a:= proc(n) option remember; `if`(n<2, 0,
      irem(2147437301 * a(n-1) [phone], 2147483648))
    end:
seq(a(n), n=1..30);  # Alois P. Heinz, Jun 10 2014

Mathematica

NestList[Mod[#*2147437301 + 453816693, 2^31] &, 0, 50] (* Paolo Xausa, Aug 29 2024 *)

Formula

a(1)=0, a(n) = ( 2147437301 * a(n-1) + 453816693 ) mod 2^31. The sequence is periodic with period length 2^31.