- 积分
- 2220
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2011-9-15
- 最后登录
- 1970-1-1
|
登录后查看更多精彩内容~
您需要 登录 才可以下载或查看,没有帐号?立即注册
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)
本人小白,请教大家这个提示什么意思?编程错在哪里了?
|
|