Fortran Coder

查看: 5802|回复: 0
打印 上一主题 下一主题

[并行] MPI发送和接受函数错误问题

[复制链接]

68

帖子

25

主题

0

精华

专家

F 币
321 元
贡献
197 点
跳转到指定楼层
楼主
发表于 2020-4-27 03:10:34 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
本帖最后由 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

参数设置文件

分享到:  微信微信
收藏收藏 点赞点赞 点踩点踩
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2024-11-23 05:47

Powered by Tencent X3.4

© 2013-2024 Tencent

快速回复 返回顶部 返回列表