主题:这是什么错误?
c +++
c +++ erro handle function
c +++
subroutine ercerr(n)
write(6,110) n+110
stop
110 format('esc-lib error, number=',i3)
end
function nercind(n)
integer nercind
include 'erc.i'
go to (10,20,30,40,50,60,70,80,90,100,110) n
10 nercind=ishell
return
20 nercind=imco
return
30 nercind=ikh
return
40 nercind=irt
return
50 nercind=isheet
return
60 nercind=idf
return
70 nercind=isoot
return
80 nercind=idsf
return
90 nercind=icr
return
100 nercind=isic
return
110 nercind=ikin
return
end
有这样的一个子程序,在主程序中进行运行后,出现这样的错误:“esc-lib error,number=118"
请问这里的118是什么意思?也就是上面的i3是什么意思?指哪一行有问题呢?
c +++ erro handle function
c +++
subroutine ercerr(n)
write(6,110) n+110
stop
110 format('esc-lib error, number=',i3)
end
function nercind(n)
integer nercind
include 'erc.i'
go to (10,20,30,40,50,60,70,80,90,100,110) n
10 nercind=ishell
return
20 nercind=imco
return
30 nercind=ikh
return
40 nercind=irt
return
50 nercind=isheet
return
60 nercind=idf
return
70 nercind=isoot
return
80 nercind=idsf
return
90 nercind=icr
return
100 nercind=isic
return
110 nercind=ikin
return
end
有这样的一个子程序,在主程序中进行运行后,出现这样的错误:“esc-lib error,number=118"
请问这里的118是什么意思?也就是上面的i3是什么意思?指哪一行有问题呢?