并行计算论文

代码#include"stdio.h"#include"stdlib.h"#include"mpi.h"#include"math.h"#defineE0.001#definea(x,y)a[x*size+y]#defineb(x)b[x]#definev(x)v[x]#defineA(x,y)A[x*size+y]#defineB(x)B[x]#defineV(x)V[x]#defineintsizesizeof(int)#definefloatsizesizeof(float)#definecharsizesizeof(char)intsize,N;intm;float*B;float*A;float*V;doublestarttime;doubletime1;doubletime2;intmy_rank;intp;MPI_Statusstatus;FILE*fdA,*fdB,*fdB1;voidEnvironment_Finalize(float*a,float*b,float*v){free(a);free(b);free(v);}intmain(intargc,char**argv){inti,j,my_rank,group_size;intk;float*sum;float*b;float*v;float*a;float*differ;floattemp,w;intiteration,total,loop;intr,q;loop=0;total=0;w=0.9;MPI_Init(&argc,&argv);m_size(M_WORLD,&group_size);m_rank(M_WORLD,&my_rank);p=group_size;if(my_rank==0){starttime=MPI_Wtime();fdA=fopen("dataIn.txt","r");