- 积分
- 255
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2012-9-3
- 最后登录
- 1970-1-1
|
登录后查看更多精彩内容~
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
本帖最后由 ﹏末歌尽微凉 于 2014-1-22 13:37 编辑
Fortran新手求教一个问题 请各位大大帮忙手里的Fortran程序是已经调试好的读取BO文件的 由于资料时间太短 ,拿到了最新的数据,但是是dat格式的 请问我怎么修改呢 摸不到头绪
程序如下
对站做循环
DO 200 K1=J0,J1
CCC
DO JK=2,7
FILEN(JK)(LN(JK)-8:LN(JK)-4)=STANUM(K1)
ENDDO
FILEN(9)(LN(9)-8:LN(9)-4)=STANUM(K1)
CCC 打开二进制B0文件(作为输入)
OPEN(NUM1,FILE=FILEN(2),STATUS='OLD',ACCESS='DIRECT',
* FORM='UNFORMATTED',RECL=746,ERR=50)
CCC 打开ASCII码B0文件和中间信息文件(作为输出)
OPEN(5,FILE=FILEN(4))
OPEN(2,FILE=FILEN(3))
WRITE(2,*) 'STATION:',STANUM(K1)下面是新资料的格式
56152日最高温度
1961 1
83 83 74 38 -44 10 -6 32 48 -31
10 -66 -66 -88 -110 -94 -35 -22 -18 -42
-34 -29 -52 -11 18 40 32 24 22 40 9
1961 2
20 32 22 0 24 43 63 60 15 -18
-21 11 15 -12 16 -22 0 28 31 38
78 31 49 18 20 29 32 37
|
|