24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 849  |  回复: 1

appleft93

新虫 (初入文坛)

[求助] 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左右。

请教一下这是怎么回事呢?我是初学者 不太懂,看了一些资料自己写了一下这个程序。请大神指导!
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

cntsinghua

银虫 (初入文坛)

【答案】应助回帖

(1)你这种写法是subroutine aaa被两个线程分别执行一次,即subroutine aaa被执行两遍。
(2)并行是需要时间开销的,因此并行时间反而会长0.2s左右。
(3)如果希望subroutine aaa被两个线程并行。如果是循环结构,建议使用指令parallel for。如果不是循环结构,须手工进行任务分解,然后用指令task解决。
(4) 建议借阅参考书
雷洪, 胡许冰. 多核并行高性能计算OpenMP. 北京: 冶金工业出版社. 2016年, ISBN: 978-7-5024-7249-8
2楼2018-02-09 10:15:37
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 appleft93 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 一志愿北京2,材料与化工308求调剂 +16 熊二想上岸 2026-04-04 17/850 2026-04-07 14:58 by BruceLiu320
[考研] 305分求调剂 +3 哈_哈_哈_哈_哈 2026-04-04 5/250 2026-04-07 14:49 by 哈_哈_哈_哈_哈
[考研] 材料调剂 +7 汉123456 2026-04-07 8/400 2026-04-07 13:16 by graphene-
[考研] 0703调剂 +16 拾玖壹 2026-04-04 18/900 2026-04-07 12:49 by flydream1314
[考研] 22408 一志愿双一流人工智能300分 四六级,数据分析国奖 +4 zzfeng123 2026-04-06 5/250 2026-04-07 09:46 by chongya
[考研] 280求调剂 +6 李rien 2026-04-04 6/300 2026-04-07 08:34 by xihu1109
[考研] 385分 生物学(071000)求调剂 +12 qf626 2026-04-01 12/600 2026-04-06 17:36 by 52305043001
[考研] 269电子信息求调剂,可转专业 +5 独酌wl 2026-04-06 5/250 2026-04-06 17:23 by 土木硕士招生
[考研] 338求调剂 +4 wxygxsaaaaa 2026-04-06 4/200 2026-04-06 17:14 by 尚水阁主
[考研] 301求调剂 +7 细胞相关蛋白 2026-04-03 7/350 2026-04-06 11:47 by lijunpoly
[考研] 一志愿211生物学280分 求调剂 +5 李rien 2026-04-05 5/250 2026-04-06 10:30 by zhyzzh
[考研] 0817化学工程与技术求调剂,一志愿中海洋319 +14 lv945 2026-04-04 14/700 2026-04-06 10:20 by 蓝云思雨
[考研] 307分材料专业求调剂 +7 Hll胡 2026-04-05 7/350 2026-04-05 18:47 by 无际的草原
[考研] 291求调剂 +4 迷蒙木木 2026-04-01 5/250 2026-04-04 15:59 by sihailian3
[考研] 调剂0855-288 +5 x熊二a 2026-04-03 5/250 2026-04-04 00:19 by 猪会飞
[考研] 336求调剂 +8 kiyy 2026-04-01 8/400 2026-04-03 19:41 by lijunpoly
[考研] 一志愿安徽大学0817化学工程与技术,求调剂 +14 我不是只因 2026-04-02 15/750 2026-04-03 09:49 by 蓝云思雨
[考研] 283求调剂 +3 jiouuu 2026-04-02 4/200 2026-04-02 14:08 by 哒哒哒呱呱呱
[考研] 324求调剂 +5 想上学求调 2026-04-01 6/300 2026-04-02 10:16 by sanrepian
[考研] 267求调剂 +13 uiybh 2026-03-31 13/650 2026-04-01 10:25 by 探123
信息提示
请填处理意见