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             : #include "MachNumberAux.h"
      11             : #include "SinglePhaseFluidProperties.h"
      12             : #include "Numerics.h"
      13             : 
      14             : registerMooseObject("ThermalHydraulicsApp", MachNumberAux);
      15             : 
      16             : InputParameters
      17          19 : MachNumberAux::validParams()
      18             : {
      19          19 :   InputParameters params = AuxKernel::validParams();
      20          19 :   params.addClassDescription("Computes Mach number.");
      21          38 :   params.addRequiredCoupledVar("vel", "x-component of phase velocity");
      22          38 :   params.addRequiredCoupledVar("v", "Specific volume");
      23          38 :   params.addRequiredCoupledVar("e", "Specific internal energy");
      24          38 :   params.addRequiredParam<UserObjectName>("fp", "The name of fluid properties object to use.");
      25          19 :   return params;
      26           0 : }
      27             : 
      28          10 : MachNumberAux::MachNumberAux(const InputParameters & parameters)
      29             :   : AuxKernel(parameters),
      30          10 :     _vel(coupledValue("vel")),
      31          10 :     _v(coupledValue("v")),
      32          10 :     _e(coupledValue("e")),
      33          20 :     _fp(getUserObject<SinglePhaseFluidProperties>("fp"))
      34             : {
      35          10 : }
      36             : 
      37             : Real
      38           6 : MachNumberAux::computeValue()
      39             : {
      40           6 :   Real speed_of_sound = _fp.c_from_v_e(_v[_qp], _e[_qp]);
      41           6 :   return _vel[_qp] / speed_of_sound;
      42             : }