如何在 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

FORTRAN 和 json 在同一段？！？！搞什么？ 也许是这样的：

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