Fortran运算符优先级

运算符优先级来确定条件的表达式中的分组。这会影响一个表达式的求值。某些运算符的优先级高于其他;例如，乘法运算符的优先级比加法运算符更高。

例如X =7 + 3* 2;这里，x被赋值13，而不是20，因为运算符 * 优先级高于+，所以它首先被乘以3 * 2，然后再加上7。

这里，具有最高优先级运算符出现在表的顶部，那些具有最低出现在底部。在一个表达式中，高的优先级运算符将首先计算。

分类	运算符	关联
逻辑非和负号	.not. (-)	从左到右
幂	**	从左到右
乘除法	* /	从左到右
加减	+ -	从左到右
关第	< <= > >=	从左到右
相等	== !=	从左到右
逻辑与	.and.	从左到右
逻辑或	.or.	从左到右
赋值	=	从右到左

示例

试试下面的例子就明白了Fortran中的运算符优先级：

program precedenceOp
! this program checks logical operators

implicit none  

   ! variable declaration
   integer :: a, b, c, d, e
   
   ! assigning values 
   a = 20   
   b = 10
   c = 15
   d = 5
  
   e = (a + b) * c / d      ! ( 30 * 15 ) / 5
   print *, "Value of (a + b) * c / d is :    ",  e 

   e = ((a + b) * c) / d    ! (30 * 15 ) / 5
   print *, "Value of ((a + b) * c) / d is  : ",  e 

   e = (a + b) * (c / d);   ! (30) * (15/5)
   print *, "Value of (a + b) * (c / d) is  : ",  e 

   e = a + (b * c) / d;     !  20 + (150/5)
   print *, "Value of a + (b * c) / d is  :   " ,  e 
  
end program precedenceOp

当编译并执行上述程序,将产生以下结果：

Value of (a + b) * c / d is : 90
Value of ((a + b) * c) / d is : 90
Value of (a + b) * (c / d) is : 90
Value of a + (b * c) / d is : 50

我要分享文章