fortran生成二进制问题

kittyhare · 发表于 2011-10-18 13:25:27

登录后查看更多精彩内容~

您需要登录才可以下载或查看，没有帐号？立即注册

x

本帖最后由 kittyhare 于 2011-10-19 05:52 编辑

怎么GRADS画图时出现错误
   program main
  character*10:: dataname,datanamed
   integer nflag,nlev,stid
   real lat,lon,yl,tim
   open(8,file='D:\2011\yl.txt')
   open(10,file='D:\2011\yl.dat',form='UNFORMATtED',
   $RECORDTYPE='STREAM')
  iflag=0
  i=0
c DO IN=1,st
10  read(8,*)dataname,stid,lon,lat,yl
      if(iflag.eq.0)then
      iflag=1

      datanamed=dataname
      endif
if(datanamed.ne.dataname)then
nlev=0
      write(10)lat,lon,tim,nlev,nflag
i=i+1
write(*,*)i
endif

      datanamed=dataname
tim=0.0
      nlev=1

      write(10)lat,lon,tim,nlev,nflag
write(10)yl
go to 10
90 continue


stop
   end
.............................................................................................
用GRADS的.ctl文件生成.map数据，就出现了下述错误

mofangbao · 发表于 2011-10-18 13:35:42

建议楼主先自己调试，然后把问题描述清楚，直接给个fortran程序不是很好，也许是你画图的问题呢，把你做的东西大概描述一下，提问要把问题描述清楚，这样别人更容易帮你

kittyhare · 发表于 2011-10-18 14:38:03

是数据文件的问题吗

mofangbao · 发表于 2011-10-18 14:47:20

都不知道你啥错误，建议你先仔细看一遍这个帖子：
http://bbs.06climate.com/forum.php?mod=viewthread&tid=2970

善人/jw · 发表于 2011-10-18 18:38:29

LZ是想把站点资料插值画图吗？！
论坛里有详细解释，你可以用搜索功能~~

kittyhare · 发表于 2011-10-18 21:04:39

是啊，善人

kittyhare · 发表于 2011-10-19 05:52:57

谢谢大家，特别谢谢善人

godenflame135 · 发表于 2012-3-28 22:44:32

看lev和flag的数值都是很大，是不是有可能要在相应的那个ctl中加入options byteswapted？

		自动登录	找回密码
密码			立即注册

[源代码] fortran生成二进制问题

登录后查看更多精彩内容~