FORTRAN 90 で C 言語の switch に相当するもの

フォートランの条件分岐に CASE 構文というものがある。C では switch ( ) { } だが f90 は SELECT CASE ( ) ... END SELECT でどっちも S ではじまるので、ボクにとっては紛らわしい。詳しくはこのページを参照：http://www.xlsoft.com/jp/products/intel/cvf/docs/vf-html/az/az03_02.htm

expr=1
a=2
b=3
SELECT CASE (expr)
  CASE (1)
    a=a+b
  CASE (2)
    a=a*b
  CASE DEFAULT
    a=a+1
END SELECT