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

气象家园

 找回密码
 立即注册

QQ登录

只需一步,快速开始

新浪微博登陆

只需一步, 快速开始

搜索
查看: 5825|回复: 10

[求助] 怎么用Fortran分离站点数据

[复制链接]

新浪微博达人勋

发表于 2017-4-5 21:03:39 | 显示全部楼层 |阅读模式

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

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

x
怎么把数据分离成单站点的数据,求大神指导
QQ图片20170405210235.png
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2017-4-5 21:22:15 | 显示全部楼层
好好好++++++++++++++
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2017-4-5 21:22:32 | 显示全部楼层
好好好++++++++++++++
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2017-4-5 21:22:41 | 显示全部楼层
好好好++++++++++++++
密码修改失败请联系微信:mofangbao

新浪微博达人勋

 成长值: 0
发表于 2017-4-6 08:31:51 | 显示全部楼层
本帖最后由 言深深 于 2017-4-6 08:33 编辑

全部read到一个数组里面,然后识别站点,安装不同的站点新建文件,并write进去:
integer sta(1:nstation)
real x(1:n)
character*5 stationname

do i=1,nstaition
write(stationname,"(i5)")sta(i)
open(1,file=trim(stationname)//".txt")
do j=1,n
if(int(x(j)).eq.sta(i))then
write(1,*)x(j)
endif
enddo
close(1)
end

我简单写了一段不知道你能不能看得懂。
sta是用来存放站点名称的,需要写到stationname字符串里面,然后用trim语句构造新的文件名,然后判断文件x(j),x是你的总文件数目,符合条件满足i站名称的,就写到这个文件里面。
密码修改失败请联系微信:mofangbao

新浪微博达人勋

0
早起挑战累计收入
发表于 2017-4-6 09:01:07 | 显示全部楼层
言深深 发表于 2017-4-6 08:31
全部read到一个数组里面,然后识别站点,安装不同的站点新建文件,并write进去:
integer sta(1:nstation) ...

字应该都认识,深深好久没有手把手教了
密码修改失败请联系微信:mofangbao

新浪微博达人勋

 成长值: 0
发表于 2017-4-6 09:48:46 | 显示全部楼层
mofangbao 发表于 2017-4-6 09:01
字应该都认识,深深好久没有手把手教了

你没看到而已啊···我一直在,从未走远···
密码修改失败请联系微信:mofangbao

新浪微博达人勋

 楼主| 发表于 2017-4-6 11:10:30 | 显示全部楼层
言深深 发表于 2017-4-6 08:31
全部read到一个数组里面,然后识别站点,安装不同的站点新建文件,并write进去:
integer sta(1:nstation) ...

谢谢大神帮忙
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2017-5-24 14:04:57 | 显示全部楼层
谢谢,很有用!
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2017-7-13 16:52:06 | 显示全部楼层
{:eb301:}{:eb301:}超级有用啊
密码修改失败请联系微信:mofangbao
您需要登录后才可以回帖 登录 | 立即注册 新浪微博登陆

本版积分规则

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

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

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