爱气象,爱气象家园! 

气象家园

 找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 3234|回复: 2

[源代码] nc数据转txt数据

[复制链接]
发表于 2016-3-7 14:46:38 | 显示全部楼层 |阅读模式

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

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

x
这个程序有大神已经贴出来过nc格式转为txt格式,现在已经通过grads将nc数据转为dat格式,但是就是看不明白通过fortran转txt格式时为什么write输出里面要减去90喃,还有j-1,很急,求大神回复。
parameter(m=179,n=360,o=1)

dimension  x(m,n,o)

open(1,file='kaka.dat',access='direct',form='binary',recl=n*m*o*4)

read(1,rec=1) (((x(i,j,k),j=1,n),i=1,m),k=1,o)

close(1)  

open(2,file='data.txt')

do i=1,m

print*,i

do j=1,n

write(2,"(2f10.2,2x,f6.2)")(i)*1.-90,(j-1)*1.,x(i,j,1)

enddo

enddo

close(2)

end

密码修改失败请联系微信:mofangbao
发表于 2016-3-7 16:55:47 | 显示全部楼层
没怎么看懂问题。  而且你这个Fortran程序,貌似有点问题。
密码修改失败请联系微信:mofangbao
 楼主| 发表于 2016-3-8 09:06:25 | 显示全部楼层
hulalahulala 发表于 2016-3-7 16:55
没怎么看懂问题。  而且你这个Fortran程序,貌似有点问题。

恩这是在网站下载的nc格式转txt格式的fortran程序,就是没有看懂输出是什么意思。为什么有减90
密码修改失败请联系微信:mofangbao
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

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

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