---

WaveIBC.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.
//

#ifndef  WAVEIBC_H_
#define  WAVEIBC_H_

#include  <iostream>

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

#include "PhysIBC.H"
#include "SolidF_F.H"


class WaveIBC:public PhysIBC
{
public:

  WaveIBC();
  

  WaveIBC(const Real&     a_gamma,
          const Real&     a_ambientDensity,
          const Real&     a_deltaDensity,
          const int&      a_pressure,
          const IntVect&  a_waveNumber,
          const RealVect& a_center,
          const RealVect& a_velocity,
          const Real&     a_artvisc);


  ~WaveIBC() {};


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


  void setFortranCommonSet();


  PhysIBC *new_physIBC();


  void fluxBC(FArrayBox&            a_F,
              const FArrayBox&      a_W,
              const FArrayBox&      a_Wextrap,
              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 initialize(LevelData<FArrayBox>& a_U);
  
protected:
  // True if the Fortran common block has been set
  bool m_isFortranCommonSet;
};

#endif

---