/usr/lib/petscdir/3.1/include/src/mat/impls/dense/mpi/mpidense.h is in libpetsc3.1-dev 3.1.dfsg-11ubuntu1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 | #include "src/mat/impls/dense/seq/dense.h"
/* Data stuctures for basic parallel dense matrix */
typedef struct {
PetscInt nvec; /* this is the n size for the vector one multiplies with */
Mat A; /* local submatrix */
PetscMPIInt size; /* size of communicator */
PetscMPIInt rank; /* rank of proc in communicator */
/* The following variables are used for matrix assembly */
PetscTruth donotstash; /* Flag indicationg if values should be stashed */
MPI_Request *send_waits; /* array of send requests */
MPI_Request *recv_waits; /* array of receive requests */
PetscInt nsends,nrecvs; /* numbers of sends and receives */
PetscScalar *svalues,*rvalues; /* sending and receiving data */
PetscInt rmax; /* maximum message length */
/* The following variables are used for matrix-vector products */
Vec lvec; /* local vector */
VecScatter Mvctx; /* scatter context for vector */
PetscTruth roworiented; /* if true, row oriented input (default) */
} Mat_MPIDense;
EXTERN PetscErrorCode MatLoad_MPIDense(PetscViewer, const MatType,Mat*);
EXTERN PetscErrorCode MatSetUpMultiply_MPIDense(Mat);
EXTERN PetscErrorCode MatGetSubMatrices_MPIDense(Mat,PetscInt,const IS[],const IS[],MatReuse,Mat *[]);
EXTERN PetscErrorCode MatEqual_MPIDense(Mat,Mat,PetscTruth*);
EXTERN PetscErrorCode MatMatMultSymbolic_MPIDense_MPIDense(Mat,Mat,PetscReal,Mat*);
EXTERN PetscErrorCode MatMatMult_MPIAIJ_MPIDense(Mat,Mat,MatReuse,PetscReal,Mat*);
EXTERN PetscErrorCode MatMatMultSymbolic_MPIAIJ_MPIDense(Mat,Mat,PetscReal,Mat*);
EXTERN PetscErrorCode MatMatMultNumeric_MPIAIJ_MPIDense(Mat,Mat,Mat);
EXTERN PetscErrorCode MatGetFactor_mpidense_petsc(Mat,MatFactorType,Mat *);
|