Percolation/Mean cluster density: Difference between revisions

Content added Content deleted
(Added 11l)
Line 27:
<lang 11l>UInt32 seed = 0
F nonrandom()
:seed = (1664525 * :seed + 1013904223) [&] FFFF'FFFF
R (:seed >> 16) / Float(FF'FF)