远古代码运行报错如何处理呀

查看数: 1006 | 评论数: 7 | 收藏 0

关灯 | 提示：支持键盘翻页<-左右->

发布时间: 2023-12-1 09:02

本帖最后由盛世青衫于 2023-12-1 09:11 编辑请问报错为Rank mismatch in argument 'x' at (1) (rank-1 and scalar)如何处理我找到了三段子程序，我想运行一下看一下是什么结果，自己写了一个program，遇到了 ...

盛世青衫 发表于 2023-12-11 14:37:34

necrohan 发表于 2023-12-7 21:50
第一个错误提示是 call solvemompllud(X,...) 中的参数x不匹配，调用程序中没有声明x，默认是一个实数。
so ...

非常感谢，

necrohan 发表于 2023-12-7 21:50:16

第一个错误提示是 call solvemompllud(X,...) 中的参数x不匹配，调用程序中没有声明x，默认是一个实数。
solvemompllud 子程序的定义中声明 dimension::x(*) 为一个数组。
这二者不匹配产生的错误。

盛世青衫 发表于 2023-12-5 10:07:23

Transpose 发表于 2023-12-1 09:23
x没定义，建议加上implicit none

他说那个好像是个向量，如果我用real定义他也报错

盛世青衫 发表于 2023-12-5 10:06:22

necrohan 发表于 2023-12-1 12:53
把第9行那个子程序展开看一下代码

您好我已经更新图片，还望获得您的帮助谢谢

necrohan 发表于 2023-12-1 12:53:34

把第9行那个子程序展开看一下代码

Transpose 发表于 2023-12-1 09:23:13

x没定义，建议加上implicit none

回复