Actual source code: nn.h

petsc-3.8.4 2018-03-24
Report Typos and Errors


  5:  #include <../src/ksp/pc/impls/is/pcis.h>

  7: /*
  8:    Private context (data structure) for the NN preconditioner.
  9: */
 10: typedef struct {
 11:   /* First MUST come the folowing line, for the stuff that is common to FETI and Neumann-Neumann. */
 12:   PC_IS pcis;

 14:   /* Then, everything else. */
 15:   Mat         coarse_mat;
 16:   Vec         coarse_x;
 17:   Vec         coarse_b;
 18:   KSP         ksp_coarse;
 19:   PetscScalar **DZ_IN;            /* proc[k].DZ_IN[i][] = bit of vector to be received from processor i by proc. k  */
 20:   PetscScalar factor_coarse_rhs;
 21: } PC_NN;

 23: PETSC_EXTERN PetscErrorCode PCNNCreateCoarseMatrix (PC);
 24: PETSC_EXTERN PetscErrorCode PCNNApplySchurToChunk(PC pc,PetscInt n,PetscInt *idx,PetscScalar *chunk,PetscScalar * array_N,Vec vec1_B,Vec vec2_B,Vec vec1_D,Vec vec2_D);
 25: PETSC_EXTERN PetscErrorCode PCNNApplyInterfacePreconditioner(PC pc,Vec r,Vec z,PetscScalar *work_N,Vec vec1_B,Vec vec2_B,Vec vec3_B,Vec vec1_D,Vec vec2_D,Vec vec1_N,Vec vec2_N);
 26: PETSC_EXTERN PetscErrorCode PCNNBalancing(PC pc,Vec r,Vec u,Vec z,Vec vec1_B,Vec vec2_B,Vec vec3_B,Vec vec1_D,Vec vec2_D,PetscScalar *work_N);

 28: #endif /* __pcnn_h */