pass74 发表于 2014-4-2 17:59:43

fortran中forrtl:severe(24):end-of-file during read,unit 7··

本帖最后由 pass74 于 2014-4-3 08:54 编辑

在IVF下编译（源码是由Fortran 66和77写的，所以个别地方需做修改方能编译通过，主程序在文件NRLXRF.FOR中）通过后，运行时输入 1回车RES 回车CON 57 40 W 45 26 1 回车后出现以上错误，请问是为什么？源代码在附件中，已经困惑两天了，谢谢

fcode 发表于 2014-4-2 18:33:45

请问主程序在哪儿？还有 SPIN 函数（子程序）找不到

pass74 发表于 2014-4-2 19:59:50

fcode 发表于 2014-4-2 18:33
请问主程序在哪儿？还有 SPIN 函数（子程序）找不到

不好意思，刚刚疏忽了，主程序在文件NRLXRF.FOR中，附件文件已更新，谢谢

fcode 发表于 2014-4-2 20:11:46

主程序有了，现在缺 SPIN 子程序

pass74 发表于 2014-4-2 20:31:55

fcode 发表于 2014-4-2 20:11
主程序有了，现在缺 SPIN 子程序

SPIN 子程序在文件NRL4.FOR中呢:-)

fcode 发表于 2014-4-2 21:00:50

你确定你的代码在 IVF 上能编译链接？我这里一大堆的错误，各种类型不匹配，各种common溢出，各种实参虚参不匹配。

fcode 发表于 2014-4-2 21:03:11

比如说吧。
NRL2.for 中。251行
character*10   HBL6 , HUND, HXU, HXS
      DOUBLE PRECISION SDUMP
后面又
SDUMP( 1)= HBL6

双精度数组，怎么能等于字符串呢？

pass74 发表于 2014-4-3 08:32:15

fcode 发表于 2014-4-2 21:03
比如说吧。
NRL2.for 中。251行
character*10   HBL6 , HUND, HXU, HXS


在IVF下编译（源码是由Fortran 66和77写的，所以个别地方需做修改方能编译通过，主程序在文件NRLXRF.FOR中）通过后。。。我是把这几个地方修改之后才编译通过的，源文件中有个NRLX.EXE，不用修改直接就能运行，但用IVF运行就会出现以上你说的错误，也正在纳闷他是怎么运行的

pass74 发表于 2014-4-3 08:53:08

pass74 发表于 2014-4-3 08:32
在IVF下编译（源码是由Fortran 66和77写的，所以个别地方需做修改方能编译通过，主程序在文件NRLXRF.FOR ...

附件中我又添加了一个修改过的，就是把一些变量类型转换成同一类型等等，修改之后编译能通过，运行时会出现以下错误：fortran中forrtl:severe(24):end-of-file during read,unit 1··

楚香饭 发表于 2014-4-3 08:59:06

pass74 发表于 2014-4-3 08:32
在IVF下编译（源码是由Fortran 66和77写的，所以个别地方需做修改方能编译通过，主程序在文件NRLXRF.FOR ...

你应该一开始就给修改以后的，至少能正常编译链接的。

文件中的 NRLX.exe 是其他编译器编译出来的。大概早期的编译器对语法检查不严格，所以允许这些错误存在吧。
页: [1] 2
查看完整版本: fortran中forrtl:severe(24):end-of-file during read,unit 7··