12eac72dbSBarry Smith /* 22eac72dbSBarry Smith Include file for the matrix component of PETSc 32eac72dbSBarry Smith */ 41eb62cbbSBarry Smith #ifndef __MAT_PACKAGE 51eb62cbbSBarry Smith #define __MAT_PACKAGE 68ed539a5SBarry Smith #include "vec.h" 72eac72dbSBarry Smith 8*9cd28387SBarry Smith #define MAT_COOKIE PETSC_COOKIE+5 9f0479e8cSBarry Smith 102eac72dbSBarry Smith typedef struct _Mat* Mat; 112eac72dbSBarry Smith typedef struct _MatScatterCtx* MatScatterCtx; 122eac72dbSBarry Smith 132eac72dbSBarry Smith 14*9cd28387SBarry Smith #define MATDENSESEQ 0 15*9cd28387SBarry Smith #define MATAIJSEQ 1 16*9cd28387SBarry Smith #define MATAIJMPI 2 17*9cd28387SBarry Smith #define MATSHELL 3 1828988994SBarry Smith 198ed539a5SBarry Smith extern int MatCreateSequentialDense(int,int,Mat*); 20aabeff55SBarry Smith extern int MatCreateSequentialAIJ(int,int,int,int *,Mat*); 219717bf64SBarry Smith extern int MatCreateMPIAIJ(MPI_Comm,int,int,int,int,int,int*,int,int*,Mat*); 229717bf64SBarry Smith 23aabeff55SBarry Smith extern int MatShellCreate(int,int,void *,Mat*); 24aabeff55SBarry Smith extern int MatShellSetMult(Mat,int (*)(void*,Vec,Vec)); 25aabeff55SBarry Smith extern int MatShellSetMultTrans(Mat,int (*)(void*,Vec,Vec)); 26f0479e8cSBarry Smith extern int MatShellSetMultTransAdd(Mat,int (*)(void*,Vec,Vec,Vec)); 272eac72dbSBarry Smith 288ed539a5SBarry Smith /* ------------------------------------------------------------*/ 298ed539a5SBarry Smith extern int MatValidMatrix(Mat); 302eac72dbSBarry Smith 3120563c6bSBarry Smith extern int MatSetValues(Mat,int,int*,int,int*,Scalar*,InsertMode); 328ed539a5SBarry Smith extern int MatBeginAssembly(Mat); 338ed539a5SBarry Smith extern int MatEndAssembly(Mat); 3420563c6bSBarry Smith extern int MatSetOption(Mat,int); 358ed539a5SBarry Smith #define ROW_ORIENTED 1 368ed539a5SBarry Smith #define COLUMN_ORIENTED 2 3720563c6bSBarry Smith #define ROWS_SORTED 4 3820563c6bSBarry Smith #define COLUMNS_SORTED 8 3920563c6bSBarry Smith #define NO_NEW_NONZERO_LOCATIONS 16 4020563c6bSBarry Smith #define YES_NEW_NONZERO_LOCATIONS 32 412eac72dbSBarry Smith 428ed539a5SBarry Smith extern int MatGetValues(Mat,Scalar*,int,int*,int,int*); 438ed539a5SBarry Smith extern int MatGetRow(Mat,int,int *,int **,Scalar**); 448ed539a5SBarry Smith extern int MatRestoreRow(Mat,int,int *,int **,Scalar**); 458ed539a5SBarry Smith extern int MatGetCol(Mat,int,int *,int **,Scalar**); 468ed539a5SBarry Smith extern int MatRestoreCol(Mat,int,int *,int **,Scalar**); 472eac72dbSBarry Smith 488ed539a5SBarry Smith extern int MatMult(Mat,Vec,Vec); 498ed539a5SBarry Smith extern int MatMultAdd(Mat,Vec,Vec,Vec); 508ed539a5SBarry Smith extern int MatMultTrans(Mat,Vec,Vec); 518ed539a5SBarry Smith extern int MatMultTransAdd(Mat,Vec,Vec,Vec); 522eac72dbSBarry Smith 538ed539a5SBarry Smith #define ORDER_NATURAL 0 548ed539a5SBarry Smith #define ORDER_ND 1 558ed539a5SBarry Smith #define ORDER_1WD 2 568ed539a5SBarry Smith #define ORDER_RCM 3 578ed539a5SBarry Smith #define ORDER_QMD 4 588ed539a5SBarry Smith extern int MatGetReordering(Mat,int,IS*,IS*); 592eac72dbSBarry Smith 608ed539a5SBarry Smith extern int MatLUFactor(Mat,IS,IS); 618ed539a5SBarry Smith extern int MatCholeskyFactor(Mat,IS); 628ed539a5SBarry Smith extern int MatLUFactorSymbolic(Mat,IS,IS,Mat*); 63da3a660dSBarry Smith extern int MatILUFactorSymbolic(Mat,IS,IS,int,Mat*); 648ed539a5SBarry Smith extern int MatCholeskyFactorSymbolic(Mat,IS,Mat*); 65da3a660dSBarry Smith extern int MatIncompleteCholeskyFactorSymbolic(Mat,IS,int,Mat*); 6620563c6bSBarry Smith extern int MatLUFactorNumeric(Mat,Mat*); 6720563c6bSBarry Smith extern int MatCholeskyFactorNumeric(Mat,Mat*); 688ed539a5SBarry Smith 698ed539a5SBarry Smith extern int MatSolve(Mat,Vec,Vec); 708ed539a5SBarry Smith extern int MatSolveAdd(Mat,Vec,Vec,Vec); 7128988994SBarry Smith extern int MatSolveTrans(Mat,Vec,Vec); 7228988994SBarry Smith extern int MatSolveTransAdd(Mat,Vec,Vec,Vec); 738ed539a5SBarry Smith 748ed539a5SBarry Smith #define SOR_FORWARD_SWEEP 1 758ed539a5SBarry Smith #define SOR_BACKWARD_SWEEP 2 768ed539a5SBarry Smith #define SOR_SYMMETRIC_SWEEP 3 77d6dfbf8fSBarry Smith #define SOR_LOCAL_FORWARD_SWEEP 4 78d6dfbf8fSBarry Smith #define SOR_LOCAL_BACKWARD_SWEEP 8 79d6dfbf8fSBarry Smith #define SOR_LOCAL_SYMMETRIC_SWEEP 12 80d6dfbf8fSBarry Smith #define SOR_ZERO_INITIAL_GUESS 16 81da3a660dSBarry Smith #define SOR_EISENSTAT 32 82*9cd28387SBarry Smith #define SOR_APPLY_UPPER 64 83*9cd28387SBarry Smith #define SOR_APPLY_LOWER 128 84d6dfbf8fSBarry Smith extern int MatRelax(Mat,Vec,double,int,double,int,Vec); 858ed539a5SBarry Smith 868ed539a5SBarry Smith extern int MatCopy(Mat,Mat*); 878ed539a5SBarry Smith extern int MatView(Mat,Viewer); 888ed539a5SBarry Smith #include <stdio.h> 898ed539a5SBarry Smith extern int MatPrintMatlab(Mat,FILE*,char *); 908ed539a5SBarry Smith extern int MatNonZeros(Mat,int*); 918ed539a5SBarry Smith extern int MatMemoryUsed(Mat,int*); 928ed539a5SBarry Smith extern int MatGetDiagonal(Mat,Vec); 938ed539a5SBarry Smith extern int MatTranspose(Mat); 948ed539a5SBarry Smith extern int MatScale(Mat,Vec,Vec); 958ed539a5SBarry Smith extern int MatShrink(Mat,int,int*,int,int*); 968ed539a5SBarry Smith extern int MatEqual(Mat,Mat); 9720563c6bSBarry Smith extern int MatScatterBegin(Mat,IS,IS,Mat,IS,IS,InsertMode,MatScatterCtx*); 9820563c6bSBarry Smith extern int MatScatterEnd(Mat,IS,IS,Mat,IS,IS,InsertMode,MatScatterCtx*); 998ed539a5SBarry Smith extern int MatReOrder(Mat,IS,IS); 1002eac72dbSBarry Smith 1012eac72dbSBarry Smith #define NORM_1 1 1022eac72dbSBarry Smith #define NORM_2 2 1032eac72dbSBarry Smith #define NORM_FROBENIUS 3 1042eac72dbSBarry Smith #define NORM_INFINITY 4 1058ed539a5SBarry Smith extern int MatNorm(Mat,int,double *); 1062eac72dbSBarry Smith 1078ed539a5SBarry Smith extern int MatZeroEntries(Mat); 10820563c6bSBarry Smith extern int MatZeroRows(Mat,IS,Scalar*); 10920563c6bSBarry Smith extern int MatZeroColumns(Mat,IS,Scalar*); 1108ed539a5SBarry Smith 1118ed539a5SBarry Smith extern int MatCompress(Mat); 1128ed539a5SBarry Smith extern int MatDestroy(Mat); 1138ed539a5SBarry Smith 1141eb62cbbSBarry Smith extern int MatGetSize(Mat,int*,int*); 1151eb62cbbSBarry Smith extern int MatGetLocalSize(Mat,int*,int*); 116d6dfbf8fSBarry Smith extern int MatGetOwnershipRange(Mat,int*,int*); 1171eb62cbbSBarry Smith 1188ed539a5SBarry Smith extern int MatCreateInitialMatrix(int,int,Mat*); 1198ed539a5SBarry Smith 1208ed539a5SBarry Smith 1218ed539a5SBarry Smith 1221eb62cbbSBarry Smith 1232eac72dbSBarry Smith #endif 1242eac72dbSBarry Smith 1252eac72dbSBarry Smith 126