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 "INSFVBodyForce.h"
      11             : 
      12             : registerMooseObject("NavierStokesApp", INSFVBodyForce);
      13             : 
      14             : InputParameters
      15        8158 : INSFVBodyForce::validParams()
      16             : {
      17        8158 :   auto params = FVElementalKernel::validParams();
      18        8158 :   params += INSFVMomentumResidualObject::validParams();
      19        8158 :   params.addClassDescription("Body force that contributes to the Rhie-Chow interpolation");
      20       16316 :   params.addParam<Real>("scaling_factor", 1.0, "Coefficient to multiply by the body force term");
      21       16316 :   params.addParam<MooseFunctorName>("functor", "1", "A functor that describes the body force");
      22       24474 :   params.addParam<PostprocessorName>(
      23       16316 :       "postprocessor", 1, "A postprocessor whose value is multiplied by the body force");
      24       16316 :   params.declareControllable("scaling_factor");
      25        8158 :   return params;
      26           0 : }
      27             : 
      28        4082 : INSFVBodyForce::INSFVBodyForce(const InputParameters & parameters)
      29             :   : FVElementalKernel(parameters),
      30             :     INSFVMomentumResidualObject(*this),
      31        4082 :     _scale(getParam<Real>("scaling_factor")),
      32        8164 :     _functor(getFunctor<ADReal>("functor")),
      33        8164 :     _postprocessor(getPostprocessorValue("postprocessor"))
      34             : {
      35        4082 : }
      36             : 
      37             : ADReal
      38    12117952 : INSFVBodyForce::computeQpResidual()
      39             : {
      40    24235904 :   return -_scale * _postprocessor * _functor(makeElemArg(_current_elem), determineState());
      41             : }