爱气象,爱气象家园! 

气象家园

 找回密码
 立即注册

QQ登录

只需一步,快速开始

新浪微博登陆

只需一步, 快速开始

搜索
查看: 2342|回复: 5

[求助] Fortran小白请大家帮我看看程序这两句什么意思

[复制链接]

新浪微博达人勋

发表于 2015-10-27 08:46:36 | 显示全部楼层 |阅读模式

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

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

x
REAL PS(72,46),U(72,46,7),V(72,46,7),Z(72,46,7), &
                     T(72,46,7),Q(72,46,5),TS(72,46),P(72,46)
       CHARACTER CDATE(5)*2
       DATA CDATE/’01’ , ’02’ , ’03’ , ’04’ , ’05’/
       DO IT = 1 , 5
OPEN(8,FILE=CDATE(IT)//’JAN87.DAT‘
       ,FORM='UNFORMATTED', RECORDTYPE='STREAM')
如题,那个REAL是定义实型变量,但是括号里的(72、46)是什么意思呢?
DATA CDATE/’01’ , ’02’ , ’03’ , ’04’ , ’05’/这句话是什么意思呢?
还有打开文件这个CDATE(IT)//’JAN87.DAT‘是什么意思呢??
密码修改失败请联系微信:mofangbao

新浪微博达人勋

 楼主| 发表于 2015-10-27 08:49:23 | 显示全部楼层
顺便问一下,我有很多不规则文件需要循环,如果我把文件名一个一个读到一个字符串string里进行循环,我如何通过打开数组名string打开文件呢?
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2015-10-27 10:28:32 | 显示全部楼层
都是Fortran中最基本的定义:
(1)REAL是定义实型数组,括号里的(72、46)表示的数组的行列数
(2)DATA是给数组赋值的一种方法 ,比如,CDATE(1)=’01’ , CDATE(2)=’02’....
(3)如果IT=1,打开文件这个’01JAN87.DAT‘文件。依次类推

评分

参与人数 1金钱 +6 收起 理由
lqouc + 6 赞一个!

查看全部评分

密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2015-10-27 13:23:33 | 显示全部楼层
ha
haohaohaohaohaohaohaohaohaohaohaohaohaohaohaohaohaohaohaohaohao
密码修改失败请联系微信:mofangbao

新浪微博达人勋

 楼主| 发表于 2015-10-27 14:45:35 | 显示全部楼层
jiaohe1990 发表于 2015-10-27 13:23
ha
haohaohaohaohaohaohaohaohaohaohaohaohaohaohaohaohaohaohaohaohao

。。。。。。。。。。。。。真诚求解答。。。。。。。。。。。
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2015-10-27 16:37:49 | 显示全部楼层
这个真心我也不知道  抱歉  
密码修改失败请联系微信:mofangbao
您需要登录后才可以回帖 登录 | 立即注册 新浪微博登陆

本版积分规则

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

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

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