Stan Vivian, University of Manitoba, Winnipeg, Canada

This two line program will provide a normally distributed

random number from a population of mean zero and specified

standard deviation S. Besides the input standard deviation S,

the subroutine uses two variables X and Y. The normally

distributed number is returned as X. Another version is pro-

vided for use with DECUS NO. FOCAL8-150; it is a single

line of FOCAL and executes faster. A demonstration program

is also included.