NSMomentumViscousBC.C

Go to the documentation of this file.

//* This file is part of the MOOSE framework
//* https://mooseframework.inl.gov
//*
//* All rights reserved, see COPYRIGHT for full restrictions
//* https://github.com/idaholab/moose/blob/master/COPYRIGHT
//*
//* Licensed under LGPL 2.1, please see LICENSE for details
//* https://www.gnu.org/licenses/lgpl-2.1.html
 
#include "NSMomentumViscousBC.h"
 
registerMooseObject("NavierStokesApp", NSMomentumViscousBC);
 
InputParameters
NSMomentumViscousBC::validParams()
{
  InputParameters params = NSIntegratedBC::validParams();
  params.addClassDescription("This class corresponds to the viscous part of the 'natural' boundary "
                             "condition for the momentum equations.");
  params.addRequiredParam<unsigned>(
      "component", "(0,1,2) = (x,y,z) for which momentum component this BC is applied to");
  return params;
}
 
NSMomentumViscousBC::NSMomentumViscousBC(const InputParameters & parameters)
  : NSIntegratedBC(parameters),
    _component(getParam<unsigned>("component")),
    // Derivative computing object
    _vst_derivs(*this)
{
}
 
Real
NSMomentumViscousBC::computeQpResidual()
{
  // n . (-tau) . v
 
  // Vector-valued test function
  RealVectorValue v_test;
  v_test(_component) = _test[_i][_qp];
 
  // The viscous contribution: n . tau . v
  Real visc_term = _normals[_qp] * (_viscous_stress_tensor[_qp] * v_test);
 
  // Note the sign...
  return -visc_term;
}
 
Real
NSMomentumViscousBC::computeQpJacobian()
{
  // See Eqns. (41)--(43) from the notes for the viscous boundary term contributions
  Real visc_term = 0.0;
 
  // Set variable names as in the notes
  const unsigned int k = _component;
  const unsigned int m = _component + 1; // _component = 0,1,2 -> m = 1,2,3 global variable number
 
  // FIXME: attempt calling shared dtau function
  for (unsigned int ell = 0; ell < LIBMESH_DIM; ++ell)
    visc_term += _vst_derivs.dtau(k, ell, m) * _normals[_qp](ell);
 
  // Multiply visc_term by test function
  visc_term *= _test[_i][_qp];
 
  // Note the sign...
  return -visc_term;
}
 
Real
NSMomentumViscousBC::computeQpOffDiagJacobian(unsigned jvar)
{
  if (isNSVariable(jvar))
  {
 
    // See Eqns. (41)--(43) from the notes for the viscous boundary
    // term contributions.
 
    // Map jvar into the variable m for our problem, regardless of
    // how Moose has numbered things.
    unsigned m = mapVarNumber(jvar);
 
    // Now compute viscous contribution
    Real visc_term = 0.0;
 
    // Set variable names as in the notes
    const unsigned int k = _component;
 
    for (unsigned int ell = 0; ell < LIBMESH_DIM; ++ell)
      visc_term += _vst_derivs.dtau(k, ell, m) * _normals[_qp](ell);
 
    // Multiply visc_term by test function
    visc_term *= _test[_i][_qp];
 
    // Note the sign...
    return -visc_term;
  }
  else
    return 0.0;
}