| 查看: 1391 | 回复: 2 | |||
| 【悬赏金币】回答本帖问题，作者lyk199343将赠送您 5 个金币 | |||
[求助]
Fortran使用OpenMP发现并行和串行计算时间一样，程序写错了还是没设置好已有1人参与
|
|||
|
大家好，Fortran小白关于OpenMP并行计算十分困惑求高手教！ 我是4核计算机，按照教程，我在VIF中的项目>属性>language>OPD里都设置了YES。我按照书上的程序写了一个打印“HELLO”的测试程序验证并行环境是否正确。结果是打印出了4个“HELLO”证明正确。 然后编写了一个简单的循环并行程序和串行程序进行计算时间的对比，但是发现两者时间消耗几乎一致，加大计算量后也没有差别。程序图和计算结果图如附件。 请问大牛Fortran的并行计算不能起到节约时间的目的么？还是说我的程序写的有毛病，困惑了好几天了  ！程序内容： program test use omp_lib integer :: i,j,k real m,n,time1,time2,time3,time4 call cpu_time(time1) !$omp do do i=1,1000 do j=1,1000 do k=1,1000 m=k*k end do end do end do !$omp end do call cpu_time(time2) print *,time2-time1 call cpu_time(time3) do i=1,1000 do j=1,1000 do k=1,1000 m=k*k end do end do end do call cpu_time(time4) print *,time4-time3 pause end program 计算结果： 2.589617 2.542816  1539697621.jpg  1539697166(1).jpg |
回复此楼» 猜你喜欢
普通院校药学硕士，做合成的，感觉找不到工作
已经有17人回复
-
如何分离原料与产品
已经有13人回复
-
LWT投
已经有3人回复
-
真的好想读博！
已经有22人回复
-
博士白读了
已经有49人回复
-
基金开始函评了吗？
已经有16人回复
-
没学上
已经有12人回复
-
研二光催化6月底四篇二区什么水平
已经有15人回复
-
环肽的合成
已经有5人回复
-
学硕专硕
已经有5人回复
1014511134
专家顾问 (正式写手)
-
专家经验: +82 - 应助: 102 (高中生)
- 金币: 5130.6
- 散金: 20
- 红花: 16
- 帖子: 421
- 在线: 182.1小时
- 虫号: 3220970
- 注册: 2014-05-20
- 性别: GG
- 专业: 应用地球物理学
- 管辖: 程序语言
2楼2018-10-17 15:45:26
| 顶 |
3楼2018-10-24 10:20:30
5