我正在尝试运行FORTRAN程序(使用 gfortran ),我将ASCII文件转换为GRD文件 . 我期待程序读取文本文件,然后输出 grd 文件 .

运行该程序后,我收到以下错误消息:

Fortran runtime error: End of file

以下是我正在使用的文件:

Terminal Commands:

gfortran ascii2grd.f90
./a.out

FORTRAN Program:

!PROGRAM TO CONVERT ASCII TO GRD 
program ascii2grd
parameter(nx=25,ny=23,np=1)
real u(nx,ny,np),temp1(nx,ny)

open(2,file='/home/weather/test.grd',
form='unformatted',access='direct',recl=nx*ny*4)  
open(1,file='/home/weather/out.dat')

 do k=1,np
 read(1,*)((u(j,i,k),j=1,nx),i=1,ny)
10  continue    
 enddo

 rec=1
 do kk=1,np
 write(2,rec=irec)((u(j,i,kk),j=1,nx),i=1,ny)
 write(*,*)'Processing...'
irec=irec+1
 enddo
 write(*,*)'Done!'

stop
end

Sample from out.dat

999.000000    
   11.1000004    
   999.000000    
   999.000000    
   16.7000008    
   999.000000    
   14.6000004    
   999.000000    
   999.000000    
   999.000000