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 "ADHeatFlux3EqnBC.h"
      11             : #include "ADHeatFluxFromHeatStructureBaseUserObject.h"
      12             : #include "THMIndicesVACE.h"
      13             : #include "Assembly.h"
      14             : 
      15             : registerMooseObject("ThermalHydraulicsApp", ADHeatFlux3EqnBC);
      16             : 
      17             : InputParameters
      18         662 : ADHeatFlux3EqnBC::validParams()
      19             : {
      20         662 :   InputParameters params = ADHeatFluxBaseBC::validParams();
      21         662 :   params.addClassDescription("Wall heat flux boundary condition for the energy equation");
      22         662 :   return params;
      23           0 : }
      24             : 
      25         374 : ADHeatFlux3EqnBC::ADHeatFlux3EqnBC(const InputParameters & parameters)
      26         374 :   : ADHeatFluxBaseBC(parameters)
      27             : {
      28         374 : }
      29             : 
      30             : ADReal
      31     1274320 : ADHeatFlux3EqnBC::computeQpResidual()
      32             : {
      33     1274320 :   const std::vector<ADReal> & q_wall = _q_uo.getHeatFlux(_current_elem->id());
      34     1274320 :   const std::vector<ADReal> & P_hf = _q_uo.getHeatedPerimeter(_current_elem->id());
      35     1274320 :   return -_hs_scale * q_wall[_qp] * P_hf[_qp] * _test[_i][_qp];
      36             : }