Question

fortran 二维数组的操作

我想把一个字符型二维数组的某一行 赋值给一个字符型的一维数组 如何实现 真抓狂 调试通不过

Answer 1

1.
搞清楚数据的来源，是文本文件中的
12000 行？还是一个12000大小的一维数组？
2.
a(1)(1:10,1:10)
,
a(2)(1:10,1:10) 这样的写法是不能被允许的。如果你想表达类似的含义，可以考虑用三维数组

Answer 2

program test
implicit none
character(20)::a(2,2)
character(20)::b(2)
integer::i,j
do i=1,2
do j=1,2
a(i,j)='y'
enddo
end do
do i=1,2
b(i)='x'
end do
print*,'a=',a
print*,'b1=',b
b=a(1,:)
print*,'b2=',b
end