上传者: rrrrrrmmmmmm
|
上传时间: 2021-12-18 11:20:47
|
文件大小: 8KB
|
文件类型: -
#include
#include
#include
#include
#include
struct MatElement{
int col, row;
double value;
};
struct MatComplex{
int col, row;
double real, imag;
};
void main(int argc, char** argv)
{
int nMyRank;
int nCommSize;
const double CONV_MIN = 1.0e-3; //The convergence value
const double MIN = 1.0e-9;
bool failed=false;
MPI_Init(&argc, &argv);
MPI_Comm_rank(MPI_COMM_WORLD, &nMyRank);
MPI_Comm_size(MPI_COMM_WORLD, &nCommSize);
MatComplex *mtxA;
MatElement *mtxM;
double *b;