cuicuiwenwen 发表于 2007-5-22 13:00:17

程序运算求助

7年前在Dos系统下运算可执行有结果的程序,
现在compaq visual fortran仍然用fortran77怎么
不执行呀?年代长了,大家别见笑?!
显示如下:
    Input the Time of Simulation ( TOS >= 1000 ) !
10000
Input the Maximal Moving Distance !
0.5
forrtl: severe (161): Program Exception - array bounds exceeded
Image            PC      Routine            Line      Source
zt2.exe            00404A56Unknown               UnknownUnknown
zt2.exe            004408E9Unknown               UnknownUnknown
zt2.exe            00432CC4Unknown               UnknownUnknown
kernel32.dll       4FAE35DDUnknown               UnknownUnknown

Incrementally linked image--PC correlation disabled.
Press any key to continue
谢谢

cuicuiwenwen 发表于 2007-5-22 13:01:55

前面数组叔祖定义不算大呀
parameter (pi=3.1415926)
      real hx(10000),hy(10000),hz(10000)
      real cx(5000),cy(5000),cz(5000)
      real kt,ltube,k,m,mu
      double precision xx,yy
      common xx,yy

galever 发表于 2007-5-22 13:59:59

数组越界并不是由于你数组定义大了， 可能是定义小了，可以在PROJRCT PROPERTY中关闭数组越界检查，具体在RUNTIME项的设置中，不过这样做可能有不可预见的结果。
比如在过去的程序中实参数组与虚参数组的定义上，给定实参数组的大小，而虚参数组的大小仅简单地定义为1，由于按地址传递，一般没什么问题，但在VF中默认是打开数组越界检查的，就会给出错误信息。

cuicuiwenwen 发表于 2007-5-22 18:12:02

谢谢你对程序运算求助的答复，我的问题是
如何关闭数组越界检查，在project中未发现property
项呀？本人愚钝，还望不吝赐教！

cuicuiwenwen 发表于 2007-5-30 09:33:19

问题还为解决,到底如何才能运算呢

kyb123 发表于 2007-8-30 08:57:00

可能是有引用的输入文件,没有得到,故运行出错
页: [1]
查看完整版本: 程序运算求助