你如何在fortran中遍历一个数组？

Question

非常简单的问题。

说我有

real, dimension(0:100) :: realResults

我希望迭代realResults，最终创建表单数组的json

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

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

感谢

Answer 1

在Fortran 90中，你可以进行数组迭代，如：

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

Answer 2

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

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