在用fortran读取台风资料时，数据读不出来= =初学者求助

shanxueke

这是我写的程序。compile的时候没有错，但是build有一个警告= =
program ex01
implicit none
integer,parameter::nx=237,ny=342,nz=19,nt=39
real u(nx,ny,nz,nt),v(nx,ny,nz,nt)
integer i,j,iz,it
open(1,file='d:\lunwen\chanchu_6km_pressure_3hour.dat')
open(12,file='d:\lunwen\u.grd',form='binary')
open(13,file='d:\lunwen\v.grd',form='binary')
do it=1,nt
do iz=1,nz
do j=1,ny
do i=1,nx
read(1,*)u(i,j,iz,it),v(i,j,iz,it)
enddo
enddo
enddo
enddo
do it=1,nt
do iz=1,nz
write(12)((u(i,j,iz,it),i=1,nx),j=1,ny)
write(12)((v(i,j,iz,it),i=1,nx),j=1,ny)
enddo
enddo
end

build后出现的错误
Debug/vor.exe : warning LNK4084: total image size 491245568 exceeds max (268435456); image may not run
vor.exe - 0 error(s), 1 warning(s)

曾记否

这是一个警告，读取的数据太大！

曾记否

直接运行就好！应该不影响结果！

shanxueke

这是ctl我应该怎么读取啊

shanxueke

曾记否 发表于 2013-4-22 16:40

                               
登录/注册后可看大图

直接运行就好！应该不影响结果！

运行出来的grd是0k

曾记否

shanxueke 发表于 2013-4-22 16:46

                               
登录/注册后可看大图

运行出来的grd是0k

像你这种情况直接用grads的fwrite提取你需要的数据就好啊

river

你电脑内存多大啊，这个警告里怎么只有256MB啊(max (268435456))
现在一般的电脑都有4个G了吧

mofangbao

这么长的程序看着太痛苦，你先自己调试吧，如果有错把范围先缩小一下

曾记否

给你一个fwritede程序，都帮你改好了，换一下路径就好

18351819511

我现在用的好像也是这个数据