版块导航: 正在加载中...

登录注册

应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜

返回列表

appleft93

新虫 (初入文坛)

应助: 0 (幼儿园)
金币: 15.5
散金: 13
红花: 1
帖子: 28
在线: 9.8小时
虫号: 4549664
注册: 2016-03-28
性别: GG
专业: 流体力学

[求助] fortran程序采用openMP并行问题已有1人参与

各位大神，初学fortran openMP并行，有个关于!$OMP SECTIONS 的小问题。
程序结构如下

program TestOpenMP
(此处变量声明略去)
call cpu_time(start)  ！记录开始时间

!$OMP PARALLEL
!$OMP SECTIONS
!$OMP SECTION
   call aaa
!$OMP SECTION
   call aaa
!$OMP END SECTIONS NOWAIT
!$OMP END PARALLEL

call cpu_time(finish)

write(*,*)'time = ',finish-start
pause
end program TestOpenMP

subroutine aaa
......
return
end

其中 subroutine aaa程序执行时间较长（串行执行一次大概35s），于是我就想用两个线程同时执行这个，这样的话时间可以大概减少一半。但是测试发现，串行执行两次aaa和并行执行的时间是差不多的，，并且并行时间反而会长0.2s左右。

请教一下这是怎么回事呢？我是初学者不太懂，看了一些资料自己写了一下这个程序。请大神指导！

回复此楼

» 猜你喜欢

2026年循环经济功能材料国际会议（ICFMCE 2026）已经有0人回复
2026年第五届电气、电子与信息工程国际会议（ISEEIE 2026）已经有0人回复
物理学I论文润色/翻译怎么收费? 已经有89人回复
哈尔滨理工大学物理系招收物理学考研调剂已经有5人回复
0702一志愿吉大B区求调剂已经有5人回复
求调剂已经有0人回复
0702一志愿吉大B区求调剂有论文已经有0人回复
请问还有没有用Latex写文章的小伙伴们？已经有0人回复
光学工程学硕调剂信息已经有26人回复
欢迎加入课题组已经有0人回复
散金币，求好运，祝面上顺利！已经有34人回复

1楼 2017-07-18 00:21:59

已阅回复此楼关注TA 给TA发消息送TA红花 TA的回帖

cntsinghua

银虫 (初入文坛)

应助: 1 (幼儿园)
金币: 198.3
红花: 1
帖子: 20
在线: 23.3小时
虫号: 2032954
注册: 2012-09-27
专业: 钢铁冶金

【答案】应助回帖

(1)你这种写法是subroutine aaa被两个线程分别执行一次，即subroutine aaa被执行两遍。
(2)并行是需要时间开销的，因此并行时间反而会长0.2s左右。
(3)如果希望subroutine aaa被两个线程并行。如果是循环结构，建议使用指令parallel for。如果不是循环结构，须手工进行任务分解，然后用指令task解决。
(4) 建议借阅参考书
雷洪, 胡许冰. 多核并行高性能计算OpenMP. 北京: 冶金工业出版社. 2016年, ISBN: 978-7-5024-7249-8

赞一下