Fortran PPT课件 (6)IF基本用法.pptVIP

2.2 IF分支结构 2.2 IF分支结构 2-1 基本程序结构 2.2 IF分支结构 2.2 IF分支结构 IF（逻辑判断式） THEN … … … END IF 逻辑成立时，才会执行这里的程序代码 IF基本用法 单句执行命令时，可写为： If(speed100.) write(*,*) “Slow down” IF（逻辑判断式） THEN … … … ELSE … … … END IF 逻辑成立，执行这一块代码 逻辑不成立，执行这一块代码 双分支条件 模块内的执行语句后缩， 便于阅读和分辨 FORTRAN90 FORTRAN77 == 判断是否“相等” .EQ. /= 判断是否“不相等” .NE. 判断是否“大于” .GT. = 判断是否“大于或等于” .GE. 判断是否“小于” .LT. = 判断是否“小于或等于” . LE. 逻辑运算符号：两个数值的比较 大部分FORTRAN 77也 可以接受数学表到式 逻辑运算符号 功能 .AND. 交集，如果两边表达式成立，整个表达式成立 .OR. 并集，两边的表达式只要一个成立，整个表达式成立 .NOT. 逻辑反向，如果后面的表达式不成立，整个表达式成立 .EQV. 两边的表达式逻辑运算结果相同，整个表达式成立 .NEQV. 两边的表达式逻辑运算结果不相同，整个表达式成立 逻辑表达式之间的关系运算，集合运算符号 运算优先级低于大于小于和等式的运算符号 如：80 a90 OR “或者”，只要一边成立即为真 【.NOT.】 只跟一个表达式在后面，把原本的逻辑结果取反 (.not. 35) !35 不成立，经过.not.取反为‘真’ (.not. 12) !12成立，取反后为‘F’ 【.EQV.】 (13 .EQV. 23) !两边都不成立，表达式为真 (13 .EQV. 23) !两边结果不同，表达式为假 逻辑A 逻辑B A .EQV. B TRUE TRUE TRUE TRUE FALSE FALSE FALSE TRUE FALSE FALSE FALSE TRUE 【.NEQV.】 (13 .NEQV. 23) !两边都不成立，表达式为假 (13 .NEQV. 23) !两边结果不同，表达式为真 逻辑A 逻辑B A .NEQV. B TRUE TRUE FALSE TRUE FALSE TRUE FALSE TRUE TRUE FALSE FALSE FALSE 运算类别 运算符 优先级 括号 （ ） 1 算术运算符 ** *， / +， - 2 3 4 关系运算 .GT. , .GE., .LT., .LE. ,.EQ. , .NE. 5 集合逻辑运算 .NOT. .AND. .OR. .EQV., .NEQV. 6 7 8 9 各种运算符的优先级 A+C=6.0; B+D=5.5 A =0.0为T; A+CB+D为F .NOT. .TRUE. 为’F’ 执行.AND.， .TRUE. .AND. .FALSE.为F 执行.OR., 结果为F 例：设A=3.5, B=5.0, C=2.5, D=0.5，求表达式结果： A=0.0 .AND. A+C B+D .OR. .NOT. .TRUE. 2.2 IF分支结构 2.2 IF分支结构 2-1 基本程序结构 2.2 IF分支结构 2.2 IF分支结构