Rosetta Code

Elementary cellular automaton/Random number generator: Difference between revisions

Page Discussion

Elementary cellular automaton/Random number generator (view source)

Revision as of 10:45, 2 August 2019

17 bytes removed ,  4 years ago
→‎{{header|F_Sharp|F#}}
m (→‎{{header|Pascal}}: inline all together to get next byte doubles speed. ~4/5 cycles per Bit.Needs long wake up to get stable results)
Line 155:
<lang fsharp>
// Generate random numbers using Rule 30. Nigel Galloway: August 1st., 2019
eca 30 [|yield 1; yield! Array.zeroCreate 99|]|>Seq.map(fun n->n.[0])|>Seq.chunkBySize 8|>Seq.map(fun n->n|>Array.mapi(fun n g->g.[0]<<<(7-n)) n|>Array.sum)|>Seq.take 10|>Seq.iter(printf "%d "); printfn ""
</lang>
{{out}}
Line 161:
220 197 147 174 117 97 149 171 240 241
</pre>
 
=={{header|Go}}==
{{trans|C}}
Nigel Galloway
2,171

edits

Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/243308"