define PI
   -1 acos

define rand1
   9999999 choose 1 + 10000000.0 /

define randNormal
   rand1 PI * 2 * cos
   rand1 log -2 * sqrt
   *
   2 / 1 +

1000 each drop randNormal "%f\n" print