8.3.3 Semantic IF Merging

Adjacent, complementary, IF statements can occasionally be merged into an IF/THEN/ELSE block, as shown in the following example: 

IF (A(I) .GT. 0) B(I) = A(I)
IF (A(I) .LE. 0) B(I) = B(I) - A(I)

Becomes: 

IF (A(I) .GT. 0) THEN
B(I) = A(I)
ELSE
B(I) = B(I) - A(I)
ENDIF

Previous Page|Next Page|Contents|Index|
Command-Line Switches

Copyright © Digital Equipment Corporation. 1997. All Rights Reserved.