Fortran - 定位函数

• 

  简述

  下表描述了定位功能：

  功能	描述
  maxloc（数组，掩码）	它返回数组数组中最大元素的位置，如果只包含满足掩码条件的掩码，则返回位置，结果是一个整数向量。
  minloc（数组，掩码）	它返回数组数组中最小元素的位置，如果只包含满足掩码条件的掩码，则返回位置，结果是一个整数向量。

  Example

  以下示例演示了该概念：

  
  program arrayLocation
  implicit none
     real, dimension(1:6) :: a = (/ 21.0, 12.0,33.0, 24.0, 15.0, 16.0 /)
     Print *, maxloc(a)
     Print *, minloc(a)
     
  end program arrayLocation   
  

  当上面的代码被编译并执行时，它会产生以下结果：

  
  3
  2