| 
 
	积分255贡献 精华在线时间 小时注册时间2012-9-3最后登录1970-1-1 
 | 
 
| 
本帖最后由 ﹏末歌尽微凉 于 2014-1-22 13:37 编辑
x
登录后查看更多精彩内容~您需要 登录 才可以下载或查看,没有帐号?立即注册 
  
 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
 
 
 
 
 | 
 |