- 积分
- 14
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2011-11-13
- 最后登录
- 1970-1-1
|
发表于 2012-3-2 08:41:07
|
显示全部楼层
mofangbao 发表于 2012-3-1 09:48
从提示看,是你的grid文件出了问题,检查你生成grid的fortran以及grid.ctl文件
program gen_gird
implicit none
!这里是定义的变量,更改x,y
integer,parameter::x=29,y=17
integer i,j
real grid
grid=1.0
!程序开始
open(1,file='e:/keyan/data/output/rain/grid.rid',status='replace',form='binary')
do i=1,y
do j=1,x
write(1)grid
enddo
enddo
close(1)
!程序结束
end
这是fortran代码
DSET E:\keyan\data\ouput\rain\grid.dat
TITLE Grid Data Sample
UNDEF -9.99E33
XDEF 29 LINEAR 70.0 2.5
YDEF 17 LINEAR 15.0 2.5
ZDEF 1 LEVELS 1000
TDEF 1 LINEAR 01may2011 1mo
VARS 1
g 0 99 Grid Data
ENDVARS
描述文件 |
|