IF - 論理

文：論理式の値に基づいて，1 つの文を条件的に実行します (この文は，FORTRAN 77 では論理 IF 文と呼ばれていました)。

形式

IF (expr) stmt

expr
括弧で囲まれたスカラ論理式。

stmt
以下のものを除く，完全な文番号を持たない実行 Fortran 文。

• CASE，DO，IF，FORALL，または WHERE 構文

• 別の IF 文

• プログラム，関数，またはサブルーチンの END 文

IF 文が実行されるときには，先に論理式が評価されます。値が真ならば，文が実行されます。値が偽ならば，文は実行されず，制御はプログラム中の次の文に移されます。

互換性

CONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIB

関連情報

IF 構文，実行制御

例

以下の例は，有効な IF 文を示しています。

	IF (J.GT.4 .OR. J.LT.1) GO TO 250

	IF (REF(J,K) .NE. HOLD) REF(J,K) = REF(J,K) * (-1.5D0)

	IF (ENDRUN) CALL EXIT

以下に別の例を示します。

	USE DFPORT
	INTEGER(4) istat, errget
	character(inchar)
	real x
	istat = getc(inchar)
	IF (istat) errget = -1
	...
	!
	IF (x .GT. 2.3) call new_subr(x)
	...