 |
 |
 |
 |
 |
 |
||
 |
 |
 |
 |
 |
| 1 | 1/1 | 返回列表 |
| 查看: 560 | 回復(fù): 0 | |||
| 【懸賞金幣】回答本帖問(wèn)題，作者fo3mt2將贈(zèng)送您 20 個(gè)金幣 | |||
fo3mt2金蟲(chóng) (小有名氣)
|
[求助]
三層嵌套循環(huán)的并行問(wèn)題
|
||
|
大家好， 我想向大家請(qǐng)教一個(gè)問(wèn)題。對(duì)于三層嵌套循環(huán)的fortran程序要如何用mpi技術(shù)并行呢？比如下面這段代碼，變量arr是一個(gè)三維數(shù)組，我想對(duì)它的每一維度都分別各自并行，并將該數(shù)組里的每個(gè)元素，通過(guò)計(jì)算后加和，最后收集到collect變量里。 能否請(qǐng)大家?guī)臀倚薷南逻@段代碼，把它變成mpi并行的程序呢？謝謝啦。 !example code program example implicit none integer :: i, j, k double precision :: arr(100,1000,700), collect do i = 1, 100, 1 do j = 1, 1000, 1 do k = 1, 700, 1 arr(i,j,k) = dble(i + j + k) end do end do end do collect = 0.0d0 !this is the part that i want to parallelize do i = 1, 100, 1 do j = 1, 1000, 1 do k = 1, 700, 1 collect = collect + arr(i,j,k) * dble(i+j-k) end do end do end do write (unit=*, fmt=*) collect ! stop end program example |
回復(fù)此樓» 猜你喜歡
考研交流
已經(jīng)有0人回復(fù)
-
【新加坡】納米電子器件項(xiàng)目組有“聯(lián)合培養(yǎng)博士生”名額
已經(jīng)有0人回復(fù)
-
物理學(xué)I論文潤(rùn)色/翻譯怎么收費(fèi)?
已經(jīng)有130人回復(fù)
-
【新加坡】納米電子器件項(xiàng)目組有“聯(lián)合培養(yǎng)博士生”名額
已經(jīng)有0人回復(fù)
-
幫我的英語(yǔ)口語(yǔ)老師找學(xué)生
已經(jīng)有3人回復(fù)
-
計(jì)算三階力常數(shù)用thirdorder擴(kuò)胞時(shí)參數(shù)如何選擇？臨近原子數(shù)怎么取值
已經(jīng)有5人回復(fù)
-
2026年循環(huán)經(jīng)濟(jì)功能材料國(guó)際會(huì)議（ICFMCE 2026）
已經(jīng)有0人回復(fù)
-
2026年第五屆電氣、電子與信息工程國(guó)際會(huì)議（ISEEIE 2026）
已經(jīng)有0人回復(fù)
相關(guān)版塊跳轉(zhuǎn)
我要訂閱樓主 fo3mt2 的主題更新
| 1 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研]
 085600材料與化工 292分 求調(diào)劑
+4
|
程晴之 2026-03-06 | 4/200 |
|
|---|---|---|---|---|
|
|
[考研] 招調(diào)劑 +12 | 帆船哥 2026-03-04 | 14/700 |
|
|
|
[考研] 266材料化工求調(diào)劑 +5 | 哇塞王帥 2026-03-03 | 5/250 |
|
|
[考研] 求調(diào)劑 +5 | danyyyy 2026-03-04 | 5/250 |
|
|
|
[考研] 一志愿蘇大材料工程專(zhuān)碩293求調(diào)劑 +3 | 鋼鐵大炮 2026-03-04 | 3/150 |
|
|
|
[考研] 274求調(diào)劑 +9 | 一個(gè)學(xué)習(xí)者 2026-03-04 | 9/450 |
|
|
|
[考研] 材料085601一志愿哈工大317 +4 | 壓迫感行 2026-03-04 | 4/200 |
|
|
|
[考研] 一志愿武理085601專(zhuān)碩347分求調(diào)劑 +4 | 啊歐歐歐 2026-03-04 | 5/250 |
|
|
|
[考研] 290求調(diào)劑 +5 | Bananaiy 2026-03-04 | 5/250 |
|
|
|
[考研] 一志愿東北大學(xué)080500，英一數(shù)二343分求調(diào)劑 +5 | Seele_v5 2026-03-04 | 5/250 |
|
|
|
[考研] 環(huán)境工程專(zhuān)碩307 一志愿211 四六級(jí)已過(guò) 求調(diào)劑 +5 | ccc! 2026-03-03 | 6/300 |
|
|
|
[考研] 材料085600 303求調(diào)劑 +7 | 1bygone 2026-03-04 | 7/350 |
|
|
|
[考研] 化學(xué) 0703求調(diào)劑 總分293 一志愿211 +9 | 土土小蟲(chóng) 2026-03-03 | 11/550 |
|
|
|
[考研] 304求調(diào)劑 +7 | 曼殊2266 2026-02-28 | 8/400 |
|
|
|
[基金申請(qǐng)] 沒(méi)有青基直接申請(qǐng)面上，感覺(jué)自己瘋了 +6 | kevin63t 2026-03-02 | 12/600 |
|
|
|
[考研] 0703化學(xué)調(diào)劑 +4 | G212 2026-03-03 | 5/250 |
|
|
|
[考研] 298求調(diào)劑一志愿中海洋 +3 | lour. 2026-03-03 | 3/150 |
|
|
|
[考研] 1 +5 | 2026計(jì)算機(jī)_誠(chéng)心 2026-03-01 | 8/400 |
|
|
|
[考研] 279求調(diào)劑 +3 | dua1 2026-03-01 | 4/200 |
|
|
|
[考研] 328求調(diào)劑 +3 | aaadim 2026-03-01 | 5/250 |
|