fortran数组初始化总结

fortran数组的初始化有些地方和C类似，有些地方由于Fortran有所谓隐含式循环数组初始化更加灵活。
初始化为相同的值

1	int c[10] = {0};

Fortran:

integer :: f(10) = 0
!DATA
INTEGER :: F(10)
DATA F /10*0/

全部初始化

1	int c[5] = {1, 2, 3, 4, 5};

Fortran:

integer :: f(5) = (/ 1, 2, 3, 4, 5 /)
!DATA
INTEGER :: F(5)
DATA F /1, 2, 3, 4, 5/

下面是fortran的特色了，
隐含式循环初始化

integer :: f(5) = (/ 1, (i, i=2, 4), 5 /)
!初始化二维数组
integer :: f(2, 2)
data ((f(i, j), i=1,2), j=1,2) /1, 2, 3, 4/

近期文章