---

NodePoissonOp.H

Go to the documentation of this file.

/*  _______              __
   / ___/ /  ___  __ _  / /  ___
  / /__/ _ \/ _ \/  ' \/ _ \/ _ \
  \___/_//_/\___/_/_/_/_.__/\___/ 
*/
//
// This software is copyright (C) by the Lawrence Berkeley
// National Laboratory.  Permission is granted to reproduce
// this software for non-commercial purposes provided that
// this notice is left intact.
// 
// It is acknowledged that the U.S. Government has rights to
// this software under Contract DE-AC03-765F00098 between
// the U.S.  Department of Energy and the University of
// California.
//
// This software is provided as a professional and academic
// contribution for joint exchange. Thus it is experimental,
// is provided ``as is'', with no warranties of any kind
// whatsoever, no support, no promise of updates, or printed
// documentation. By using this software, you acknowledge
// that the Lawrence Berkeley National Laboratory and
// Regents of the University of California shall have no
// liability with respect to the infringement of other
// copyrights by any part of this software.
//

// NodePoissonOp.H
// adapted from PoissonOp by DTGraves, Weds, July 21, 1999
// petermc, Tue, Dec 12, 2000
#ifndef NODEPOISSONOP_H
#define NODEPOISSONOP_H

#include "NodeLevelOp.H"
#include <cmath>
#include <cstdlib>
#include "BaseFab.H"
#include "NodeCFIVS.H"
#include "NodeBC.H"
#include "NodeQuadCFInterp.H"
#include "NodeBaseBottomSmoother.H"
#include "LoHiSide.H"

class NodePoissonOp: public NodeLevelOp
{
public:




  NodePoissonOp();


  virtual NodeLevelOp* new_levelop() const;



  ~NodePoissonOp();


  void define(const DisjointBoxLayout& a_grids,
              const DisjointBoxLayout* a_gridsCoarsePtr,
              Real  a_dx, 
              int a_refToCoarse,
              const ProblemDomain& a_domain,
              bool a_homogeneousOnly=false,
              int a_ncomp = 1);

  void define(const DisjointBoxLayout& a_grids,
              const DisjointBoxLayout* a_gridsCoarsePtr,
              Real  a_dx, 
              int a_refToCoarse,
              const Box& a_domain,
              bool a_homogeneousOnly=false,
              int a_ncomp = 1);


  void define(const NodeLevelOp* a_opfine,
              int a_refToFine);

              

  virtual bool isDefined() const;


  // /** set max number of bottomSmoother iterations
  // */
  // void setMaxIter(int a_maxIter);


  void setBottomSmoother(const NodeBaseBottomSmoother& a_bottomSmoother);



  void CFInterp(LevelData<NodeFArrayBox>& a_phi,
                const LevelData<NodeFArrayBox>& a_phiCoarse,
                bool a_inhomogeneous);



  void homogeneousCFInterp(LevelData<NodeFArrayBox>& a_phi);


  void smooth(LevelData<NodeFArrayBox>& a_phi,
              const LevelData<NodeFArrayBox>& a_rhs);



  void applyOpI(LevelData<NodeFArrayBox>& a_LofPhi,
                LevelData<NodeFArrayBox>& a_phi,
                const LevelData<NodeFArrayBox>* a_phiCoarsePtr);
  


  void applyOpH(LevelData<NodeFArrayBox>& a_LofPhi,
                LevelData<NodeFArrayBox>& a_phi);



  void applyOpIcfHphys(LevelData<NodeFArrayBox>& a_LofPhi,
                       LevelData<NodeFArrayBox>& a_phi,
                       const LevelData<NodeFArrayBox>* a_phiCoarsePtr);
  

  void applyOpHcfIphys(LevelData<NodeFArrayBox>& a_LofPhi,
                       LevelData<NodeFArrayBox>& a_phi);
                       

  void bottomSmoother(LevelData<NodeFArrayBox>& a_phi,
                      const LevelData<NodeFArrayBox>& a_rhs);


  virtual void levelPreconditioner(LevelData<NodeFArrayBox>& a_phihat,
                                   const LevelData<NodeFArrayBox>& a_rhshat);


  void setDomainNodeBC(const DomainNodeBC& a_dombcin);


  void setInterpolationDegree(int a_interpolationDegree);


  void residualI(LevelData<NodeFArrayBox>& a_resid,
                 LevelData<NodeFArrayBox>& a_phi,
                 const LevelData<NodeFArrayBox>* a_phiCoarsePtr,
                 const LevelData<NodeFArrayBox>& a_rhs);


  void residualH(LevelData<NodeFArrayBox>& a_resid,
                 LevelData<NodeFArrayBox>& a_phi,
                 const LevelData<NodeFArrayBox>& a_rhs);


  void residualHcfIphys(LevelData<NodeFArrayBox>& a_resid,
                        LevelData<NodeFArrayBox>& a_phi,
                        const LevelData<NodeFArrayBox>& a_rhs);


  void residualIcfHphys(LevelData<NodeFArrayBox>& a_resid,
                        LevelData<NodeFArrayBox>& a_phi,
                        const LevelData<NodeFArrayBox>* a_phiCoarsePtr,
                        const LevelData<NodeFArrayBox>& a_rhs);

protected:

  // boundary conditons
  DomainNodeBC m_dombc;

  // degree of interpolation at c/f interfaces:
  // 1 for (bi)linear, 2 for (bi)quadratic
  int m_interpolationDegree;

  // moved to NodeLevelOp
  // physical domain of current level
  // ProblemDomain m_domain;

  // nodes inside physical domain of current level
  ProblemDomain m_domainInteriorNodes;

  // the grids at the current level
  DisjointBoxLayout m_grids;

  // DisjointBoxLayout for next coarser level
  // this is not used if there is no coarser level
  DisjointBoxLayout m_gridsCoarse;

  // number of components
  int m_ncomp;

  // refinement ratio between this and the next coarser level
  int m_refToCoarse;
    
  //mesh spacing at this level
  Real m_dx;

  //mesh spacing at next coarser level
  Real m_dxCoarse;

  //has full define function been called?
  bool m_isDefined;

  //has bc been defined?
  bool m_isBCDefined;

  //is inhomogeneous CF interpolation possible?
  bool m_ihcfiEnabled;

  // m_loCFIVS, m_hiCFIVS used for figuring out which nodes lie
  // on interface with the next coarser level.
  LayoutData<NodeCFIVS> m_loCFIVS[SpaceDim];
  LayoutData<NodeCFIVS> m_hiCFIVS[SpaceDim];

  // weights for coarse/fine interpolation
  // Tuple<FArrayBox*, SpaceDim> m_wtLo, m_wtHi, m_wtC;

  // coarse-fine quadratic interpolation
  NodeQuadCFInterp m_qcfi;

  // bottom smoother object
  NodeBaseBottomSmoother* m_bottomSmootherPtr;

  // interior boundary nodes
  LayoutData< Vector<IntVectSet> > m_IVSV;

  // moved to NodeLevelOp
  // exterior boundary nodes
  // LayoutData< Vector<IntVectSet> > m_IVSVext;

private:
  //internally useful functions

  void setCFIVS();

  void levelGSRB(LevelData<NodeFArrayBox>& a_phi, 
                 const LevelData<NodeFArrayBox>& a_rhs);

  void applyOpOnly(LevelData<NodeFArrayBox>& a_LofPhi,
                   const LevelData<NodeFArrayBox>& a_phi);

  // Does homogeneous coarse/fine interpolation.
  void homogeneousCFInterp(FArrayBox& a_phiFab,
                           const DataIndex& a_datInd, 
                           const int a_idir, 
                           const Side::LoHiSide a_hiorlo);

  void clearMemory();

  void setDefaultValues();

  void residualDiff(LevelData<NodeFArrayBox>& a_resid,
                    const LevelData<NodeFArrayBox>& a_rhs);
  
};

#endif

---