fortran 预编译及implicit 语法
在fortran77中看到这样一段代码，请问这是什么意思？*if sw
implicit real*8 (h)
*else
implicit integer (h)
*endif
implicit real*8 (h)
这表示以 h 开头的变量都默认为 real*8 类型
implicit integer (h)
这表示以 h 开头的变量都默认是整型。
*if sw
*else
*end if
这可能是早期编译器扩展的“预处理”语句，应该表示，如果定义了 sw 预处理常量，则编译第一句，否则编译第二句。
（这是非标准的语法）
页:
[1]