1*a4963045SJacob Faibussowitsch #pragma once 24b9ad928SBarry Smith 35e5bbd0aSStefano Zampini #include <petsc/private/pcisimpl.h> 44b9ad928SBarry Smith 54b9ad928SBarry Smith /* 64b9ad928SBarry Smith Private context (data structure) for the NN preconditioner. 74b9ad928SBarry Smith */ 84b9ad928SBarry Smith typedef struct { 935cb6cd3SPierre Jolivet /* First MUST come the following line, for the stuff that is common to FETI and Neumann-Neumann. */ 104b9ad928SBarry Smith PC_IS pcis; 112fa5cd67SKarl Rupp 124b9ad928SBarry Smith /* Then, everything else. */ 134b9ad928SBarry Smith Mat coarse_mat; 144b9ad928SBarry Smith Vec coarse_x; 154b9ad928SBarry Smith Vec coarse_b; 164b9ad928SBarry Smith KSP ksp_coarse; 174b9ad928SBarry Smith PetscScalar **DZ_IN; /* proc[k].DZ_IN[i][] = bit of vector to be received from processor i by proc. k */ 184b9ad928SBarry Smith PetscScalar factor_coarse_rhs; 194b9ad928SBarry Smith } PC_NN; 204b9ad928SBarry Smith 215a576424SJed Brown PETSC_EXTERN PetscErrorCode PCNNCreateCoarseMatrix(PC); 225a576424SJed Brown 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); 235a576424SJed Brown 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); 245a576424SJed Brown 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); 25