external问题，实参不能与procedure同名

楚香饭

你给出的代码部分在我的编译器上可以编译。（但不能链接，因为缺少函数）

如果有可能，请你提供以下信息：
1.你的操作系统，编译器版本
2.全部源代码（可上传附件）

楚香饭

在 mrqmin 中，把
real funcs
改为
external :: funcs