インテル® Fortran コンパイラー 19.1 デベロッパー・ガイドおよびリファレンス
Statement: Causes the image that executes it to stop participating in program execution, without initiating termination.
FAIL IMAGE
This statement allows you to simulate image failure and to test and debug image failure recovery in a program, without requiring an actual image failure.
After execution of a FAIL IMAGE statement, no additional statements are executed by the image.
A FAIL IMAGE statement is not an image control statement.
If an image calls the following procedure at regular time intervals, it has a one in ten thousand chance of failure in each time step:
SUBROUTINE RANDOM_FAILURE ()
REAL RANDOM
CALL RANDOM_NUMBER (RANDOM)
IF (RANDOM > 0.9999) FAIL IMAGE
RETURN
END SUBROUTINE RANDOM_FAILURE