4 lines
96 B
Text
4 lines
96 B
Text
for i = 1 to 1000
|
|
a[] &= 1 + 0.5 * sqrt (-2 * logn randomf) * cos (360 * randomf)
|
|
.
|
|
print a[]
|