Evaluated proc rand:normal {{µ 1} {σ 0}} {expr $µ + $σ*sqrt(-log(rand()))*cos(2*acos(-1)*rand())}