ELSEWHERE

WHERE 構文内で ELSEWHERE ブロックの開始を指定します。

形式

[name:] WHERE (mask-expr1)
[where-body-stmt]...
[ELSEWHERE (mask-expr2) [name]
[where-body-stmt]...]
[ELSEWHERE [name]
[where-body-stmt]...]
END WHERE [name]

name
WHERE 構文の名前。

mask-expr1, mask-expr2
論理配列式 (選別式と呼ばれます)。

where-body-stmt
次のいずれか。

規則と振る舞い

ELSEWHERE の後に続く個々の代入文は,".NOT. mask-expr1" を持つ WHERE 文であるかのように実行されます。ELSEWHERE"mask-expr2" を宣言している場合,"(.NOT. mask-expr1) .AND. mask-expr2" として実行されます。

互換性

CONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIB

関連情報

WHERE

	WHERE (pressure <= 1.0)
	  pressure = pressure + inc_pressure
	  temp = temp - 5.0
	ELSEWHERE
	  raining = .TRUE.
	END WHERE

変数 temppressure,および raining はすべて配列です。