如何在fortran中读取和连接文件

Posted 2021-04-03

我有这样的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个文件中的信息连接到一个数组中以执行某些处理。我该怎么做到这一点？

答案

您显示的代码使用未格式化的I / O和直接访问来写入数据。您还需要使用未格式化的I / O来读取它。您可以使用直接访问或，这将是我的建议，流访问（OPEN语句中的ACCESS ='STREAM'。）按顺序打开每个文件，读取数据，然后使用相同的机制将其写入单个文件。您的问题很模糊，不允许更详细的回复。