Calculate heat or mass transfer from a coupled variable to u. More...

#include <PorousFlowHeatMassTransfer.h>

Inheritance diagram for PorousFlowHeatMassTransfer:

Public Member Functions
	PorousFlowHeatMassTransfer (const InputParameters &parameters)

Protected Member Functions
virtual Real	computeQpResidual () override

virtual Real	computeQpJacobian () override

virtual Real	computeQpOffDiagJacobian (unsigned int jvar) override

virtual Real	jac (unsigned int jvar) const

Private Attributes
const unsigned int	_v_var

const VariableValue &	_v

const VariableValue &	_coef_var

Detailed Description

Calculate heat or mass transfer from a coupled variable to u.

This can be used to transfer from a variable specified in a highly conductive domain to a low conductive domain. With this kernel the retardation effect described in the porous flow documentation can be overcome. Alternatively, this kernel can also be used to model simplified precipitation/dissolution, where the Variable is the concentration.

Definition at line 28 of file PorousFlowHeatMassTransfer.h.

Constructor & Destructor Documentation

◆ PorousFlowHeatMassTransfer()

PorousFlowHeatMassTransfer::PorousFlowHeatMassTransfer ( const InputParameters & parameters )

Definition at line 34 of file PorousFlowHeatMassTransfer.C.

   : Kernel(parameters),
     _v_var(coupled("v")),
     _v(coupledValue("v")),
     _coef_var(coupledValue("transfer_coefficient"))
 {
 }

Member Function Documentation

◆ computeQpJacobian()

Real PorousFlowHeatMassTransfer::computeQpJacobian ( )

overrideprotectedvirtual

Definition at line 49 of file PorousFlowHeatMassTransfer.C.

 {
   return jac(_var.number());
 }

◆ computeQpOffDiagJacobian()

Real PorousFlowHeatMassTransfer::computeQpOffDiagJacobian ( unsigned int jvar )

overrideprotectedvirtual

Definition at line 55 of file PorousFlowHeatMassTransfer.C.

 {
   return jac(jvar);
 }

◆ computeQpResidual()

Real PorousFlowHeatMassTransfer::computeQpResidual ( )

overrideprotectedvirtual

Definition at line 43 of file PorousFlowHeatMassTransfer.C.

 {
   return _coef_var[_qp] * (_u[_qp] - _v[_qp]) * _test[_i][_qp];
 }

◆ jac()

Real PorousFlowHeatMassTransfer::jac ( unsigned int jvar ) const

protectedvirtual

Definition at line 61 of file PorousFlowHeatMassTransfer.C.

 {
   if (jvar == _var.number())
     return _coef_var[_qp] * _phi[_j][_qp] * _test[_i][_qp];
   else if (jvar == _v_var)
     return -_coef_var[_qp] * _phi[_j][_qp] * _test[_i][_qp];
   return 0.0;
 }