Gaussian1dIBC.H

Go to the documentation of this file.

#ifdef CH_LANG_CC
/*
*      _______              __
*     / ___/ /  ___  __ _  / /  ___
*    / /__/ _ \/ _ \/  V \/ _ \/ _ \
*    \___/_//_/\___/_/_/_/_.__/\___/
*    Please refer to Copyright.txt, in Chombo's root directory.
*/
#endif

#ifndef _GAUSSIAN1DIBC_H_
#define _GAUSSIAN1DIBC_H_

#include <iostream>

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

#include "SolidBCF_F.H"

#include "UsingNamespace.H"


class Gaussian1dIBC: public PhysIBC
{
public:

  Gaussian1dIBC();


  Gaussian1dIBC(Real&           a_smallPressure,
              const Real&     a_gamma,
              const Real&     a_ambientDensity,
              const Real&     a_deltaDensity,
              const int&      a_pressure,
              const RealVect& a_center,
              const Real&     a_size,
              const RealVect& a_velocity,
              const Real&     a_artvisc);


  virtual ~Gaussian1dIBC();


  void setFortranCommon(Real&           a_smallPressure,
                        const Real&     a_gamma,
                        const Real&     a_ambientDensity,
                        const Real&     a_deltaDensity,
                        const int&      a_pressure,
                        const RealVect& a_center,
                        const Real&     a_size,
                        const RealVect& a_velocity,
                        const Real&     a_artvisc);


  PhysIBC *new_physIBC();


  void initialize(LevelData<FArrayBox>& a_U);


  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);


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

#endif

---