爱气象,爱气象家园! 

气象家园

 找回密码
 立即注册

QQ登录

只需一步,快速开始

新浪微博登陆

只需一步, 快速开始

搜索
查看: 11104|回复: 0

[求助] 二进制转十进制 Fortran

[复制链接]

新浪微博达人勋

发表于 2021-2-2 16:19:07 | 显示全部楼层 |阅读模式

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

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

x
      PROGRAM EOF

      PARAMETER(KVT=10,nt=59)

     DIMENSION ev(nt,KVT),tcf(nt,KVT)
!****  INPUT DATA ***********************************************



         open(21,file='D:\lunwen\eof\wu-biaozhunhuajuping\cishu\sjxs\Teof-cishu.grd',form='binary')
      do 345 i=1,nt
345        read(21)(tcf(i,j),j=1,KVT)
      close(21)


!*************************************************************
!****   output the time series   ******
      open(22,file='D:\lunwen\eof\wu-biaozhunhuajuping\cishu\sjxs\Teof-cishu.txt')
      do 346  i=1,nt
346     write(21,*)(ev(i,j),j=1,KVT)
               
      close(22)

         end

二进制转十进制出错提示:Compiling Fortran...
D:\lunwen\eof\sjxs\EOF.f90
D:\lunwen\eof\sjxs\EOF.f90(25): warning FOR4265: symbol EV referenced but not set
EOF.obj - 0 error(s), 1 warning(s)


本人小白,请教大家这个提示什么意思?编程错在哪里了?


密码修改失败请联系微信:mofangbao
您需要登录后才可以回帖 登录 | 立即注册 新浪微博登陆

本版积分规则

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

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

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