我通过这样的fortran代码生成了5个文件
longP=8
OPEN(unit=20,FILE="GMt_2.dat",ACTION="write",ACCESS='Direct',RECL=longP)
count1=1
do J=K,fact
READ(10,*)XA,XB,YA,YB,ZA,ZB,rho
call Grv('f',Nx,Ny,dimg,Dx,Dy,XO,YO,XA,XB,YA,YB,ZA,ZB,rho,G,elev,Svec)
do I=1,dimg
WRITE(UNIT=20,rec=count1)Svec(I)
count1=count1+1
end do
WRITE(*,*)J
end do
dim(2)=J-1
fact=fact+fact1
call flush(20)
CLOSE(20)
我的教授说返回的文件格式不可读,我的目标是将这5个文件中的信息合并为一个数组,以执行某些处理。我该怎么做到?
答案 0 :(得分:3)
您显示的代码使用未格式化的I / O和直接访问来写入数据。您还需要使用未格式化的I / O来阅读它。您可以使用直接访问,也可以使用流访问(这是我的建议)(OPEN语句中的ACCESS ='STREAM'。)依次打开每个文件,读取数据,然后使用相同的机制将其写入单个文件。您的问题模棱两可,无法给出更详细的答复。