RosettaCodeData/Task/Random-numbers/MAXScript/random-numbers.max

arr = #()
for i in 1 to 1000 do
(
    a = random 0.0 1.0
    b = random 0.0 1.0
    c = 1.0 + 0.5 * sqrt (-2*log a) * cos (360*b) -- Maxscript cos takes degrees
    append arr c
)