Line data    Source code

       1             : //* This file is part of the MOOSE framework
       2             : //* https://mooseframework.inl.gov
       3             : //*
       4             : //* All rights reserved, see COPYRIGHT for full restrictions
       5             : //* https://github.com/idaholab/moose/blob/master/COPYRIGHT
       6             : //*
       7             : //* Licensed under LGPL 2.1, please see LICENSE for details
       8             : //* https://www.gnu.org/licenses/lgpl-2.1.html
       9             : 
      10             : // Navier-Stokes includes
      11             : #include "NS.h"
      12             : #include "NSEnergyInviscidSpecifiedNormalFlowBC.h"
      13             : 
      14             : registerMooseObject("NavierStokesApp", NSEnergyInviscidSpecifiedNormalFlowBC);
      15             : 
      16             : InputParameters
      17           0 : NSEnergyInviscidSpecifiedNormalFlowBC::validParams()
      18             : {
      19           0 :   InputParameters params = NSEnergyInviscidBC::validParams();
      20           0 :   params.addRequiredCoupledVar(NS::pressure, "pressure");
      21           0 :   params.addRequiredParam<Real>("un", "The specified value of u.n for this boundary");
      22           0 :   return params;
      23           0 : }
      24             : 
      25           0 : NSEnergyInviscidSpecifiedNormalFlowBC::NSEnergyInviscidSpecifiedNormalFlowBC(
      26           0 :     const InputParameters & parameters)
      27           0 :   : NSEnergyInviscidBC(parameters), _pressure(coupledValue(NS::pressure)), _un(getParam<Real>("un"))
      28             : {
      29           0 : }
      30             : 
      31             : Real
      32           0 : NSEnergyInviscidSpecifiedNormalFlowBC::computeQpResidual()
      33             : {
      34           0 :   return qpResidualHelper(_pressure[_qp], _un);
      35             : }
      36             : 
      37             : Real
      38           0 : NSEnergyInviscidSpecifiedNormalFlowBC::computeQpJacobian()
      39             : {
      40           0 :   return computeJacobianHelper(/*on-diagonal variable is energy=*/4);
      41             : }
      42             : 
      43             : Real
      44           0 : NSEnergyInviscidSpecifiedNormalFlowBC::computeQpOffDiagJacobian(unsigned jvar)
      45             : {
      46           0 :   if (isNSVariable(jvar))
      47           0 :     return computeJacobianHelper(mapVarNumber(jvar));
      48             :   else
      49             :     return 0.0;
      50             : }
      51             : 
      52             : Real
      53           0 : NSEnergyInviscidSpecifiedNormalFlowBC::computeJacobianHelper(unsigned var_number)
      54             : {
      55             :   // For specified u.n, term "A" is zero, see base class for details.
      56           0 :   return qpJacobianTermB(var_number, _un) + qpJacobianTermC(var_number, _un);
      57             : }