PCTwoLevelsBlockDiagonal.hpp

00001 /*
00002 
00003 Copyright (C) University of Oxford, 2005-2010
00004 
00005 University of Oxford means the Chancellor, Masters and Scholars of the
00006 University of Oxford, having an administrative office at Wellington
00007 Square, Oxford OX1 2JD, UK.
00008 
00009 This file is part of Chaste.
00010 
00011 Chaste is free software: you can redistribute it and/or modify it
00012 under the terms of the GNU Lesser General Public License as published
00013 by the Free Software Foundation, either version 2.1 of the License, or
00014 (at your option) any later version.
00015 
00016 Chaste is distributed in the hope that it will be useful, but WITHOUT
00017 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
00018 FITNESS FOR A PARTICULAR PURPOSE.  See the GNU Lesser General Public
00019 License for more details. The offer of Chaste under the terms of the
00020 License is subject to the License being interpreted in accordance with
00021 English Law and subject to any action against the University of Oxford
00022 being under the jurisdiction of the English Courts.
00023 
00024 You should have received a copy of the GNU Lesser General Public License
00025 along with Chaste. If not, see <http://www.gnu.org/licenses/>.
00026 
00027 */
00028 
00029 
00030 #ifndef PCTWOLEVELSBLOCKDIAGONAL_HPP_
00031 #define PCTWOLEVELSBLOCKDIAGONAL_HPP_
00032 
00033 #include <cassert>
00034 #include <petscvec.h>
00035 #include <petscmat.h>
00036 #include <petscksp.h>
00037 #include <petscpc.h>
00038 #include "PetscTools.hpp"
00039 
00050 #if (PETSC_VERSION_MAJOR == 3 && PETSC_VERSION_MINOR == 1) //PETSc 3.1
00051 PetscErrorCode PCTwoLevelsBlockDiagonalApply(PC pc_context, Vec x, Vec y);
00052 #else
00053 PetscErrorCode PCTwoLevelsBlockDiagonalApply(void* pc_context, Vec x, Vec y);
00054 #endif
00055 
00057 
00080 class PCTwoLevelsBlockDiagonal
00081 {
00082 public:
00086     typedef struct{
00087         Mat A11_matrix_subblock; 
00088         Mat A22_B1_matrix_subblock; 
00089         Mat A22_B2_matrix_subblock; 
00090         PC  PC_amg_A11; 
00091         PC  PC_amg_A22_B1; 
00092         PC  PC_amg_A22_B2; 
00093         Vec x1_subvector;
00094         Vec x21_subvector;
00095         Vec x22_subvector;
00096         Vec y1_subvector;
00097         Vec y21_subvector;
00098         Vec y22_subvector;
00099         VecScatter A11_scatter_ctx;
00100         VecScatter A22_B1_scatter_ctx;
00101         VecScatter A22_B2_scatter_ctx;
00103     } PCTwoLevelsBlockDiagonalContext;
00104 
00105     PCTwoLevelsBlockDiagonalContext mPCContext; 
00106     PC mPetscPCObject;
00108 public:
00109 
00116     PCTwoLevelsBlockDiagonal(KSP& rKspObject, std::vector<PetscInt>& rBathNodes);
00117 
00118     ~PCTwoLevelsBlockDiagonal();
00119 
00120 private:
00127     void PCTwoLevelsBlockDiagonalCreate(KSP& rKspObject, std::vector<PetscInt>& rBathNodes);
00128 
00132     void PCTwoLevelsBlockDiagonalSetUp();
00133 };
00134 #endif /*PCTWOLEVELSBLOCKDIAGONAL_HPP_*/

Generated on Mon Nov 1 12:35:17 2010 for Chaste by  doxygen 1.5.5