Open Watcom FORTRAN 77 Language Reference

FORTRAN Statements
2.63 OTHERWISE Statement
OTHERWISE
The OTHERWISE statement is used in conjunction with the SELECT statement. The OTHERWISE
statement marks the start of a new CASE block which is a series of zero or more statements ending in an
END SELECT statement.
When this statement is used and the value of a case expression is not found in any case list then control of
execution is transferred to the first executable statement following the OTHERWISE statement.
The CASE DEFAULT statement may be used in place of the OTHERWISE statement.
Example:
SELECT CASE ( CH )
CASE ( ’a’ : ’z’ )
PRINT *, ’Lower case letter’
CASE ( ’A’ : ’Z’ )
PRINT *, ’Upper case letter’
CASE ( ’0’ : ’9’ )
PRINT *, ’Digit’
OTHERWISE
PRINT *, ’Special character’
END SELECT
In the above example, if the character CH is not a letter or digit then the OTHERWISE block is executed.
Note:
The OTHERWISE or CASE DEFAULT block must follow all other CASE blocks.
For more information, see the chapter entitled "Program Structure Control Statements" on page 193.
OTHERWISE Statement 115