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

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

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

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

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

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

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

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

比如说吧。
NRL2.for 中。251行

[Fortran] 纯文本查看 复制代码

 character*10     HBL6 , HUND, HXU, HXS
      DOUBLE PRECISION SDUMP

后面又
SDUMP( 1)= HBL6

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

fcode · 发表于 2014-4-3 09:26:12

我现在可以正常编译链接了。但是出现错误的位置与你不同。

NRL40.for 文件 568 行
READ( KRA, 101) NZLAST, IZERO,( BUF5( IJ), IJ= 1, 5)

此时的 KRA = 0，前面也没有 Open 过 0 的文件，IVF不允许文件通道号为0，这是屏幕读取吗？
还有你的错误，是发生在文件通道号 1 还是 7 ？你自己好像都说得不一致。

[文件读写] fortran中forrtl:severe(24):end-of-file during read,unit 7··

美女勋章

热心勋章

星光勋章

新人勋章

贡献勋章

管理勋章

帅哥勋章

爱心勋章

规矩勋章

元老勋章

水王勋章