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