RosettaCodeData/Task/Random-numbers/Falcon/random-numbers.falcon

8 lines
168 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
a = []
for i in [0:1000] : a+= norm_rand_num()
function norm_rand_num()
pi = 2*acos(0)
return 1 + (cos(2 * pi * random()) * pow(-2 * log(random()) ,1/2)) /2
end