CLASS DEFAULT statement

Standard: F77 F90 F95 F2003 F2008 F2018

＜Syntax＞

CLASS DEFAULT [ construct-name ]

This statement is part of the SELECT TYPE construct. The construct-name must appear if and only if the SELECT TYPE statement is named, and must be the same.

＜Semantics＞

The CLASS DEFAULT statement marks the beginning of the CLASS DEFAULT block in a SELECT TYPE construct. This block is executed if and only if no other block in the SELECT TYPE is chosen to be executed.

Within the CLASS DEFAULT block, the associate-name of the SELECT TYPE statement is polymorphic, and has the same declared type as the selector.