Fortran 90 contains a subprogram for this purpose. If an argument is present it queries the random number generator. SIZE will output the number of integers used to hold the seed. GET will give the current value of the seed.
PUT allows for control of the seed.
PUT is the only command that provides input. It indicates the value to be used as the initial seed for the random number generator. PUT must be a one-dimensional array. It is used to generate the first random number. Any random numbers generated after the first will use the previous random number as its seed.