MPI学习——jacabi迭代(非阻塞通信与重复阻塞通信)

      为了实现计算与通信的最大重叠 一个通用的原则就是 尽早开始通信 尽晚完成通信
在开始通信和完成通信之间进行计算 这样通信启动得越早 完成得越晚 就有可能有更多
的计算任务可以和通信重叠 也使通信可以在计算任务执行期间完成 而不需要专门的等待
时间
      为此 修改Jacobi迭代过程如下
        1 计算迭代任务中下次需要通信的数据
        2 启动非阻塞通信 传递这些数据 转下一次迭代
        3 计算剩余的迭代部分

        4 完成非阻塞通信

#include<mpi.h>
#include<cstdio>
#include<iostream>
#include<algorithm>
#include<cstring>
using namespace std;
const int N = 8;
const int SIZE = N / 4;
const int T = 2;


int main()
{
    double matrix1[SIZE+2][N], matrix[SIZE+2][N];
    int myid;
    MPI_Status status[4];
    MPI_Request request[4];


    MPI_Init(&argc, &argv);
    MPI_Comm_rank(MPI_COMM_WORLD, &myid);


    memset(matrix1, 0, sizeof matrix1);
    memset(matrix2, 0, sizeof matrix2);


    //赋值边界数据
    if(0 == myid)
        for(int j = 0; j < N; j++)
            matrix1[1][j] = matrix[2][j] = N;
    if(3 == myid)
        for(int j = 0; j < N; j++)
            matrix1[SIZE][j] = matrix2[SIZE][j] = N;
    for(int i = 1; i < SIZE+1; i++)
        matrix1[i][0] = matrix1[i][N-1] = matrix2[0] = matrix2[N-1] = N;

      
    //引入虚拟进程简化代码
    int up_proc_id = myid==0 ? MPI_PROC_NULL : myid - 1;
    int down_proc_id = myid==3 ? MPI_PROC_NULL : myid + 1;
    //jacobi迭代
    int t, row
  • 1
    点赞
  • 3
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值