请选择 进入手机版 | 继续访问电脑版
爱气象,爱气象家园! 

气象家园

 找回密码
 立即注册

QQ登录

只需一步,快速开始

新浪微博登陆

只需一步, 快速开始

搜索
查看: 3905|回复: 0

[图形美化] 关于用grads画eof图的问题

[复制链接]

新浪微博达人勋

发表于 2018-4-16 13:35:11 | 显示全部楼层 |阅读模式

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

您需要 登录 才可以下载或查看,没有帐号?立即注册 新浪微博登陆

x
我编写了txt改二进制的格式后出来了文件但是用grads作map文件时总是没有结果,fortron程序如下改了好几天了还是有错: parameter(m=2467,n=1)
integer:: year,k,j,q,nlev,nflag
real tm(N,M),lat(m),lon(m),tmax,tmin,pr,afw,rha,w10m,tim
character*8 sta(m)
tim=0.0
nlev=1
nflag=1
open(20,file="E:\www\RCP45.txt")
read(20,*)
DO K = 1,m
  do j = 1,1068
  if(j>60) then
   read(20,*)sta(k),lat(k),lon(k),year,q,tt,tmin,tmax,pr,afw,rha,w10m
   end if
  end do
end do
close(20)
open(30,file="E:\www\eof\233.txt")
   do j=1,M
   read(30,*)tm(1,J)
   end do
   close(30)

open(40,file="E:\www\eof\grads\sta.grd",status="replace",FORM ="BINARY")
   do k=1,m
   WRITE(40)sta(k),lat(k),lon(k),TIM,NLEV,NFLAG,tm(1,k)
   end do
   nlev=0
   WRITE(40) sta(k-1),lat(k-1),lon(k-1),tim,NLEV,NFLAG
   close(40)
END

结果制作map文件时出现
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 = 122.52
ga->

但是我看了好久感觉没错啊,请教大侠不胜感激
密码修改失败请联系微信:mofangbao
您需要登录后才可以回帖 登录 | 立即注册 新浪微博登陆

本版积分规则

Copyright ©2011-2014 bbs.06climate.com All Rights Reserved.  Powered by Discuz! (京ICP-10201084)

本站信息均由会员发表,不代表气象家园立场,禁止在本站发表与国家法律相抵触言论

快速回复 返回顶部 返回列表