SEED

Run-Time Subroutine: Changes the starting point of the pseudorandom number generator.

Module: USE DFLIB

Syntax

CALL SEED (iseed)

iseed
(Input) INTEGER(4). Starting point for RANDOM.

SEED uses iseed to establish the starting point of the pseudorandom number generator. A given seed always produces the same sequence of values from RANDOM.

If SEED is not called before the first call to RANDOM, RANDOM always begins with a seed value of one. If a program must have a different pseudorandom sequence each time it runs, pass the constant RND$TIMESEED (defined in DFLIB.F90 in the \DF98\INCLUDE subdirectory) to the SEED routine before the first call to RANDOM.

Compatibility

CONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIB

See Also: RANDOM, RANDOM_SEED, RANDOM_NUMBER

Example

 USE DFLIB
 REAL rand
 CALL SEED(7531)
 CALL RANDOM(rand)