Fortran Coder

标题: MPI发送和接受函数错误问题 [打印本页]

作者: Kieran 时间: 2020-4-27 03:10
标题: MPI发送和接受函数错误问题
本帖最后由 Kieran 于 2020-4-27 03:12 编辑

大家好，

我写了一个计算程序，一共有两个文件。一个是MAINp.f90，是主程序文件；另一个是CALp.f90文件，是包括各种子程序的文件，用来被MAINp.f90文件调用的。在MAINpf90文件里，我使用了MPI_SEND和MPI_RECV函数来从各进程收集数据（u_s1，u_s2两个二维数组和ne，nb两个数）到0号根进程中来。0号跟根程使用u_t1，u_t2两个二维数组和nme，nnb两个一维数组来收集。

可程序运行之后，出现错误信息，显示MAINp.f90文件里第530和第527行出现问题。这两行分别是MPI_RECV和MPI_SEND命令行，但我没想通是哪里不对。

我把我的程序文件（MAINp.f90和CALp.f90）和错误信息文件（std_err.dat）放在附件里了。麻烦大家给我些建议，要如何修改文件里的错误吧。

多谢啦。

std_err.dat

136.78 KB, 下载次数: 0

错误信息文件

CALp.f90

16.89 KB, 下载次数: 0

子程序文件

MAINp.f90

28.78 KB, 下载次数: 1

主程序文件

INPUT.dat

619 Bytes, 下载次数: 0

参数设置文件

欢迎光临 Fortran Coder (http://bbs.fcode.cn/)