GE是大于等于号（>=），GT是大于号(>)，LE是小于等于号(<=),LT是小于号(<)
IF基本用法
|
If(逻辑判断式) then
……
End if
|
If(逻辑判断式) then
……
Else
……
End if
|
逻辑运算符：
|
Fortran 90
|
|
Fortran 77
|
||
|
==
|
判断是否“相等”
|
|
.eq.
|
判断是否“等于”
|
|
/=
|
判断是否“不相等”
|
|
.ne.
|
判断是否“不等于”
|
|
>
|
判断是否“大于”
|
|
.gt.
|
判断是否“大于”
|
|
>=
|
判断是否“大于或等于”
|
|
.ge.
|
判断是否“大于或等于”
|
|
<
|
判断是否“小于”
|
|
.lt.
|
判断是否“小于”
|
|
<=
|
判断是否“小于或等于”
|
|
.le.
|
判断是否“小于或等于”
|
逻辑判断式
|
.and.
|
交集，如果两边的表达式都成立，整个表达式就成立
|
|
.or.
|
并集，两边的表达式只要有一个成立，整个表达式就成立
|
|
.not.
|
逻辑反向，如果后面的表达式不成立，整个表达式就成立
|
|
.eqv.
|
两边表达式的逻辑运算结果相同时，整个表达式就成立
|
|
.neqv.
|
两边表达式的逻辑运算结果不同时，整个表达式就成立
|
ISNAN 函数
说明 ISNAN 函数判断。 isnan(x)是判断x是否是NaN的函数，返回ture、false。
举例：设a是原始数据，t是结果数据
if (isnan(a)) then
t=a !判断出a的值是NaN，那么将t也赋值为NaN
else
进行计算
end if