- 积分
- 2338
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2019-10-29
- 最后登录
- 1970-1-1
![[郭小鸡就是光i] 粉丝数:129 微博数:207 新浪微博达人勋](source/plugin/sina_login/img/light.png)
|
登录后查看更多精彩内容~
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
背景:最初使用 microsoft fortran powerstation4.0 版本编译器,根据清风大侠的帖子,已经画出了相应的图。但换了simply Fortran编译器后,出现新的问题,如图中所示。(找了很多帖子,也没有找到哪里错了,希望热心人给予小白帮助!)
文字描述:grads中 报错:
ga-> !stnmap -i d:/projects/project1/sta_tem.ctl
Name of binary data set: D:/projects/project1/sta_tem.grd
Number of times in the data set: 1
Number of surface variables: 1
Number of level dependent variables: 0
Starting scan of station data binary file.
Binary data file open: D:/projects/project1/sta_tem.grd
Processing time step 1
Invalid station hdr found in station binary file
Possible causes: Invalid level count in hdr
Descriptor file mismatch
File not station data
Invalid relative time
levs = 0 flag = 1 time = 105.04
simply Fortran中的代码:
program main
implicit none
character*8 stid
real lat,lon,h,tem,tim
integer nlev,flag
tim=0.0
nlev=1
flag=1
open(1,file='tem.txt',status='old')
open(2,file='sta_tem.grd',status='replace',form='unformatted')
read(1,*)
10 read(1,*,end=100)stid,lat,lon,h,tem
write(2)stid,lat,lon,tim,nlev,flag,tem
goto 10
100 continue
close(1)
nlev=0
write(2)stid,lat,lon,tim,nlev,flag
close(2)
end
ctl描述文件:
DSET D:/projects/project1/sta_tem.grd
DTYPE station
STNMAP D:/projects/project1/sta_tem.map
UNDEF -32766
TITLE Tem Data Sample
TDEF 1 linear 01may2001 1mo
VARS 1
tem 0 99 Tem Data
ENDVARS
|
|