 |
 |
 |
 |
 |
 |
||
 |
 |
 |
 |
 |
小木蟲論壇-學術科研互動平臺 » 計算模擬區(qū) » 程序語言 » Fortran » OpenMP 并行效率沒有
| 3 | 1/1 | 返回列表 |
| 查看: 1564 | 回復: 2 | |||
[交流]
OpenMP 并行效率沒有 已有1人參與
|
|
有簡單程序并行，但沒有效率，程序結(jié)構(gòu)很簡單，請各位大神幫忙看看： PROGRAM parallel_01 USE omp_lib IMPLICIT NONE INTEGER :: i,j,ii REAL, DIMENSION(1:20000000) :: f, g REAL :: k,t1,t2,time CALL omp_set_num_threads(4) k = 0 t1=omp_get_wtime() do ii=1,1000 !這層循環(huán)是為了使計算時間長一點，方便觀察并行時間 !$omp parallel private(k,i) !$omp do DO i = 1, 20000000 f(i) = g(i)+1 k = k + 1 END DO !$omp end do !$omp end parallel !$omp parallel private(k,j) !$omp do DO j = 1, 20000000 g(j) =f(j)+1 k = k + 1 END DO !$omp end do !$omp end parallel enddo !end of ii=1,1000 t2=omp_get_wtime() print*,"cost time:",t2-t1 END PROGRAM 計算機配置為4核的，分別調(diào)用2,3,4核，輸出時間幾乎一樣，沒有并行效率，急求大神指點!!! |
回復此樓» 猜你喜歡
求調(diào)劑
已經(jīng)有7人回復
-
275求調(diào)劑
已經(jīng)有6人回復
-
招08考數(shù)學
已經(jīng)有7人回復
-
303求調(diào)劑
已經(jīng)有6人回復
-
306求調(diào)劑
已經(jīng)有4人回復
-
求調(diào)劑
已經(jīng)有7人回復
-
考研調(diào)劑
已經(jīng)有4人回復
-
285求調(diào)劑
已經(jīng)有6人回復
-
一志愿北京化工大學070300 學碩336求調(diào)劑
已經(jīng)有7人回復
-
318求調(diào)劑
已經(jīng)有6人回復
» 本主題相關價值貼推薦，對您同樣有幫助:
- Gaussian 軟件的并行效率
已經(jīng)有8人回復
- 請問單機裝VASP，裝并行好還是串行好？
已經(jīng)有15人回復
- CPMD 3.17.1 新版更新與與ubuntu + gcc4.6 + openmpi并行編譯
已經(jīng)有3人回復
- 求助：openmp 單節(jié)點多核并行效率問題
已經(jīng)有4人回復
- 并行計算沒有輸出？怎么回事
已經(jīng)有16人回復
- 單機多核一個cpu的串行并行求助
已經(jīng)有26人回復
- Openmp效率的問題
已經(jīng)有3人回復
- 32-bit Windows系統(tǒng)的elk-openmp并行版
已經(jīng)有24人回復
- 并行編譯vasp出錯，make: *** 沒有規(guī)則可以創(chuàng)建“vasp”需要的目標“xml.o”。 停止
已經(jīng)有12人回復
- 有沒有人關注fortran語言的GPU并行呢？
已經(jīng)有12人回復
- 【求助】安裝mpich2時如何產(chǎn)生mpicc及mpifort
已經(jīng)有9人回復
- 【討論】大家對未來GPU在monte carlo中的應用持有什么樣的態(tài)度(CUDA)？
已經(jīng)有15人回復
- 【求助】有關fortran進行數(shù)值模擬
已經(jīng)有10人回復
| 頂一下 |
2樓2014-05-15 10:28:10
songseunghun
鐵桿木蟲 (小有名氣)
- 應助: 2 (幼兒園)
- 金幣: 8132.6
- 紅花: 2
- 帖子: 294
- 在線: 118.1小時
- 蟲號: 544742
- 注冊: 2008-04-13
- 性別: MM
- 專業(yè): 結(jié)構(gòu)工程
3樓2014-05-17 09:50:42
相關版塊跳轉(zhuǎn)
我要訂閱樓主 whpwan 的主題更新
| 3 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 384求調(diào)劑 +3 | 子系博 2026-03-22 | 4/200 |
|
|---|---|---|---|---|
|
[考研] 初試 317 +7 | 半拉月丙 2026-03-20 | 7/350 |
|
|
|
[考研] 求調(diào)劑 +3 | .m.. 2026-03-21 | 4/200 |
|
|
|
[考研] 一志愿西南交大，求調(diào)劑 +5 | 材化逐夢人 2026-03-18 | 5/250 |
|
|
|
[考研] 材料專業(yè)求調(diào)劑 +6 | hanamiko 2026-03-18 | 6/300 |
|
|
|
[考研] 330求調(diào)劑 +4 | 小材化本科 2026-03-18 | 4/200 |
|
|
|
[考研] 085600材料與化工 +8 | 安全上岸！ 2026-03-16 | 8/400 |
|
|
|
[考研] 求調(diào)劑一志愿南京航空航天大學289分 +3 | @taotao 2026-03-19 | 3/150 |
|
|
|
[考研] A區(qū)線材料學調(diào)劑 +5 | 周周無極 2026-03-20 | 5/250 |
|
|
|
[考研] 一志愿武理材料工程348求調(diào)劑 +3 | ￣^￣゜汗 2026-03-19 | 4/200 |
|
|
|
[考研] 一志愿吉林大學材料學碩321求調(diào)劑 +11 | Ymlll 2026-03-18 | 15/750 |
|
|
|
[考研] 材料與化工專碩調(diào)劑 +7 | heming3743 2026-03-16 | 7/350 |
|
|
|
[考研] 廣西大學家禽遺傳育種課題組2026年碩士招生（接收計算機專業(yè)調(diào)劑） +3 | 123阿標 2026-03-17 | 3/150 |
|
|
|
[考研] 生物學調(diào)劑招人！�。� +3 | 山海天嵐 2026-03-17 | 4/200 |
|
|
|
[考研] 0703化學調(diào)劑 +4 | 18889395102 2026-03-18 | 4/200 |
|
|
|
[考研] 085601材料工程專碩求調(diào)劑 +10 | 慕寒mio 2026-03-16 | 10/500 |
|
|
|
[考研] 收復試調(diào)劑生 +4 | 雨后秋荷 2026-03-18 | 4/200 |
|
|
|
[考研]
 0854，計算機類招收調(diào)劑
+3
|
胡辣湯放糖 2026-03-15 | 6/300 |
|
|
|
[考博] 26博士申請 +3 | 1042136743 2026-03-17 | 3/150 |
|
|
|
[考研] 318求調(diào)劑 +3 | Yanyali 2026-03-15 | 3/150 |
|