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

File 如何在fortran中读取和连接文件,file,binary,fortran,File,Binary,Fortran,我得到了5个由类似这样的fortran代码生成的文件 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(

我得到了5个由类似这样的fortran代码生成的文件

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')。按顺序打开每个文件,读取数据,然后使用相同的机制将其写入单个文件。您的问题模棱两可,不允许进行更详细的回答。

您显示的代码使用无格式I/O和直接访问写入数据。您还需要使用未格式化的I/O来读取它。您可以使用直接访问,也可以使用流访问(我的建议是使用OPEN语句中的access='stream')。按顺序打开每个文件,读取数据,然后使用相同的机制将其写入单个文件。你的问题模棱两可,不允许更详细的回答