インテル® Fortran コンパイラー XE 13.1 ユーザー・リファレンス・ガイド
Portability Subroutine: Delays execution of the program for a specified duration.
USE IFPORT
CALL SLEEPQQ (duration)
duration
(Input) INTEGER(4). Number of milliseconds the program is to sleep (delay program execution).
INTEGER(4) delay, freq, duration
delay = 2000
freq = 4000
duration = 1000
CALL SLEEPQQ(delay)
CALL BEEPQQ(freq, duration)
END