如何在 Fortran 中迭代数组？

Question

假设我已经

real, dimension(0:100) :: realResults

并且想要迭代 realResults，最终创建 json 形式的数组，

[[x1,y1], [x2,y2], [x3, y3], ... ]

我很确定我想使用“do”，但我不确定如何使用。

Answer 1

在 Fortran 90 中，您可以执行数组迭代，如下所示：

do i = lbound(realResults, 1), ubound(realResults, 1)
  ! do something with realResults(i)
end do

Answer 2

也许是这样的：

      do 10 i = 0, 100
C        do something with realResults(i)
  10  continue