Random numbers: Difference between revisions

Added Arturo implementation
(Added Arturo implementation)
Line 66:
( 0.693461, 0.948424, 0.482261, 1.045939, 0.890818, 1.467935, 0.604153, 0.804811, 0.690227, 0.83462 ... )
</pre>
 
=={{header|Arturo}}==
 
<lang rebol>rnd: function []-> (random 0 10000)//10000
 
rand: map 1..1000 'x [
1 + (sqrt neg 2 * ln rnd) * (cos 2 * pi * rnd)
]
 
inspect rand</lang>
 
=={{header|AutoHotkey}}==
1,532

edits