爱气象,爱气象家园! 

气象家园

 找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 30511|回复: 48

[求助] fortran 读取全国站点降水数据的程序

[复制链接]
发表于 2011-9-21 11:08:04 | 显示全部楼层 |阅读模式

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

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

x
用FOR 读取全国降水数据是老是出错,找不到原因。求教!
数据和FOR 程序如下:

6小时全国站点降水:论坛不保存气象数据

================================
修改后的程序: rd_r6_correct.f (1.34 KB, 下载次数: 164)

点评

问题解决了 我把资料删掉 放这里不合适的啦  发表于 2011-9-21 13:37
密码修改失败请联系微信:mofangbao
发表于 2011-9-21 12:49:49 | 显示全部楼层
帮你顶了,fortran我很菜的。。。。
密码修改失败请联系微信:mofangbao
0
早起挑战累计收入
发表于 2011-9-21 13:36:35 | 显示全部楼层
    看了一下,不知道程序是不是你自己写的,存在比较多的问题,整体感觉比较乱,修改后已经可以正常读取了,但是我只修改了单时次的,多时次的留给你自己修改吧。

    从程序被修改的样子和你给的文件看来,好像你还没找到应该修改的地方,看了这个程序,真有冲动重新写一个,但是也许你看了这个程序而且试着理解了,所以我还是根据源程序做了一些修改,主要存在以下问题

    花了很多时间在拼凑文件名,但是结果不是很好,只能拼凑出一部分,其余的还需要手工输入,你可以试着修改,把要读取的文件的文件名列在一个文本文件中,让程序去依次读取;
    最大的问题就是循环和文件读取的问题了,循环用的真的很乱的,end标签被用在了不该用的地方,造成读取错误,要么用固定数量的循环,要么用goto+end标签,或者用status的状态来判断也行,总之不能混合用;
    还有就是有个输出到屏幕的语句,估计你是用来调试的,那个语句的输出格式有问题,改用print*调试即可;
    多文件的最外层循环和生成多时次的grd文件还需要你自己调试了。

附上修改过的(没去整理语句格式,你还是整理下吧,看着实在不方便,还有一整个程序竟然看不到注释呀):

rd_r6_correct.f (1.34 KB, 下载次数: 290)

评分

参与人数 1金钱 +8 收起 理由
言深深 + 8

查看全部评分

密码修改失败请联系微信:mofangbao
 楼主| 发表于 2011-9-21 14:30:36 | 显示全部楼层

3Q !这个是别人给的程序,用77写的,不是很了解。多谢啦!
密码修改失败请联系微信:mofangbao
0
早起挑战累计收入
发表于 2011-9-21 14:38:29 | 显示全部楼层
luoziwuhui 发表于 2011-9-21 14:30
3Q !这个是别人给的程序,用77写的,不是很了解。多谢啦!

调有错的程序先得理解程序,要不然没法调的,就像你说的“找不到原因”,还是仔细找找啦
密码修改失败请联系微信:mofangbao
 成长值: 0
发表于 2011-9-21 15:32:44 | 显示全部楼层
mofangbao 发表于 2011-9-21 13:36
看了一下,不知道程序是不是你自己写的,存在比较多的问题,整体感觉比较乱,修改后已经可以正常读取了 ...

真是太感谢清风了,中午不在,失职了惭愧一个。问题解决了就好啊
密码修改失败请联系微信:mofangbao
0
早起挑战累计收入
发表于 2011-9-21 16:38:56 | 显示全部楼层
言深深 发表于 2011-9-21 15:32
真是太感谢清风了,中午不在,失职了惭愧一个。问题解决了就好啊

别自责啊 论坛发展靠大家嘛  有时间就帮着看了一下
密码修改失败请联系微信:mofangbao
 成长值: 0
发表于 2011-9-21 20:27:24 | 显示全部楼层
mofangbao 发表于 2011-9-21 16:38
别自责啊 论坛发展靠大家嘛  有时间就帮着看了一下

好的,谢谢管理员哈哈
密码修改失败请联系微信:mofangbao
发表于 2012-3-25 19:03:56 | 显示全部楼层
正好要做关于降水的,参考一下
密码修改失败请联系微信:mofangbao
发表于 2012-5-4 22:09:33 | 显示全部楼层
正在学习读写的问题,感谢楼主
密码修改失败请联系微信:mofangbao
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

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

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