Fortran - 位置函数

下表描述了位置函数

函数	描述
maxloc(array, mask)	如果包括mask，它会返回array数组在满足mask条件下元素的最大值的位置，会返回位置，结果为整型向量。
minloc(array, mask)	如果包括mask，它会返回array数组在满足mask条件下元素的最小值的位置，会返回位置，结果为整型向量。

示例

以下示例演示了该概念

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

fortran_arrays.htm

打印页面