インテル® Fortran コンパイラー 19.0 デベロッパー・ガイドおよびリファレンス
Portability Subroutine: Returns the current seed.
USE IFPORT
CALL RANGET (seed)
seed
(Output) INTEGER(4). The current seed value.