PetscSolverGlobalBlockMatrix.h 2.32 KB
Newer Older
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 35 36
// ============================================================================
// ==                                                                        ==
// == AMDiS - Adaptive multidimensional simulations                          ==
// ==                                                                        ==
// ==  http://www.amdis-fem.org                                              ==
// ==                                                                        ==
// ============================================================================
//
// Software License for AMDiS
//
// Copyright (c) 2010 Dresden University of Technology 
// All rights reserved.
// Authors: Simon Vey, Thomas Witkowski et al.
//
// This file is part of AMDiS
//
// See also license.opensource.txt in the distribution.



/** \file PetscSolverGlobalBlockMatrix.h */

#ifndef AMDIS_PETSC_SOLVER_GLOBAL_BLOCK_MATRIX_H
#define AMDIS_PETSC_SOLVER_GLOBAL_BLOCK_MATRIX_H

#include "AMDiS_fwd.h"
#include "parallel/PetscSolver.h"

namespace AMDiS {

  using namespace std;


  class PetscSolverGlobalBlockMatrix : public PetscSolver
  {
  public:
37 38
    PetscSolverGlobalBlockMatrix(string name)
      : PetscSolver(name),
39 40
	nComponents(0),
	nBlocks(-1)
41 42 43 44 45 46
    {}

    void fillPetscMatrix(Matrix<DOFMatrix*> *mat);

    void fillPetscRhs(SystemVector *vec);

47
    void solvePetscMatrix(SystemVector &vec, AdaptInfo *adaptInfo);    
48 49 50

    void destroyMatrixData();

51 52
    void destroyVectorData();

53 54
  protected:
    /// Takes a DOF matrix and sends the values to the global PETSc matrix.
55 56
    void setDofMatrix(Mat& petscMat, DOFMatrix* mat,
		      int dispRowBlock, int dispColBlock);
57 58

    /// Takes a DOF vector and sends its values to a given PETSc vector.
59 60
    void setDofVector(Vec& petscVec, DOFVector<double>* vec);

61
    virtual void initSolver(KSP &ksp);
62
    
63
    virtual void exitSolver(KSP ksp);
64

65 66 67 68
    virtual void initPreconditioner(PC pc);

    virtual void exitPreconditioner(PC pc);
   
69
  protected:
70 71 72
    vector<Mat> nestMat;

    vector<Vec> nestVec;
73

74 75
    Vec petscSolVec;

76
    /// Number of components (= number of unknowns in the PDE)
77
    int nComponents;
78 79 80 81 82 83

    /// Number of blocks for the solver, must be 1 <= nBlocks <= nComponents
    int nBlocks;

    /// Maps to each component number the block number the component is in.
    map<int, int> componentInBlock;
84 85 86 87 88 89 90
  };


}

#endif