在Fortran模型中加入一个自己写的子程序出现读入问题

胡文刚 · 发表于 2021-3-11 18:54:48

你的编译器过于陈旧。只支持 10 到 99 的通道号，建议更新你的编译器。

胡文刚 · 发表于 2021-3-11 22:03:19

CVF 是支持 1 做为通道号的。你确定你用的CVF？能否截图看看

胡文刚 · 发表于 2021-3-11 22:18:03

我怀疑这个错误可能不是编译器抛出的，而是你的代码逻辑，比如类似这样的语句

if( unit < 1 .or. unit > 99 ) then
write(*,*) 'ERROR in FOPENG: Unit number is < 10 or > 99 !'
end if

胡文刚 · 发表于 2021-3-12 08:43:01

你给出的部分代码看不出任何问题。

搜索你的代码，是否存在 fopeng 这样的函数？或者类似
ERROR in FOPENG: Unit number is < 10 or > 99
这样的字符串？

截图时，请让我们看到你的开发环境，确定是CVF？

胡文刚 · 发表于 2021-3-12 11:07:12

我没法准确的从一堆残缺的代码片段中判断你的代码逻辑。

而且这个 unit 在 [10,99] 区间的逻辑，是封在lib库里的，也没法改。

你可以尝试把 IUNITD 改成 10 到 99 之间的数字，目前是1。可能有效。

[求助] 在Fortran模型中加入一个自己写的子程序出现读入问题