没碰过这问题 不过稍微查了下跟INCLUDE有关系 可能你的环境没装好或是你的编译器和你的档案版本不一你的版本是不是f77 上网找 f90是D_QDAGdqdag ERRABS和ERRREL这边是双精度转实数误差?可是精度误差 第一原来有编译器会抓第二这不该让程式跑不动啊由于没有你的程式码 我建议把include那行删掉 但是你的程式运作的目的应该就是使用include的东西另一个可能的改法是 根据maxsub相关的叙述 你必须去更动maxsub的阵列大小 最好是改成动态配置 如果位于副程式(subroutine )内,就是在宣告时以(:)进行宣告,问题是include的东西能不能改也是个问题
https://docs.roguewave.com/imsl/fortran/6.0/math/default.htm?turl=qdag.htm根据这个网站内提供的程式码 error tolerancesERRABS = 0.0这个可能也要改