Fortran 逻辑运算

! == /= > >= < <=
if (weight > height-100) ...
! 对逻辑的关系运算
.and. .or. .not. .eqv. .neqv.
! 大于小于的运算符号高于集合运算符号
! 也可以先把结果放到逻辑变量中
logical r
r = (rain >= 500)
if (r) ...