Intel® Fortran Compiler 16.0 User and Reference Guide
Portability Subroutine: Returns the current seed.
USE IFPORT
CALL RANGET (seed)
seed
(Output) INTEGER(4). The current seed value.