SELECT CASE statement
Standard: F77 F90 F95 F2003
  Example Program
<Syntax>
[ construct-name : ] SELECT CASE ( expression )

The SELECT CASE statement may appear only as the first statement of a CASE construct. The expression must be scalar and of type Integer, Real or Character.
<Semantics>
The SELECT CASE statement introduces a CASE construct. This selects a single block of statements for execution, based on the value of the expression. If no block is selected, execution continues following the END SELECT statement.
<Related>
CASE construct, CASE statement, CASE DEFAULT statement, END SELECT statement