9.3.3 Semantic IF Merging

Adjacent, complementary, IF statements can occasionally be merged into an IF/THEN/ELSE block, as follows: 

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 Qualifiers

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