Linear congruential generator: Difference between revisions
m
→{{header|Mathematica}}
m (→{{header|Phix}}: added syntax colouring the hard way) |
|||
Line 2,205:
</pre>
=={{header|Mathematica}}/{{header|Wolfram Language}}==
<lang Mathematica>BSDrand[x_] := Mod[x*1103515245 + 12345, 2147483648]
NestList[BSDrand, 0, 10]
| |||