 |
 |
 |
| 24小時(shí)熱門(mén)版塊排行榜 |
- >論壇更新日志 (5161)
- >考研 (1084)
- >導(dǎo)師招生 (881)
- >文獻(xiàn)求助 (317)
- >考博 (202)
- >蟲(chóng)友互識(shí) (184)
- >博后之家 (131)
- >碩博家園 (119)
- >休閑灌水 (103)
- >基金申請(qǐng) (86)
- >論文投稿 (78)
- >公派出國(guó) (44)
- >招聘信息布告欄 (42)
- >教師之家 (36)
- >找工作 (36)
- >SciFinder/Reaxys (33)
 |
 |
 |
||
 |
 |
 |
 |
 |
| 2 | 1/1 | 返回列表 |
| 查看: 823 | 回復(fù): 1 | |||
| 【懸賞金幣】回答本帖問(wèn)題，作者fo3mt2將贈(zèng)送您 10 個(gè)金幣 | |||
fo3mt2金蟲(chóng) (小有名氣)
|
[求助]
MPI并行收集數(shù)據(jù)
|
||
|
大家好， 我想請(qǐng)教一段用fortran寫(xiě)的mpi并行程序。代碼如下： do i = 1, nomi, 1 if (mod(i-1,world_size) /= world_rank) cycle kkim = kkimp(i,1:3) call proce(i,ndegen,nbc,npo,kkim,hil,thil,tecv,teve,bcb,eni,er,pi,nne,hb,bcp1) if (world_rank == 0) then bcp2 = bcp1 ！the 6th line do j = 1, world_size-1, 1 if (i-1+j == nomi) exit k = i + j + 1000 call mpi_recv(bcp3,nomi*nne*6,mpi_double_complex,j,k,mpi_comm_world,mpi_status_ignore,ierr) bcp2 = bcp2 + bcp3 end do else k = i + 1000 call mpi_send(bcp1,nomi*nne*6,mpi_double_complex,0,k,mpi_comm_world,ierr) end if end do 假設(shè)根進(jìn)程（root processor）在外循環(huán)里一共被使用了兩次，每次都會(huì)調(diào)用子程序proce，并從子程序得到傳回的數(shù)組bcp1。 當(dāng)用根進(jìn)程（root processor）使用數(shù)組bcp2，從各個(gè)進(jìn)程（包括其自身）收集各自得到的數(shù)組bcp1時(shí)，根進(jìn)程（root processor）需要先收集自己得到的數(shù)組bcp1。 因?yàn)榧僭O(shè)根進(jìn)程（root processor）在外循環(huán)里一共被使用了兩次，根進(jìn)程（root processor）一共要從自身收集兩次bcp1數(shù)組。那程序里的第6行（標(biāo)記為！the 6th line），寫(xiě)成bcp2 = bcp1是否合理呢？ 我覺(jué)得這樣寫(xiě)，會(huì)使得根進(jìn)程（root processor）在循環(huán)里第二次被使用得到的數(shù)組bcp1，覆蓋掉第一次被使用得到的數(shù)組bcp1，進(jìn)而導(dǎo)致丟失了第一次使用時(shí)得到的數(shù)組bcp1信息。 如果不丟失信息，應(yīng)該進(jìn)行疊加，也就是把第6行寫(xiě)成bcp2 = bcp2 + bcp1；但程序里卻不是這樣寫(xiě)的。 我想不通是什么原因，能否請(qǐng)大家給些建議呢？或者是否是程序?qū)戝e(cuò)了呢？ 謝謝啦。 盼復(fù)。 |
回復(fù)此樓» 猜你喜歡
288求調(diào)劑085600材料與化工
已經(jīng)有16人回復(fù)
-
面上和青基一樣限30頁(yè)不合理
已經(jīng)有6人回復(fù)
-
考研一志愿長(zhǎng)安大學(xué)材料與化工309分請(qǐng)求調(diào)劑
已經(jīng)有10人回復(fù)
-
【0856】化學(xué)工程（085602）313 分，本科學(xué)科評(píng)估A類(lèi)院�；瘜W(xué)工程與工藝，誠(chéng)求調(diào)劑
已經(jīng)有5人回復(fù)
-
工科材料085601 279求調(diào)劑
已經(jīng)有3人回復(fù)
-
化學(xué)學(xué)碩求調(diào)劑
已經(jīng)有3人回復(fù)
-
工科278分求調(diào)劑
已經(jīng)有6人回復(fù)
-
307求調(diào)劑
已經(jīng)有3人回復(fù)
-
315求調(diào)劑
已經(jīng)有5人回復(fù)
-
314求調(diào)劑
已經(jīng)有6人回復(fù)
taichiman
新蟲(chóng) (正式寫(xiě)手)
- 應(yīng)助: 0 (幼兒園)
- 金幣: 660.6
- 沙發(fā): 5
- 帖子: 346
- 在線: 10.4小時(shí)
- 蟲(chóng)號(hào): 32291817
- 注冊(cè): 2022-11-12
- 專(zhuān)業(yè): 石油、天然氣地質(zhì)學(xué)
2樓2022-12-05 12:05:02
相關(guān)版塊跳轉(zhuǎn)
我要訂閱樓主 fo3mt2 的主題更新
| 2 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 一志愿中科大材料與化工。353分能調(diào)劑到哪？ +5 | MayUxw1 2026-03-08 | 10/500 |
|
|---|---|---|---|---|
|
|
[考研] 420求調(diào)劑 +4 | 莫向外求11 2026-03-10 | 6/300 |
|
|
[考研] 283求調(diào)劑，材料、化工皆可 +6 | 蘇打水7777 2026-03-11 | 6/300 |
|
|
|
[考研] 一志愿北京化工大學(xué)材料與化工296分求調(diào)劑 +15 | 稻妻小編 2026-03-09 | 17/850 |
|
|
|
[考研] 301求調(diào)劑 +5 | Liyouyumairs 2026-03-11 | 5/250 |
|
|
|
[考研] 求調(diào)劑 +4 | 鶴遨予卿 2026-03-09 | 4/200 |
|
|
|
[考研] 材料專(zhuān)碩288分求調(diào)劑 一志愿211 +3 | 在家想你 2026-03-11 | 3/150 |
|
|
|
[考研] 調(diào)劑 +5 | 調(diào)劑的考研學(xué)生 2026-03-09 | 5/250 |
|
|
|
[考研] 313分生物學(xué)求調(diào)劑 +5 | Yyt楊1 2026-03-09 | 7/350 |
|
|
|
[考博] 找博導(dǎo) +4 | 小呆呆熊 2026-03-07 | 4/200 |
|
|
|
[考研]
 295復(fù)試調(diào)劑
+4
|
簡(jiǎn)木ChuFront 2026-03-09 | 4/200 |
|
|
|
[考研] 313求調(diào)劑 +4 | Yyt楊1 2026-03-07 | 5/250 |
|
|
|
[考研] 0817找調(diào)劑 +6 | kk扛 2026-03-08 | 6/300 |
|
|
|
[考研] 286求調(diào)劑 +12 | Faune 2026-03-06 | 14/700 |
|
|
|
[考研]
 化學(xué)工程與技術(shù)316求調(diào)劑
+7
|
Sixuan wang 2026-03-06 | 7/350 |
|
|
|
[考研] 081700學(xué)碩一志愿北京化工大學(xué)數(shù)二英一過(guò)六級(jí)有競(jìng)賽求調(diào)劑 +5 | galaxary 2026-03-07 | 7/350 |
|
|
|
[考研] 求調(diào)劑，不管什么專(zhuān)業(yè)，我是可塑造的人才一枚，希望遇到知己老師撈撈我 +4 | 13102137290 2026-03-06 | 5/250 |
|
|
|
[考研] 287求調(diào)劑 +3 | 看看我. 2026-03-05 | 6/300 |
|
|
|
[考研] 275求調(diào)劑 +4 | 大爆炸難民 2026-03-06 | 5/250 |
|
|
|
[考研] 復(fù)試調(diào)劑 +5 | 呼呼？~+123456 2026-03-05 | 5/250 |
|