CodeTestsIBC.H

Go to the documentation of this file.

#ifndef  _CODE_TESTS_IBC_H_
#define  _CODE_TESTS_IBC_H_

#include  <iostream>

#include "LevelData.H"
#include "FArrayBox.H"
#include "Vector.H"
#include "RealVect.H"
#include "AMRIO.H"

#include "CodeUnits.H"
#include "PhysIBC.H"



class CodeTestsIBC : public PhysIBC
{
public:

  CodeTestsIBC();
  

  CodeTestsIBC(const Real&  a_gamma,
               const Real&  a_artvisc,
               const Real&  a_rsTolerance,
               const Real&  a_maxRsIter,
               const Real&  a_maxMach,
               const CodeUnits& a_codeUnits);


  ~CodeTestsIBC() {};


  void setFortranCommon(const Real&  a_gamma,
                        const Real&  a_artvisc,
                        const Real&  a_rsTolerance,
                        const Real&  a_maxRsIter,
                        const Real&  a_maxMach);

  void setDustCollapse(const Real&  a_radius,
                       const Real&  a_density,
                       const RealVect& a_shift = RealVect::Zero);


  void setFortranCommonSet();

  void setCodeUnits(const CodeUnits& a_codeUnits);


  PhysIBC *new_physIBC();

  void primBC(FArrayBox&            a_WGdnv,
              const FArrayBox&      a_Wextrap,
              const FArrayBox&      a_W,
              const int&            a_dir,
              const Side::LoHiSide& a_side,
              const Real&           a_time);
  
  void setBdrySlopes(FArrayBox&       a_dW,
                     const FArrayBox& a_W,
                     const int&       a_dir,
                     const Real&      a_time);

  void artViscBC(FArrayBox&       a_F,
                 const FArrayBox& a_U,
                 const FArrayBox& a_divVel,
                 const int&       a_dir,
                 const Real&      a_time);
  
  void initialize(LevelData<FArrayBox>& a_U);

protected:
  //
  void dustCollapse(LevelData<FArrayBox>&    a_U);

protected:
  // cloud density and radius (for spher. dust collapse and makes central
  // mass for the secondary infall)
  Real m_density, m_radius;

  // shift all positions by dx*m_shift; check for phase effects
  RealVect m_shift;

  // code units
  CodeUnits m_codeUnits;

  // type of problem
  int m_problem;

  // True if the Fortran common block has been set
  bool m_isFortranCommonSet;
};

#endif

---