| 查看: 281 | 回复: 0 | ||
[求助]
有关MPI的一个小问题，请求高手指点迷津
|
|
在一个串行程序中，需要把某一模块写成MPI并行的，并且在串行中要循环调用这一模块，请问怎么实现？比如下面这个例子（是错误的） program array implicit none integer :: a(8) call prog111(a) print*, a end subroutine prog111(a) implicit none integer :: a(8) integer :: i do i=1,5 call prog(a) enddo do i=1,8 a(i)=a(i)*a(i)*a(i) enddo end subroutine prog(a) implicit none include 'mpif.h' integer :: ierr,myid,np integer :: a(8) call mpi_init(ierr) call mpi_comm_size(mpi_comm_world,np,ierr) call mpi_comm_rank(mpi_comm_world,myid,ierr) a(1)=myid call mpi_gather(a,1,mpi_integer,a,1,mpi_integer,0,mpi_comm_world,ierr) call mpi_finalize(ierr) end |
回复此楼» 猜你喜欢
存款400万可以在学校里躺平吗
已经有7人回复
-
基金委咋了？2026年的指南还没有出来？
已经有10人回复
-
拟解决的关键科学问题还要不要写
已经有6人回复
-
基金申报
已经有6人回复
-
推荐一本书
已经有13人回复
-
国自然申请面上模板最新2026版出了吗？
已经有17人回复
-
纳米粒子粒径的测量
已经有8人回复
-
疑惑？
已经有5人回复
-
计算机、0854电子信息（085401-058412）调剂
已经有5人回复
-
Materials Today Chemistry审稿周期
已经有5人回复
找到一些相关的精华帖子，希望有用哦~
请ZEMAX高手为小硕指点迷津
已经有3人回复
- 想合成一种物质，用了好多方法都不行，请高手指点迷津。
已经有27人回复
- 有没有朋友做过β-环糊精包结小分子，培养单晶的啊？拜求高手指点迷津啊~~
已经有7人回复
- 关于MS的问题，请高手指点迷津
已经有6人回复
- 求助引物设计方法，请高手帮忙指点迷津。。。万分感谢
已经有4人回复
- 关于摩尔收率的问题 请教各位指点迷津 谢谢！！！
已经有11人回复
- 拍了一个碳纤维板0°拉伸断面图，可是不知道如何分析，求高人指点迷津
已经有8人回复
- 纳米材料方面投稿杂志选择，请求各位前辈指点迷津
已经有9人回复
- 求如何提高黑曲霉纤维素酶活力发酵工艺，请各位微生物高手指点迷津！！！！！！！
已经有9人回复
- 博士找工作遇到问题！请大家指点迷津！急啊！
已经有28人回复
- 【转帖】小试压片没有问题，中试压片硬度上不去，求指点迷津！
已经有7人回复
- 【求助】常压蒸馏出现了点问题，请指点迷津
已经有27人回复
点击这里搜索更多相关资源科研从小木虫开始，人人为我，我为人人