日志
fortran中的SELECT CASE 语法
热度 1 |
详细语法介绍如下：
select case(变量) ←放入所要判断的变量
case(数值1)
…… ←变量等于数值1时，执行此程序段
case(数值2)
…… ←变量等于数值2时，执行此程序段
……
case(数值n)
…… ←变量等于数值n时，执行此程序段
case default
…… ←变量不等于任何数值时，执行此程序段
end select
CASE DEFAULT程序模块并没有规定一定要出现。在CASE里的冒号前后放入两个数值时，代表在这两个数字范围中的所有数值。CASE括号里还可以用逗号来放入多个变量。
case(1) !变量=1时，会执行这个case中的程序模块
case(1:5) !1<=变量<=5时，会执行这个case中的程序模块
case(1: ) !1<=变量时，会执行这个case中的程序模块
case( :5) !变量<=5时，会执行这个case中的程序模块
case(1,3,5) !变量等于1或3或5时，会执行这个case中的程序模块
使用SELECT CASE来取代某些使用IF-ELSE IF的多重语句，会让程序代码看起来比较简洁。不过使用SELECT CASE有一些限制：
（1）只能使用整数（INTEGER），字符（CHARACTER），及逻辑变量（LOGICAL），不能使用浮点数及复数。
（2）每个CASE中所使用的数值必须是固定的常量，不能使用变量。
使用浮点数，不能用SELECT-CASE来做多重判断，只能使用IF-ELSE IF的做法。另外一个限制就是每个CASE里面的数值必须是常量。