releasedExamples/MultiDimPhase/advectSrc/OldPatchGodunov.cpp
// Apply artificial viscosity to the fluxes
Apply artificial viscosity to the fluxes
Apply artificial viscosity to the fluxes
void OldPatchGodunov::artificialViscosity(FArrayBox&       a_F,
                                          const FArrayBox& a_U,
                                          const FArrayBox& a_divVel,
                                          const int&       a_dir,
                                          const Box&       a_box)
{
  Real coeff = artificialViscosityCoefficient();
  FORT_OLDARTVISCF(CHF_FRA(a_F),
                   CHF_CONST_FRA(a_U),
                   CHF_CONST_FRA1(a_divVel,0),
                   CHF_CONST_REAL(coeff),
                   CHF_CONST_INT(a_dir),
                   CHF_BOX(a_box));
}
void OldPatchGodunov :: artificialViscosity ( FArrayBox & a_F , const FArrayBox & a_U , const FArrayBox & a_divVel , const int & a_dir , const Box & a_box ) { Real coeff = artificialViscosityCoefficient ( ) ; FORT_OLDARTVISCF ( CHF_FRA ( a_F ) , CHF_CONST_FRA ( a_U ) , CHF_CONST_FRA1 ( a_divVel , 0 ) , CHF_CONST_REAL ( coeff ) , CHF_CONST_INT ( a_dir ) , CHF_BOX ( a_box ) ) ; }
Apply artificial viscosity to the fluxes
Apply artificial viscosity to the fluxes
// Get the artificial viscosity coefficient // Apply the artificial viscosity