| 查看: 587 | 回复: 0 | ||
| 【悬赏金币】回答本帖问题,作者fo3mt2将赠送您 20 个金币 | ||
fo3mt2金虫 (小有名气)
|
[求助]
三层嵌套循环的并行问题
|
|
|
大家好, 我想向大家请教一个问题。对于三层嵌套循环的fortran程序要如何用mpi技术并行呢?比如下面这段代码,变量arr是一个三维数组,我想对它的每一维度都分别各自并行,并将该数组里的每个元素,通过计算后加和,最后收集到collect变量里。 能否请大家帮我修改下这段代码,把它变成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 |
» 猜你喜欢
中国科学院东莞材料科学与技术研究所-2026年博士招生-吴昊研究员-磁学与自旋电子学
已经有0人回复
《电磁学》教材推荐
已经有1人回复
物理学I论文润色/翻译怎么收费?
已经有256人回复
【急招】合肥工大核聚变材料计算方向2026级工程博士生
已经有4人回复
大豆异黄酮分离
已经有0人回复
湖南大学材料学院急招2026年博士生,临时增加一名博士联培指标
已经有10人回复
天津理工大学晶体材料全国重点实验室刘红军教授课题组招收博士生1-2名
已经有1人回复
中国科学院物理研究所谌志国研究员团队招收2027年博士研究生
已经有3人回复
2026年中德博士后交流项目 - 新型量子和磁性材料:材料制备表征和中子散射研究
已经有12人回复












回复此楼