| 查看: 406 | 回复: 2 | ||
wangxn06金虫 (正式写手)
|
[求助]
MPI编程中遇到的一个奇怪问题！太不可思议了 已有1人参与
|
|
一段简单的MPI程序： If(myproc == 0)Then ! receive data from processor 0 100 Do N = 1, 2 101 Do M = 1, 2 102 Do L = 1, 2 103 104 If(id(L,M,N)==0) CYCLE 105 106 SOURCE=id(L,M,N) 107 MYTAG =！ 108 NUM =！ 109 Call MPI_RECV (VAR,NUM,MPI_REAL,SOURCE, 110 1 MYTAG,MPI_COMM_WORLD,ISTAT,IERR) 111 112 Enddo;Enddo;Enddo 113 114 Elseif(myproc /= ROOT)Then 115 116 DEST =0 117 MYTAG =！ 118 NUM =！ 119 Call MPI_SSEND (VAR,NUM,MPI_REAL,DEST, 120 1 MYTAG,MPI_COMM_WORLD,ISTAT,IERR) 121 Endif 错误处在进程0，程序运行了几个循环后，在Call MPI_RECV...之前L=2,M=2,N=1,从Call MPI_RECV出来后变成了L=2,M=3,N=1,为什么？L,M,N和Call MPI_RECV无关啊！ 进程0继续执行到第104行时，L=1,M=4,N=1，循环怎么还在继续啊！真搞不明白， 错误提示是MPI_RECV给的因为rank的值出错了。 请问大家这是啥问题啊？问题出在MPI_RECV里，它到底干啥了？ |
回复此楼» 猜你喜欢
基金申请
已经有44人回复
-
CSC与新西兰维多利亚大学PhD奖学金项目
已经有0人回复
-
物理学I论文润色/翻译怎么收费?
已经有76人回复
-
新西兰Robinson研究所 招聘CSC公派访问人员
已经有0人回复
-
帮我的英语口语老师找学生
已经有0人回复
-
什么时候开奖？
已经有13人回复
-
散金币祈福
已经有94人回复
-
青基已中
已经有1人回复
-
散金币祈福
已经有185人回复
-
求助，如何提取ELK的rt-TDDFT在某一时刻的自旋密度分布和电子密度分布
已经有1人回复
masharp
金虫 (小有名气)
- 应助: 1 (幼儿园)
- 金币: 1304.7
- 散金: 20
- 帖子: 183
- 在线: 192.2小时
- 虫号: 1017040
- 注册: 2010-05-12
- 专业: 流体力学
2楼2014-07-25 11:12:06
wangxn06
金虫 (正式写手)
- 应助: 2 (幼儿园)
- 金币: 576.7
- 散金: 35
- 帖子: 509
- 在线: 250.5小时
- 虫号: 1156835
- 注册: 2010-11-27
- 专业: 流体力学
3楼2014-07-26 14:56:56
20