Previous: utrrd Up: ../plot79_u.html Next: utrrno
REAL FUNCTION UTRRNI (ISEED)
C$ (Normally-Distributed Pseudo-Random Number - Initialize)
C$ Initialize the normally-distributed pseudo-random number
C$ generator, UTRRNO(), with the NON-ZERO integer seed, ISEED.
C$ If the argument is zero, no initialization is done.
C$
C$ This function should be called once before calling UTRRNO()
C$ to establish an initial seed data sequence. If it is not
C$ called, a default sequence will be automatically supplied.
C$
C$ The function value returned is just FLOAT(ISEED).
C$ (23-Feb-1991)