Triangular subchannel solver. More...

#include <TriSubChannel1PhaseProblem.h>

Inheritance diagram for TriSubChannel1PhaseProblem:

Public Types
enum	Direction { Direction::TO_EXTERNAL_APP, Direction::FROM_EXTERNAL_APP }

enum	CoverageCheckMode { CoverageCheckMode::FALSE, CoverageCheckMode::TRUE, CoverageCheckMode::OFF, CoverageCheckMode::ON, CoverageCheckMode::SKIP_LIST, CoverageCheckMode::ONLY_LIST }

typedef DataFileName	DataFileParameterType

Public Member Functions
	TriSubChannel1PhaseProblem (const InputParameters &params)

virtual	~TriSubChannel1PhaseProblem ()

virtual void	externalSolve () override

virtual void	syncSolutions (Direction direction) override

virtual bool	solverSystemConverged (const unsigned int) override

virtual void	initialSetup () override

const SCMHTCClosureBase *	getDuctHTCClosure () const

const SCMHTCClosureBase *	getPinHTCClosure () const

const SCMFrictionClosureBase *	getFrictionClosure () const

Real	getAddedHeatPin (unsigned int i_ch, unsigned int iz) const
	Return the added heat coming from the fuel pins. More...

Real	getAddedHeatDuct (unsigned int i_ch, unsigned int iz) const
	Return the added heat coming from the duct. More...

const PostprocessorValue &	getOutletPressure () const
	Get outlet pressure. More...

const SinglePhaseFluidProperties *	getSinglePhaseFluidProperties () const
	Get fluid properties object. More...

virtual void	solve (unsigned int nl_sys_num=0) override final

virtual void	addExternalVariables ()

bool	initialized () const

virtual libMesh::EquationSystems &	es () override

virtual MooseMesh &	mesh () override

virtual const MooseMesh &	mesh () const override

const MooseMesh &	mesh (bool use_displaced) const override

MooseMesh &	mesh (bool use_displaced)

void	setCoordSystem (const std::vector< SubdomainName > &blocks, const MultiMooseEnum &coord_sys)

void	setAxisymmetricCoordAxis (const MooseEnum &rz_coord_axis)

void	setCoupling (Moose::CouplingType type)

Moose::CouplingType	coupling () const

void	setCouplingMatrix (std::unique_ptr< libMesh::CouplingMatrix > cm, const unsigned int nl_sys_num)

void	setCouplingMatrix (libMesh::CouplingMatrix *cm, const unsigned int nl_sys_num)

const libMesh::CouplingMatrix *	couplingMatrix (const unsigned int nl_sys_num) const override

void	setNonlocalCouplingMatrix ()

bool	areCoupled (const unsigned int ivar, const unsigned int jvar, const unsigned int nl_sys_num) const

bool	hasUOAuxStateCheck () const

bool	checkingUOAuxState () const

virtual bool	checkResidualForNans () const override

void	setCheckResidualForNans (bool check_residual_for_nans)

void	trustUserCouplingMatrix ()

std::vector< std::pair< MooseVariableFEBase , MooseVariableFEBase > > &	couplingEntries (const THREAD_ID tid, const unsigned int nl_sys_num)

std::vector< std::pair< MooseVariableFEBase , MooseVariableFEBase > > &	nonlocalCouplingEntries (const THREAD_ID tid, const unsigned int nl_sys_num)

virtual bool	hasVariable (const std::string &var_name) const override

bool	hasSolverVariable (const std::string &var_name) const

virtual const MooseVariableFieldBase &	getVariable (const THREAD_ID tid, const std::string &var_name, Moose::VarKindType expected_var_type=Moose::VarKindType::VAR_ANY, Moose::VarFieldType expected_var_field_type=Moose::VarFieldType::VAR_FIELD_ANY) const override

virtual const MooseVariableFieldBase &	getVariable (const THREAD_ID tid, const std::string &var_name, Moose::VarKindType expected_var_type=Moose::VarKindType::VAR_ANY, Moose::VarFieldType expected_var_field_type=Moose::VarFieldType::VAR_FIELD_ANY) const =0

virtual MooseVariableFieldBase &	getVariable (const THREAD_ID tid, const std::string &var_name, Moose::VarKindType expected_var_type=Moose::VarKindType::VAR_ANY, Moose::VarFieldType expected_var_field_type=Moose::VarFieldType::VAR_FIELD_ANY)

virtual MooseVariableFieldBase &	getVariable (const THREAD_ID tid, const std::string &var_name, Moose::VarKindType expected_var_type=Moose::VarKindType::VAR_ANY, Moose::VarFieldType expected_var_field_type=Moose::VarFieldType::VAR_FIELD_ANY)

MooseVariableFieldBase &	getActualFieldVariable (const THREAD_ID tid, const std::string &var_name) override

virtual MooseVariable &	getStandardVariable (const THREAD_ID tid, const std::string &var_name) override

virtual VectorMooseVariable &	getVectorVariable (const THREAD_ID tid, const std::string &var_name) override

virtual ArrayMooseVariable &	getArrayVariable (const THREAD_ID tid, const std::string &var_name) override

virtual bool	hasScalarVariable (const std::string &var_name) const override

virtual MooseVariableScalar &	getScalarVariable (const THREAD_ID tid, const std::string &var_name) override

virtual libMesh::System &	getSystem (const std::string &var_name) override

const RestartableEquationSystems &	getRestartableEquationSystems () const

virtual void	setActiveElementalMooseVariables (const std::set< MooseVariableFEBase * > &moose_vars, const THREAD_ID tid) override

virtual void	clearActiveElementalMooseVariables (const THREAD_ID tid) override

virtual void	clearActiveFEVariableCoupleableMatrixTags (const THREAD_ID tid) override

virtual void	clearActiveFEVariableCoupleableVectorTags (const THREAD_ID tid) override

virtual void	setActiveFEVariableCoupleableVectorTags (std::set< TagID > &vtags, const THREAD_ID tid) override

virtual void	setActiveFEVariableCoupleableMatrixTags (std::set< TagID > &mtags, const THREAD_ID tid) override

virtual void	clearActiveScalarVariableCoupleableMatrixTags (const THREAD_ID tid) override

virtual void	clearActiveScalarVariableCoupleableVectorTags (const THREAD_ID tid) override

virtual void	setActiveScalarVariableCoupleableVectorTags (std::set< TagID > &vtags, const THREAD_ID tid) override

virtual void	setActiveScalarVariableCoupleableMatrixTags (std::set< TagID > &mtags, const THREAD_ID tid) override

virtual void	createQRules (libMesh::QuadratureType type, libMesh::Order order, libMesh::Order volume_order=libMesh::INVALID_ORDER, libMesh::Order face_order=libMesh::INVALID_ORDER, SubdomainID block=Moose::ANY_BLOCK_ID, bool allow_negative_qweights=true)

void	bumpVolumeQRuleOrder (libMesh::Order order, SubdomainID block)

void	bumpAllQRuleOrder (libMesh::Order order, SubdomainID block)

unsigned int	getMaxQps () const

libMesh::Order	getMaxScalarOrder () const

void	checkNonlocalCoupling ()

void	checkUserObjectJacobianRequirement (THREAD_ID tid)

void	setVariableAllDoFMap (const std::vector< const MooseVariableFEBase * > &moose_vars)

const std::vector< const MooseVariableFEBase *> &	getUserObjectJacobianVariables (const THREAD_ID tid) const

virtual Assembly &	assembly (const THREAD_ID tid, const unsigned int sys_num) override

virtual const Assembly &	assembly (const THREAD_ID tid, const unsigned int sys_num) const override

Moose::Kokkos::Assembly &	kokkosAssembly ()

const Moose::Kokkos::Assembly &	kokkosAssembly () const

virtual std::vector< VariableName >	getVariableNames ()

void	checkDuplicatePostprocessorVariableNames ()

void	timestepSetup () override

void	customSetup (const ExecFlagType &exec_type) override

void	residualSetup () override

void	jacobianSetup () override

virtual void	prepare (const Elem *elem, const THREAD_ID tid) override

virtual void	prepare (const Elem *elem, unsigned int ivar, unsigned int jvar, const std::vector< dof_id_type > &dof_indices, const THREAD_ID tid) override

virtual void	prepareFace (const Elem *elem, const THREAD_ID tid) override

virtual void	setCurrentSubdomainID (const Elem *elem, const THREAD_ID tid) override

virtual void	setNeighborSubdomainID (const Elem *elem, unsigned int side, const THREAD_ID tid) override

virtual void	setNeighborSubdomainID (const Elem *elem, const THREAD_ID tid)

virtual void	prepareAssembly (const THREAD_ID tid) override

virtual void	addGhostedElem (dof_id_type elem_id) override

virtual void	addGhostedBoundary (BoundaryID boundary_id) override

virtual void	ghostGhostedBoundaries () override

virtual void	sizeZeroes (unsigned int size, const THREAD_ID tid)

virtual bool	reinitDirac (const Elem *elem, const THREAD_ID tid) override

virtual void	reinitElem (const Elem *elem, const THREAD_ID tid) override

virtual void	reinitElemPhys (const Elem *elem, const std::vector< Point > &phys_points_in_elem, const THREAD_ID tid) override

void	reinitElemFace (const Elem *elem, unsigned int side, BoundaryID, const THREAD_ID tid)

virtual void	reinitElemFace (const Elem *elem, unsigned int side, const THREAD_ID tid) override

virtual void	reinitLowerDElem (const Elem lower_d_elem, const THREAD_ID tid, const std::vector< Point > const pts=nullptr, const std::vector< Real > *const weights=nullptr) override

virtual void	reinitNode (const Node *node, const THREAD_ID tid) override

virtual void	reinitNodeFace (const Node *node, BoundaryID bnd_id, const THREAD_ID tid) override

virtual void	reinitNodes (const std::vector< dof_id_type > &nodes, const THREAD_ID tid) override

virtual void	reinitNodesNeighbor (const std::vector< dof_id_type > &nodes, const THREAD_ID tid) override

virtual void	reinitNeighbor (const Elem *elem, unsigned int side, const THREAD_ID tid) override

virtual void	reinitNeighborPhys (const Elem *neighbor, unsigned int neighbor_side, const std::vector< Point > &physical_points, const THREAD_ID tid) override

virtual void	reinitNeighborPhys (const Elem *neighbor, const std::vector< Point > &physical_points, const THREAD_ID tid) override

virtual void	reinitElemNeighborAndLowerD (const Elem *elem, unsigned int side, const THREAD_ID tid) override

virtual void	reinitScalars (const THREAD_ID tid, bool reinit_for_derivative_reordering=false) override

virtual void	reinitOffDiagScalars (const THREAD_ID tid) override

virtual void	getDiracElements (std::set< const Elem * > &elems) override

virtual void	clearDiracInfo () override

virtual void	subdomainSetup (SubdomainID subdomain, const THREAD_ID tid)

virtual void	neighborSubdomainSetup (SubdomainID subdomain, const THREAD_ID tid)

virtual void	newAssemblyArray (std::vector< std::shared_ptr< SolverSystem >> &solver_systems)

virtual void	initNullSpaceVectors (const InputParameters &parameters, std::vector< std::shared_ptr< NonlinearSystemBase >> &nl)

virtual void	init () override

void	initKokkos ()

virtual void	solveLinearSystem (const unsigned int linear_sys_num, const Moose::PetscSupport::PetscOptions *po=nullptr)

virtual void	setException (const std::string &message)

virtual bool	hasException ()

virtual void	checkExceptionAndStopSolve (bool print_message=true)

virtual unsigned int	nNonlinearIterations (const unsigned int nl_sys_num) const override

virtual unsigned int	nLinearIterations (const unsigned int nl_sys_num) const override

virtual Real	finalNonlinearResidual (const unsigned int nl_sys_num) const override

virtual bool	computingPreSMOResidual (const unsigned int nl_sys_num) const override

virtual std::string	solverTypeString (unsigned int solver_sys_num=0)

virtual bool	startedInitialSetup ()

virtual void	onTimestepBegin () override

virtual void	onTimestepEnd () override

virtual Real &	time () const

virtual Real &	timeOld () const

virtual int &	timeStep () const

virtual Real &	dt () const

virtual Real &	dtOld () const

Real	getTimeFromStateArg (const Moose::StateArg &state) const

virtual void	transient (bool trans)

virtual bool	isTransient () const override

virtual void	addTimeIntegrator (const std::string &type, const std::string &name, InputParameters &parameters)

virtual void	addPredictor (const std::string &type, const std::string &name, InputParameters &parameters)

virtual void	copySolutionsBackwards ()

void	skipNextForwardSolutionCopyToOld ()

virtual void	advanceState ()

virtual void	restoreSolutions ()

virtual void	saveOldSolutions ()

virtual void	restoreOldSolutions ()

void	needSolutionState (unsigned int oldest_needed, Moose::SolutionIterationType iteration_type)

bool	hasSolutionState (unsigned int state, Moose::SolutionIterationType iteration_type) const

virtual void	outputStep (ExecFlagType type)

virtual void	postExecute ()

void	forceOutput ()

virtual void	initPetscOutputAndSomeSolverSettings ()

Moose::PetscSupport::PetscOptions &	getPetscOptions ()

void	logAdd (const std::string &system, const std::string &name, const std::string &type, const InputParameters &params) const

virtual void	addFunction (const std::string &type, const std::string &name, InputParameters &parameters)

virtual bool	hasFunction (const std::string &name, const THREAD_ID tid=0)

virtual Function &	getFunction (const std::string &name, const THREAD_ID tid=0)

virtual void	addKokkosFunction (const std::string &type, const std::string &name, InputParameters &parameters)

virtual bool	hasKokkosFunction (const std::string &name) const

virtual Moose::Kokkos::Function	getKokkosFunction (const std::string &name)

T &	getKokkosFunction (const std::string &name)

virtual void	addMeshDivision (const std::string &type, const std::string &name, InputParameters &params)

MeshDivision &	getMeshDivision (const std::string &name, const THREAD_ID tid=0) const

virtual void	addConvergence (const std::string &type, const std::string &name, InputParameters &parameters)

virtual Convergence &	getConvergence (const std::string &name, const THREAD_ID tid=0) const

virtual const std::vector< std::shared_ptr< Convergence > > &	getConvergenceObjects (const THREAD_ID tid=0) const

virtual bool	hasConvergence (const std::string &name, const THREAD_ID tid=0) const

bool	needToAddDefaultNonlinearConvergence () const

bool	needToAddDefaultMultiAppFixedPointConvergence () const

bool	needToAddDefaultSteadyStateConvergence () const

void	setNeedToAddDefaultNonlinearConvergence ()

void	setNeedToAddDefaultMultiAppFixedPointConvergence ()

void	setNeedToAddDefaultSteadyStateConvergence ()

bool	hasSetMultiAppFixedPointConvergenceName () const

bool	hasSetSteadyStateConvergenceName () const

virtual void	addDefaultNonlinearConvergence (const InputParameters &params)

virtual bool	onlyAllowDefaultNonlinearConvergence () const

void	addDefaultMultiAppFixedPointConvergence (const InputParameters &params)

void	addDefaultSteadyStateConvergence (const InputParameters &params)

virtual void	addLineSearch (const InputParameters &)

virtual void	lineSearch ()

LineSearch *	getLineSearch () override

virtual void	addDistribution (const std::string &type, const std::string &name, InputParameters &parameters)

virtual bool	hasDistribution (const std::string &name) const

virtual Distribution &	getDistribution (const std::string &name)

virtual void	addSampler (const std::string &type, const std::string &name, InputParameters &parameters)

virtual Sampler &	getSampler (const std::string &name, const THREAD_ID tid=0)

NonlinearSystemBase &	getNonlinearSystemBase (const unsigned int sys_num)

const NonlinearSystemBase &	getNonlinearSystemBase (const unsigned int sys_num) const

void	setCurrentNonlinearSystem (const unsigned int nl_sys_num)

NonlinearSystemBase &	currentNonlinearSystem ()

const NonlinearSystemBase &	currentNonlinearSystem () const

virtual const SystemBase &	systemBaseNonlinear (const unsigned int sys_num) const override

virtual SystemBase &	systemBaseNonlinear (const unsigned int sys_num) override

virtual const SystemBase &	systemBaseSolver (const unsigned int sys_num) const override

virtual SystemBase &	systemBaseSolver (const unsigned int sys_num) override

virtual const SystemBase &	systemBaseAuxiliary () const override

virtual SystemBase &	systemBaseAuxiliary () override

virtual NonlinearSystem &	getNonlinearSystem (const unsigned int sys_num)

virtual const SystemBase &	getSystemBase (const unsigned int sys_num) const

virtual SystemBase &	getSystemBase (const unsigned int sys_num)

SystemBase &	getSystemBase (const std::string &sys_name)

LinearSystem &	getLinearSystem (unsigned int sys_num)

const LinearSystem &	getLinearSystem (unsigned int sys_num) const

SolverSystem &	getSolverSystem (unsigned int sys_num)

const SolverSystem &	getSolverSystem (unsigned int sys_num) const

void	setCurrentLinearSystem (unsigned int sys_num)

LinearSystem &	currentLinearSystem ()

const LinearSystem &	currentLinearSystem () const

virtual const SystemBase &	systemBaseLinear (unsigned int sys_num) const override

virtual SystemBase &	systemBaseLinear (unsigned int sys_num) override

virtual void	addVariable (const std::string &var_type, const std::string &var_name, InputParameters &params)

virtual void	addKernel (const std::string &kernel_name, const std::string &name, InputParameters &parameters)

virtual void	addHDGKernel (const std::string &kernel_name, const std::string &name, InputParameters &parameters)

virtual void	addNodalKernel (const std::string &kernel_name, const std::string &name, InputParameters &parameters)

virtual void	addScalarKernel (const std::string &kernel_name, const std::string &name, InputParameters &parameters)

virtual void	addBoundaryCondition (const std::string &bc_name, const std::string &name, InputParameters &parameters)

virtual void	addKokkosKernel (const std::string &kernel_name, const std::string &name, InputParameters &parameters)

virtual void	addKokkosNodalKernel (const std::string &kernel_name, const std::string &name, InputParameters &parameters)

virtual void	addKokkosBoundaryCondition (const std::string &bc_name, const std::string &name, InputParameters &parameters)

virtual void	addConstraint (const std::string &c_name, const std::string &name, InputParameters &parameters)

virtual void	setInputParametersFEProblem (InputParameters &parameters)

virtual void	addAuxVariable (const std::string &var_type, const std::string &var_name, InputParameters &params)

virtual void	addAuxVariable (const std::string &var_name, const libMesh::FEType &type, const std::set< SubdomainID > *const active_subdomains=NULL)

virtual void	addElementalFieldVariable (const std::string &var_type, const std::string &var_name, InputParameters &params)

virtual void	addAuxArrayVariable (const std::string &var_name, const libMesh::FEType &type, unsigned int components, const std::set< SubdomainID > *const active_subdomains=NULL)

virtual void	addAuxScalarVariable (const std::string &var_name, libMesh::Order order, Real scale_factor=1., const std::set< SubdomainID > *const active_subdomains=NULL)

virtual void	addAuxKernel (const std::string &kernel_name, const std::string &name, InputParameters &parameters)

virtual void	addAuxScalarKernel (const std::string &kernel_name, const std::string &name, InputParameters &parameters)

virtual void	addKokkosAuxKernel (const std::string &kernel_name, const std::string &name, InputParameters &parameters)

AuxiliarySystem &	getAuxiliarySystem ()

virtual void	addDiracKernel (const std::string &kernel_name, const std::string &name, InputParameters &parameters)

virtual void	addDGKernel (const std::string &kernel_name, const std::string &name, InputParameters &parameters)

virtual void	addFVKernel (const std::string &kernel_name, const std::string &name, InputParameters &parameters)

virtual void	addLinearFVKernel (const std::string &kernel_name, const std::string &name, InputParameters &parameters)

virtual void	addFVBC (const std::string &fv_bc_name, const std::string &name, InputParameters &parameters)

virtual void	addLinearFVBC (const std::string &fv_bc_name, const std::string &name, InputParameters &parameters)

virtual void	addFVInterfaceKernel (const std::string &fv_ik_name, const std::string &name, InputParameters &parameters)

virtual void	addInterfaceKernel (const std::string &kernel_name, const std::string &name, InputParameters &parameters)

virtual void	addInitialCondition (const std::string &ic_name, const std::string &name, InputParameters &parameters)

virtual void	addFVInitialCondition (const std::string &ic_name, const std::string &name, InputParameters &parameters)

void	projectSolution ()

unsigned short	getCurrentICState ()

void	projectInitialConditionOnCustomRange (libMesh::ConstElemRange &elem_range, ConstBndNodeRange &bnd_node_range, const std::optional< std::set< VariableName >> &target_vars=std::nullopt)

void	projectFunctionOnCustomRange (ConstElemRange &elem_range, Number(func)(const Point &, const libMesh::Parameters &, const std::string &, const std::string &), Gradient(func_grad)(const Point &, const libMesh::Parameters &, const std::string &, const std::string &), const libMesh::Parameters &params, const std::vector< VariableName > &target_vars)

virtual void	addMaterial (const std::string &material_name, const std::string &name, InputParameters &parameters)

virtual void	addMaterialHelper (std::vector< MaterialWarehouse * > warehouse, const std::string &material_name, const std::string &name, InputParameters &parameters)

virtual void	addInterfaceMaterial (const std::string &material_name, const std::string &name, InputParameters &parameters)

virtual void	addFunctorMaterial (const std::string &functor_material_name, const std::string &name, InputParameters &parameters)

virtual void	addKokkosMaterial (const std::string &material_name, const std::string &name, InputParameters &parameters)

void	prepareMaterials (const std::unordered_set< unsigned int > &consumer_needed_mat_props, const SubdomainID blk_id, const THREAD_ID tid)

void	reinitMaterials (SubdomainID blk_id, const THREAD_ID tid, bool swap_stateful=true)

void	reinitMaterialsFace (SubdomainID blk_id, const THREAD_ID tid, bool swap_stateful=true, const std::deque< MaterialBase * > *reinit_mats=nullptr)

void	reinitMaterialsFaceOnBoundary (const BoundaryID boundary_id, const SubdomainID blk_id, const THREAD_ID tid, const bool swap_stateful=true, const std::deque< MaterialBase * > *const reinit_mats=nullptr)

void	reinitMaterialsNeighborOnBoundary (const BoundaryID boundary_id, const SubdomainID blk_id, const THREAD_ID tid, const bool swap_stateful=true, const std::deque< MaterialBase * > *const reinit_mats=nullptr)

void	reinitMaterialsNeighbor (SubdomainID blk_id, const THREAD_ID tid, bool swap_stateful=true, const std::deque< MaterialBase * > *reinit_mats=nullptr)

void	reinitMaterialsBoundary (BoundaryID boundary_id, const THREAD_ID tid, bool swap_stateful=true, const std::deque< MaterialBase * > *reinit_mats=nullptr)

void	reinitMaterialsInterface (BoundaryID boundary_id, const THREAD_ID tid, bool swap_stateful=true)

void	prepareKokkosMaterials (const std::unordered_set< unsigned int > &consumer_needed_mat_props)

void	reinitKokkosMaterials ()

virtual void	swapBackMaterials (const THREAD_ID tid)

virtual void	swapBackMaterialsFace (const THREAD_ID tid)

virtual void	swapBackMaterialsNeighbor (const THREAD_ID tid)

void	setActiveMaterialProperties (const std::unordered_set< unsigned int > &mat_prop_ids, const THREAD_ID tid)

bool	hasActiveMaterialProperties (const THREAD_ID tid) const

void	clearActiveMaterialProperties (const THREAD_ID tid)

std::vector< std::shared_ptr< T > >	addObject (const std::string &type, const std::string &name, InputParameters &parameters, const bool threaded=true, const std::string &var_param_name="variable")

virtual void	addPostprocessor (const std::string &pp_name, const std::string &name, InputParameters &parameters)

virtual void	addVectorPostprocessor (const std::string &pp_name, const std::string &name, InputParameters &parameters)

virtual void	addReporter (const std::string &type, const std::string &name, InputParameters &parameters)

virtual void	addKokkosPostprocessor (const std::string &pp_name, const std::string &name, InputParameters &parameters)

virtual void	addKokkosVectorPostprocessor (const std::string &pp_name, const std::string &name, InputParameters &parameters)

virtual void	addKokkosReporter (const std::string &type, const std::string &name, InputParameters &parameters)

const ReporterData &	getReporterData () const

ReporterData &	getReporterData (ReporterData::WriteKey)

virtual std::vector< std::shared_ptr< UserObject > >	addUserObject (const std::string &user_object_name, const std::string &name, InputParameters &parameters)

T &	getUserObject (const std::string &name, unsigned int tid=0) const

const UserObject &	getUserObjectBase (const std::string &name, const THREAD_ID tid=0) const

bool	hasUserObject (const std::string &name) const

virtual void	addKokkosUserObject (const std::string &user_object_name, const std::string &name, InputParameters &parameters)

const T &	getKokkosUserObject (const std::string &name) const

bool	hasKokkosUserObject (const std::string &name) const

void	checkUserObjectNameCollision (const std::string &name, const std::string &type) const

const Positions &	getPositionsObject (const std::string &name) const

virtual void	addFVInterpolationMethod (const std::string &method_type, const std::string &name, InputParameters &parameters)

const FVInterpolationMethod &	getFVInterpolationMethod (const InterpolationMethodName &name, const THREAD_ID tid=0) const

const FVFaceInterpolationMethod &	getFVFaceInterpolationMethod (const InterpolationMethodName &name, const THREAD_ID tid=0) const

const FVAdvectedInterpolationMethod &	getFVAdvectedInterpolationMethod (const InterpolationMethodName &name, const THREAD_ID tid=0) const

bool	hasFVInterpolationMethod (const InterpolationMethodName &name) const

bool	hasPostprocessorValueByName (const PostprocessorName &name) const

const Postprocessor &	getPostprocessorObjectByName (const PostprocessorName &object_name, const THREAD_ID tid=0) const

const PostprocessorValue &	getPostprocessorValueByName (const PostprocessorName &name, std::size_t t_index=0) const

virtual const PostprocessorValue &	getPostprocessorValueByName (const PostprocessorName &name) const

void	setPostprocessorValueByName (const PostprocessorName &name, const PostprocessorValue &value, std::size_t t_index=0)

bool	hasPostprocessor (const std::string &name) const

bool	hasPostprocessor (const std::string &param_name, const unsigned int index=0) const

const VectorPostprocessorValue &	getVectorPostprocessorValueByName (const std::string &object_name, const std::string &vector_name, std::size_t t_index=0) const

void	setVectorPostprocessorValueByName (const std::string &object_name, const std::string &vector_name, const VectorPostprocessorValue &value, std::size_t t_index=0)

const VectorPostprocessor &	getVectorPostprocessorObjectByName (const std::string &object_name, const THREAD_ID tid=0) const

virtual void	addDamper (const std::string &damper_name, const std::string &name, InputParameters &parameters)

void	setupDampers ()

bool	hasDampers ()

virtual void	addIndicator (const std::string &indicator_name, const std::string &name, InputParameters &parameters)

virtual void	addMarker (const std::string &marker_name, const std::string &name, InputParameters &parameters)

virtual void	addMultiApp (const std::string &multi_app_name, const std::string &name, InputParameters &parameters)

std::shared_ptr< MultiApp >	getMultiApp (const std::string &multi_app_name) const

std::vector< std::shared_ptr< Transfer > >	getTransfers (ExecFlagType type, Transfer::DIRECTION direction) const

std::vector< std::shared_ptr< Transfer > >	getTransfers (Transfer::DIRECTION direction) const

const ExecuteMooseObjectWarehouse< Transfer > &	getMultiAppTransferWarehouse (Transfer::DIRECTION direction) const

void	execMultiAppTransfers (ExecFlagType type, Transfer::DIRECTION direction)

bool	execMultiApps (ExecFlagType type, bool auto_advance=true)

void	finalizeMultiApps ()

void	incrementMultiAppTStep (ExecFlagType type)

void	advanceMultiApps (ExecFlagType type)

void	finishMultiAppStep (ExecFlagType type, bool recurse_through_multiapp_levels=false)

void	backupMultiApps (ExecFlagType type)

void	restoreMultiApps (ExecFlagType type, bool force=false)

Real	computeMultiAppsDT (ExecFlagType type)

virtual void	addTransfer (const std::string &transfer_name, const std::string &name, InputParameters &parameters)

void	execTransfers (ExecFlagType type)

Real	computeResidualL2Norm (NonlinearSystemBase &sys)

Real	computeResidualL2Norm (LinearSystem &sys)

virtual Real	computeResidualL2Norm ()

virtual void	computeResidualSys (libMesh::NonlinearImplicitSystem &sys, const NumericVector< libMesh::Number > &soln, NumericVector< libMesh::Number > &residual)

void	computeResidual (libMesh::NonlinearImplicitSystem &sys, const NumericVector< libMesh::Number > &soln, NumericVector< libMesh::Number > &residual)

virtual void	computeResidual (const NumericVector< libMesh::Number > &soln, NumericVector< libMesh::Number > &residual, const unsigned int nl_sys_num)

void	computeResidualAndJacobian (const NumericVector< libMesh::Number > &soln, NumericVector< libMesh::Number > &residual, libMesh::SparseMatrix< libMesh::Number > &jacobian)

virtual void	computeResidualTag (const NumericVector< libMesh::Number > &soln, NumericVector< libMesh::Number > &residual, TagID tag)

virtual void	computeResidualType (const NumericVector< libMesh::Number > &soln, NumericVector< libMesh::Number > &residual, TagID tag)

virtual void	computeResidualInternal (const NumericVector< libMesh::Number > &soln, NumericVector< libMesh::Number > &residual, const std::set< TagID > &tags)

virtual void	computeResidualTags (const std::set< TagID > &tags)

virtual void	computeJacobianSys (libMesh::NonlinearImplicitSystem &sys, const NumericVector< libMesh::Number > &soln, libMesh::SparseMatrix< libMesh::Number > &jacobian)

virtual void	computeJacobian (const NumericVector< libMesh::Number > &soln, libMesh::SparseMatrix< libMesh::Number > &jacobian, const unsigned int nl_sys_num)

virtual void	computeJacobianTag (const NumericVector< libMesh::Number > &soln, libMesh::SparseMatrix< libMesh::Number > &jacobian, TagID tag)

virtual void	computeJacobianInternal (const NumericVector< libMesh::Number > &soln, libMesh::SparseMatrix< libMesh::Number > &jacobian, const std::set< TagID > &tags)

virtual void	computeJacobianTags (const std::set< TagID > &tags)

virtual void	computeJacobianBlocks (std::vector< JacobianBlock * > &blocks, const unsigned int nl_sys_num)

virtual void	computeJacobianBlock (libMesh::SparseMatrix< libMesh::Number > &jacobian, libMesh::System &precond_system, unsigned int ivar, unsigned int jvar)

virtual void	computeLinearSystemSys (libMesh::LinearImplicitSystem &sys, libMesh::SparseMatrix< libMesh::Number > &system_matrix, NumericVector< libMesh::Number > &rhs, const bool compute_gradients=true)

void	computeLinearSystemTags (const NumericVector< libMesh::Number > &soln, const std::set< TagID > &vector_tags, const std::set< TagID > &matrix_tags, const bool compute_gradients=true)

virtual Real	computeDamping (const NumericVector< libMesh::Number > &soln, const NumericVector< libMesh::Number > &update)

virtual bool	shouldUpdateSolution ()

virtual bool	updateSolution (NumericVector< libMesh::Number > &vec_solution, NumericVector< libMesh::Number > &ghosted_solution)

virtual void	predictorCleanup (NumericVector< libMesh::Number > &ghosted_solution)

virtual void	computeBounds (libMesh::NonlinearImplicitSystem &sys, NumericVector< libMesh::Number > &lower, NumericVector< libMesh::Number > &upper)

virtual void	computeNearNullSpace (libMesh::NonlinearImplicitSystem &sys, std::vector< NumericVector< libMesh::Number > * > &sp)

virtual void	computeNullSpace (libMesh::NonlinearImplicitSystem &sys, std::vector< NumericVector< libMesh::Number > * > &sp)

virtual void	computeTransposeNullSpace (libMesh::NonlinearImplicitSystem &sys, std::vector< NumericVector< libMesh::Number > * > &sp)

virtual void	computePostCheck (libMesh::NonlinearImplicitSystem &sys, const NumericVector< libMesh::Number > &old_soln, NumericVector< libMesh::Number > &search_direction, NumericVector< libMesh::Number > &new_soln, bool &changed_search_direction, bool &changed_new_soln)

virtual void	computeIndicatorsAndMarkers ()

virtual void	computeIndicators ()

virtual void	computeMarkers ()

virtual void	addResidual (const THREAD_ID tid) override

virtual void	addResidualNeighbor (const THREAD_ID tid) override

virtual void	addResidualLower (const THREAD_ID tid) override

virtual void	addResidualScalar (const THREAD_ID tid=0)

virtual void	cacheResidual (const THREAD_ID tid) override

virtual void	cacheResidualNeighbor (const THREAD_ID tid) override

virtual void	addCachedResidual (const THREAD_ID tid) override

virtual void	addCachedResidualDirectly (NumericVector< libMesh::Number > &residual, const THREAD_ID tid)

virtual void	setResidual (NumericVector< libMesh::Number > &residual, const THREAD_ID tid) override

virtual void	setResidual (libMesh::NumericVector< libMesh::Number > &residual, const THREAD_ID tid)=0

virtual void	setResidualNeighbor (NumericVector< libMesh::Number > &residual, const THREAD_ID tid) override

virtual void	setResidualNeighbor (libMesh::NumericVector< libMesh::Number > &residual, const THREAD_ID tid)=0

virtual void	addJacobian (const THREAD_ID tid) override

virtual void	addJacobianNeighbor (const THREAD_ID tid) override

virtual void	addJacobianNeighbor (libMesh::SparseMatrix< libMesh::Number > &jacobian, unsigned int ivar, unsigned int jvar, const DofMap &dof_map, std::vector< dof_id_type > &dof_indices, std::vector< dof_id_type > &neighbor_dof_indices, const std::set< TagID > &tags, const THREAD_ID tid) override

virtual void	addJacobianNeighbor (libMesh::SparseMatrix< libMesh::Number > &jacobian, unsigned int ivar, unsigned int jvar, const libMesh::DofMap &dof_map, std::vector< dof_id_type > &dof_indices, std::vector< dof_id_type > &neighbor_dof_indices, const std::set< TagID > &tags, const THREAD_ID tid)=0

virtual void	addJacobianNeighborLowerD (const THREAD_ID tid) override

virtual void	addJacobianLowerD (const THREAD_ID tid) override

virtual void	addJacobianBlockTags (libMesh::SparseMatrix< libMesh::Number > &jacobian, unsigned int ivar, unsigned int jvar, const DofMap &dof_map, std::vector< dof_id_type > &dof_indices, const std::set< TagID > &tags, const THREAD_ID tid)

virtual void	addJacobianScalar (const THREAD_ID tid=0)

virtual void	addJacobianOffDiagScalar (unsigned int ivar, const THREAD_ID tid=0)

virtual void	cacheJacobian (const THREAD_ID tid) override

virtual void	cacheJacobianNeighbor (const THREAD_ID tid) override

virtual void	addCachedJacobian (const THREAD_ID tid) override

virtual void	prepareShapes (unsigned int var, const THREAD_ID tid) override

virtual void	prepareFaceShapes (unsigned int var, const THREAD_ID tid) override

virtual void	prepareNeighborShapes (unsigned int var, const THREAD_ID tid) override

virtual void	addDisplacedProblem (std::shared_ptr< DisplacedProblem > displaced_problem)

virtual std::shared_ptr< const DisplacedProblem >	getDisplacedProblem () const

virtual std::shared_ptr< DisplacedProblem >	getDisplacedProblem ()

virtual void	updateGeomSearch (GeometricSearchData::GeometricSearchType type=GeometricSearchData::ALL) override

virtual void	updateMortarMesh ()

void	createMortarInterface (const std::pair< BoundaryID, BoundaryID > &primary_secondary_boundary_pair, const std::pair< SubdomainID, SubdomainID > &primary_secondary_subdomain_pair, bool on_displaced, bool periodic, const bool debug, const bool correct_edge_dropping, const Real minimum_projection_angle)

const std::unordered_map< std::pair< BoundaryID, BoundaryID >, std::unique_ptr< AutomaticMortarGeneration > > &	getMortarInterfaces (bool on_displaced) const

virtual void	possiblyRebuildGeomSearchPatches ()

virtual GeometricSearchData &	geomSearchData () override

void	setRestartFile (const std::string &file_name)

const MaterialPropertyRegistry &	getMaterialPropertyRegistry () const

const InitialConditionWarehouse &	getInitialConditionWarehouse () const

const FVInitialConditionWarehouse &	getFVInitialConditionWarehouse () const

SolverParams &	solverParams (unsigned int solver_sys_num=0)

const SolverParams &	solverParams (unsigned int solver_sys_num=0) const

Adaptivity &	adaptivity ()

virtual void	initialAdaptMesh ()

virtual bool	adaptMesh ()

unsigned int	getNumCyclesCompleted ()

bool	hasInitialAdaptivity () const

bool	hasInitialAdaptivity () const

void	initXFEM (std::shared_ptr< XFEMInterface > xfem)

std::shared_ptr< XFEMInterface >	getXFEM ()

bool	haveXFEM ()

virtual bool	updateMeshXFEM ()

virtual void	meshChanged (bool intermediate_change, bool contract_mesh, bool clean_refinement_flags)

void	notifyWhenMeshChanges (MeshChangedInterface *mci)

void	notifyWhenMeshDisplaces (MeshDisplacedInterface *mdi)

void	initElementStatefulProps (const libMesh::ConstElemRange &elem_range, const bool threaded)

void	initKokkosStatefulProps ()

virtual void	checkProblemIntegrity ()

void	registerRandomInterface (RandomInterface &random_interface, const std::string &name)

void	setConstJacobian (bool state)

void	setKernelCoverageCheck (CoverageCheckMode mode)

void	setKernelCoverageCheck (bool flag)

void	setKernelCoverageCheck (CoverageCheckMode mode)

void	setMaterialCoverageCheck (CoverageCheckMode mode)

void	setMaterialCoverageCheck (bool flag)

void	setMaterialCoverageCheck (CoverageCheckMode mode)

void	setParallelBarrierMessaging (bool flag)

void	setVerboseProblem (bool verbose)

bool	verboseMultiApps () const

void	parentOutputPositionChanged ()

unsigned int	subspaceDim (const std::string &prefix) const

const MooseObjectWarehouse< Function > &	getFunctionWarehouse ()

const MaterialWarehouse &	getMaterialWarehouse () const

const MaterialWarehouse &	getRegularMaterialsWarehouse () const

const MaterialWarehouse &	getDiscreteMaterialWarehouse () const

const MaterialWarehouse &	getInterfaceMaterialsWarehouse () const

const MaterialWarehouse &	getKokkosMaterialsWarehouse () const

std::shared_ptr< MaterialBase >	getMaterial (std::string name, Moose::MaterialDataType type, const THREAD_ID tid=0, bool no_warn=false)

MaterialData &	getMaterialData (Moose::MaterialDataType type, const THREAD_ID tid=0, const MooseObject *object=nullptr) const

MaterialData &	getKokkosMaterialData (Moose::MaterialDataType type, const MooseObject *object=nullptr) const

const std::set< const MooseObject *> &	getMaterialPropertyStorageConsumers (Moose::MaterialDataType type) const

const std::set< const MooseObject *> &	getKokkosMaterialPropertyStorageConsumers (Moose::MaterialDataType type) const

bool	restoreOriginalNonzeroPattern () const

bool	errorOnJacobianNonzeroReallocation () const

void	setErrorOnJacobianNonzeroReallocation (bool state)

bool	preserveMatrixSparsityPattern () const

void	setPreserveMatrixSparsityPattern (bool preserve)

bool	ignoreZerosInJacobian () const

void	setIgnoreZerosInJacobian (bool state)

bool	acceptInvalidSolution () const

bool	allowInvalidSolution () const

bool	showInvalidSolutionConsole () const

bool	immediatelyPrintInvalidSolution () const

bool	hasTimeIntegrator () const

virtual void	execute (const ExecFlagType &exec_type)

virtual void	executeAllObjects (const ExecFlagType &exec_type)

virtual Executor &	getExecutor (const std::string &name)

virtual void	computeUserObjects (const ExecFlagType &type, const Moose::AuxGroup &group)

virtual void	computeUserObjectByName (const ExecFlagType &type, const Moose::AuxGroup &group, const std::string &name)

void	needsPreviousNewtonIteration (bool state)

bool	needsPreviousNewtonIteration () const

void	needsPreviousMultiAppFixedPointIterationSolution (bool needed, const unsigned int solver_sys_num)

bool	needsPreviousMultiAppFixedPointIterationSolution (const unsigned int solver_sys_num) const

void	needsPreviousMultiAppFixedPointIterationAuxiliary (bool state)

bool	needsPreviousMultiAppFixedPointIterationAuxiliary () const

ExecuteMooseObjectWarehouse< Control > &	getControlWarehouse ()

void	executeControls (const ExecFlagType &exec_type)

void	executeSamplers (const ExecFlagType &exec_type)

virtual void	updateActiveObjects ()

void	reportMooseObjectDependency (MooseObject a, MooseObject b)

ExecuteMooseObjectWarehouse< MultiApp > &	getMultiAppWarehouse ()

bool	hasJacobian () const

bool	constJacobian () const

void	addOutput (const std::string &, const std::string &, InputParameters &)

TheWarehouse &	theWarehouse () const

void	setSNESMFReuseBase (bool reuse, bool set_by_user)

bool	useSNESMFReuseBase ()

void	skipExceptionCheck (bool skip_exception_check)

bool	isSNESMFReuseBaseSetbyUser ()

bool &	petscOptionsInserted ()

PetscOptions &	petscOptionsDatabase ()

virtual void	setUDotRequested (const bool u_dot_requested)

virtual void	setUDotDotRequested (const bool u_dotdot_requested)

virtual void	setUDotOldRequested (const bool u_dot_old_requested)

virtual void	setUDotDotOldRequested (const bool u_dotdot_old_requested)

virtual bool	uDotRequested ()

virtual bool	uDotDotRequested ()

virtual bool	uDotOldRequested ()

virtual bool	uDotDotOldRequested ()

void	haveADObjects (bool have_ad_objects) override

virtual void	haveADObjects (bool have_ad_objects)

bool	haveADObjects () const

bool	haveADObjects () const

bool	shouldSolve () const

const MortarInterfaceWarehouse &	mortarData () const

MortarInterfaceWarehouse &	mortarData ()

virtual bool	hasNeighborCoupling () const

virtual bool	hasMortarCoupling () const

void	computingNonlinearResid (bool computing_nonlinear_residual) final

bool	computingNonlinearResid () const

virtual void	computingNonlinearResid (const bool computing_nonlinear_residual)

bool	computingNonlinearResid () const

void	setCurrentlyComputingResidual (bool currently_computing_residual) final

void	numGridSteps (unsigned int num_grid_steps)

void	uniformRefine ()

void	automaticScaling (bool automatic_scaling) override

virtual void	automaticScaling (bool automatic_scaling)

bool	automaticScaling () const

bool	automaticScaling () const

virtual void	reinitElemFaceRef (const Elem elem, unsigned int side, Real tolerance, const std::vector< Point > const pts, const std::vector< Real > *const weights=nullptr, const THREAD_ID tid=0) override

virtual void	reinitNeighborFaceRef (const Elem neighbor_elem, unsigned int neighbor_side, Real tolerance, const std::vector< Point > const pts, const std::vector< Real > *const weights=nullptr, const THREAD_ID tid=0) override

bool	fvBCsIntegrityCheck () const

void	fvBCsIntegrityCheck (bool fv_bcs_integrity_check)

void	getFVMatsAndDependencies (SubdomainID block_id, std::vector< std::shared_ptr< MaterialBase >> &face_materials, std::vector< std::shared_ptr< MaterialBase >> &neighbor_materials, std::set< MooseVariableFieldBase * > &variables, const THREAD_ID tid)

void	resizeMaterialData (Moose::MaterialDataType data_type, unsigned int nqp, const THREAD_ID tid)

bool	haveDisplaced () const override final

bool	hasLinearConvergenceObjects () const

void	setNonlinearConvergenceNames (const std::vector< ConvergenceName > &convergence_names)

void	setLinearConvergenceNames (const std::vector< ConvergenceName > &convergence_names)

void	setMultiAppFixedPointConvergenceName (const ConvergenceName &convergence_name)

void	setSteadyStateConvergenceName (const ConvergenceName &convergence_name)

const std::vector< ConvergenceName > &	getNonlinearConvergenceNames () const

const std::vector< ConvergenceName > &	getLinearConvergenceNames () const

const ConvergenceName &	getMultiAppFixedPointConvergenceName () const

const ConvergenceName &	getSteadyStateConvergenceName () const

void	computingScalingJacobian (bool computing_scaling_jacobian)

bool	computingScalingJacobian () const override final

void	computingScalingResidual (bool computing_scaling_residual)

bool	computingScalingResidual () const override final

MooseAppCoordTransform &	coordTransform ()

virtual std::size_t	numNonlinearSystems () const override

virtual std::size_t	numLinearSystems () const override

virtual std::size_t	numSolverSystems () const override

bool	isSolverSystemNonlinear (const unsigned int sys_num)

virtual unsigned int	currentNlSysNum () const override

virtual unsigned int	currentLinearSysNum () const override

virtual unsigned int	nlSysNum (const NonlinearSystemName &nl_sys_name) const override

unsigned int	linearSysNum (const LinearSystemName &linear_sys_name) const override

unsigned int	solverSysNum (const SolverSystemName &solver_sys_name) const override

unsigned int	systemNumForVariable (const VariableName &variable_name) const

bool	getFailNextNonlinearConvergenceCheck () const

bool	getFailNextSystemConvergenceCheck () const

void	setFailNextNonlinearConvergenceCheck ()

void	setFailNextSystemConvergenceCheck ()

void	resetFailNextNonlinearConvergenceCheck ()

void	resetFailNextSystemConvergenceCheck ()

void	setExecutionPrinting (const ExecFlagEnum &print_exec)

bool	shouldPrintExecution (const THREAD_ID tid) const

void	reinitMortarUserObjects (BoundaryID primary_boundary_id, BoundaryID secondary_boundary_id, bool displaced)

virtual const std::vector< VectorTag > &	currentResidualVectorTags () const override

void	setCurrentResidualVectorTags (const std::set< TagID > &vector_tags)

void	clearCurrentResidualVectorTags ()

void	clearCurrentJacobianMatrixTags ()

virtual void	needFV () override

virtual bool	haveFV () const override

virtual bool	hasNonlocalCoupling () const override

bool	identifyVariableGroupsInNL () const

virtual void	setCurrentLowerDElem (const Elem *const lower_d_elem, const THREAD_ID tid) override

virtual void	setCurrentBoundaryID (BoundaryID bid, const THREAD_ID tid) override

const std::vector< NonlinearSystemName > &	getNonlinearSystemNames () const

const std::vector< LinearSystemName > &	getLinearSystemNames () const

const std::vector< SolverSystemName > &	getSolverSystemNames () const

virtual const libMesh::CouplingMatrix &	nonlocalCouplingMatrix (const unsigned i) const override

virtual bool	checkNonlocalCouplingRequirement () const override

virtual Moose::FEBackend	feBackend () const

void	createTagMatrices (CreateTaggedMatrixKey)

bool	useHashTableMatrixAssembly () const

bool	hasKokkosObjects () const

bool	hasKokkosResidualObjects () const

void	addKokkosMeshInitializationHook (std::function< void()> function)

const bool &	currentlyComputingResidual () const

const bool &	currentlyComputingResidual () const

virtual bool	nlConverged (const unsigned int nl_sys_num)

virtual bool	converged (const unsigned int sys_num)

bool	defaultGhosting ()

virtual TagID	addVectorTag (const TagName &tag_name, const Moose::VectorTagType type=Moose::VECTOR_TAG_RESIDUAL)

void	addNotZeroedVectorTag (const TagID tag)

bool	vectorTagNotZeroed (const TagID tag) const

virtual const VectorTag &	getVectorTag (const TagID tag_id) const

std::vector< VectorTag >	getVectorTags (const std::set< TagID > &tag_ids) const

virtual const std::vector< VectorTag > &	getVectorTags (const Moose::VectorTagType type=Moose::VECTOR_TAG_ANY) const

virtual TagID	getVectorTagID (const TagName &tag_name) const

virtual TagName	vectorTagName (const TagID tag) const

virtual bool	vectorTagExists (const TagID tag_id) const

virtual bool	vectorTagExists (const TagName &tag_name) const

virtual unsigned int	numVectorTags (const Moose::VectorTagType type=Moose::VECTOR_TAG_ANY) const

virtual Moose::VectorTagType	vectorTagType (const TagID tag_id) const

virtual TagID	addMatrixTag (TagName tag_name)

virtual TagID	getMatrixTagID (const TagName &tag_name) const

virtual TagName	matrixTagName (TagID tag)

virtual bool	matrixTagExists (const TagName &tag_name) const

virtual bool	matrixTagExists (TagID tag_id) const

virtual unsigned int	numMatrixTags () const

virtual std::map< TagName, TagID > &	getMatrixTags ()

virtual bool	hasLinearVariable (const std::string &var_name) const

virtual bool	hasAuxiliaryVariable (const std::string &var_name) const

virtual const std::set< MooseVariableFieldBase *> &	getActiveElementalMooseVariables (const THREAD_ID tid) const

virtual bool	hasActiveElementalMooseVariables (const THREAD_ID tid) const

Moose::CoordinateSystemType	getCoordSystem (SubdomainID sid) const

unsigned int	getAxisymmetricRadialCoord () const

virtual DiracKernelInfo &	diracKernelInfo ()

void	reinitNeighborLowerDElem (const Elem *elem, const THREAD_ID tid=0)

void	reinitMortarElem (const Elem *elem, const THREAD_ID tid=0)

virtual void	storeSubdomainMatPropName (SubdomainID block_id, const std::string &name)

virtual void	storeBoundaryMatPropName (BoundaryID boundary_id, const std::string &name)

virtual void	storeSubdomainZeroMatProp (SubdomainID block_id, const MaterialPropertyName &name)

virtual void	storeBoundaryZeroMatProp (BoundaryID boundary_id, const MaterialPropertyName &name)

virtual void	storeSubdomainDelayedCheckMatProp (const std::string &requestor, SubdomainID block_id, const std::string &name)

virtual void	storeBoundaryDelayedCheckMatProp (const std::string &requestor, BoundaryID boundary_id, const std::string &name)

virtual void	checkBlockMatProps ()

virtual void	checkBoundaryMatProps ()

virtual void	markMatPropRequested (const std::string &)

virtual bool	isMatPropRequested (const std::string &prop_name) const

void	addConsumedPropertyName (const MooseObjectName &obj_name, const std::string &prop_name)

const std::map< MooseObjectName, std::set< std::string > > &	getConsumedPropertyMap () const

virtual std::set< SubdomainID >	getMaterialPropertyBlocks (const std::string &prop_name)

virtual std::vector< SubdomainName >	getMaterialPropertyBlockNames (const std::string &prop_name)

virtual bool	hasBlockMaterialProperty (SubdomainID block_id, const std::string &prop_name)

virtual std::set< BoundaryID >	getMaterialPropertyBoundaryIDs (const std::string &prop_name)

virtual std::vector< BoundaryName >	getMaterialPropertyBoundaryNames (const std::string &prop_name)

virtual bool	hasBoundaryMaterialProperty (BoundaryID boundary_id, const std::string &prop_name)

virtual std::set< dof_id_type > &	ghostedElems ()

const bool &	currentlyComputingJacobian () const

void	setCurrentlyComputingJacobian (const bool currently_computing_jacobian)

const bool &	currentlyComputingResidualAndJacobian () const

void	setCurrentlyComputingResidualAndJacobian (bool currently_computing_residual_and_jacobian)

virtual bool	safeAccessTaggedMatrices () const

virtual bool	safeAccessTaggedVectors () const

const std::set< TagID > &	getActiveScalarVariableCoupleableVectorTags (const THREAD_ID tid) const

const std::set< TagID > &	getActiveScalarVariableCoupleableMatrixTags (const THREAD_ID tid) const

const std::set< TagID > &	getActiveFEVariableCoupleableVectorTags (const THREAD_ID tid) const

const std::set< TagID > &	getActiveFEVariableCoupleableMatrixTags (const THREAD_ID tid) const

void	addAlgebraicGhostingFunctor (libMesh::GhostingFunctor &algebraic_gf, bool to_mesh=true)

void	addCouplingGhostingFunctor (libMesh::GhostingFunctor &coupling_gf, bool to_mesh=true)

void	removeAlgebraicGhostingFunctor (libMesh::GhostingFunctor &algebraic_gf)

void	removeCouplingGhostingFunctor (libMesh::GhostingFunctor &coupling_gf)

void	hasScalingVector (const unsigned int nl_sys_num)

void	clearAllDofIndices ()

const Moose::Functor< T > &	getFunctor (const std::string &name, const THREAD_ID tid, const std::string &requestor_name, bool requestor_is_ad)

bool	hasFunctor (const std::string &name, const THREAD_ID tid) const

bool	hasFunctorWithType (const std::string &name, const THREAD_ID tid) const

void	addFunctor (const std::string &name, const Moose::FunctorBase< T > &functor, const THREAD_ID tid)

const Moose::FunctorBase< T > &	addPiecewiseByBlockLambdaFunctor (const std::string &name, PolymorphicLambda my_lammy, const std::set< ExecFlagType > &clearance_schedule, const MooseMesh &mesh, const std::set< SubdomainID > &block_ids, const THREAD_ID tid)

void	setFunctorOutput (bool set_output)

void	setChainControlDataOutput (bool set_output)

void	registerUnfilledFunctorRequest (T *functor_interface, const std::string &functor_name, const THREAD_ID tid)

void	reinitFVFace (const THREAD_ID tid, const FaceInfo &fi)

void	preparePRefinement ()

bool	doingPRefinement () const

bool	havePRefinement () const

void	markFamilyPRefinement (const InputParameters &params)

MooseVariableFEBase &	getVariableHelper (const THREAD_ID tid, const std::string &var_name, Moose::VarKindType expected_var_type, Moose::VarFieldType expected_var_field_type, const std::vector< T > &systems, const SystemBase &aux) const

void	_setCLIOption ()

virtual void	terminateSolve ()

virtual bool	isSolveTerminationRequested () const

const ConsoleStream &	console () const

virtual bool	enabled () const

std::shared_ptr< MooseObject >	getSharedPtr ()

std::shared_ptr< const MooseObject >	getSharedPtr () const

bool	isKokkosObject () const

MooseApp &	getMooseApp () const

const std::string &	type () const

const std::string &	name () const

std::string	typeAndName () const

MooseObjectParameterName	uniqueParameterName (const std::string &parameter_name) const

MooseObjectName	uniqueName () const

const InputParameters &	parameters () const

const hit::Node *	getHitNode () const

bool	hasBase () const

const std::string &	getBase () const

const T &	getParam (const std::string &name) const

std::vector< std::pair< T1, T2 > >	getParam (const std::string &param1, const std::string &param2) const

const T *	queryParam (const std::string &name) const

const T &	getRenamedParam (const std::string &old_name, const std::string &new_name) const

T	getCheckedPointerParam (const std::string &name, const std::string &error_string="") const

bool	haveParameter (const std::string &name) const

bool	isParamValid (const std::string &name) const

bool	isParamSetByUser (const std::string &name) const

void	connectControllableParams (const std::string &parameter, const std::string &object_type, const std::string &object_name, const std::string &object_parameter) const

void	paramError (const std::string &param, Args... args) const

void	paramWarning (const std::string &param, Args... args) const

void	paramWarning (const std::string &param, Args... args) const

void	paramInfo (const std::string &param, Args... args) const

std::string	messagePrefix (const bool hit_prefix=true) const

std::string	errorPrefix (const std::string &) const

void	mooseError (Args &&... args) const

void	mooseDocumentedError (const std::string &repo_name, const unsigned int issue_num, Args &&... args) const

void	mooseErrorNonPrefixed (Args &&... args) const

void	mooseWarning (Args &&... args) const

void	mooseWarning (Args &&... args) const

void	mooseWarningNonPrefixed (Args &&... args) const

void	mooseWarningNonPrefixed (Args &&... args) const

void	mooseDeprecated (Args &&... args) const

void	mooseDeprecated (Args &&... args) const

void	mooseDeprecatedNoTrace (Args &&... args) const

void	mooseInfo (Args &&... args) const

void	callMooseError (std::string msg, const bool with_prefix, const hit::Node *node=nullptr, const bool show_trace=true) const

std::string	getDataFileName (const std::string &param) const

std::string	getDataFileNameByName (const std::string &relative_path) const

std::string	getDataFilePath (const std::string &relative_path) const

PerfGraph &	perfGraph ()

const libMesh::ConstElemRange &	getEvaluableElementRange ()

const libMesh::ConstElemRange &	getEvaluableElementRange ()

const libMesh::ConstElemRange &	getNonlinearEvaluableElementRange ()

const libMesh::ConstElemRange &	getNonlinearEvaluableElementRange ()

const libMesh::ConstElemRange &	getCurrentAlgebraicElementRange ()

const libMesh::ConstElemRange &	getCurrentAlgebraicElementRange ()

const libMesh::ConstNodeRange &	getCurrentAlgebraicNodeRange ()

const libMesh::ConstNodeRange &	getCurrentAlgebraicNodeRange ()

const ConstBndNodeRange &	getCurrentAlgebraicBndNodeRange ()

const ConstBndNodeRange &	getCurrentAlgebraicBndNodeRange ()

void	setCurrentAlgebraicElementRange (libMesh::ConstElemRange *range)

void	setCurrentAlgebraicElementRange (libMesh::ConstElemRange *range)

void	setCurrentAlgebraicNodeRange (libMesh::ConstNodeRange *range)

void	setCurrentAlgebraicNodeRange (libMesh::ConstNodeRange *range)

void	setCurrentAlgebraicBndNodeRange (ConstBndNodeRange *range)

void	setCurrentAlgebraicBndNodeRange (ConstBndNodeRange *range)

void	allowOutput (bool state)

void	allowOutput (bool state)

void	allowOutput (bool state)

void	allowOutput (bool state)

Moose::Kokkos::Array< Moose::Kokkos::System > &	getKokkosSystems ()

const Moose::Kokkos::Array< Moose::Kokkos::System > &	getKokkosSystems () const

Moose::Kokkos::Array< Moose::Kokkos::System > &	getKokkosSystems ()

const Moose::Kokkos::Array< Moose::Kokkos::System > &	getKokkosSystems () const

Moose::Kokkos::System &	getKokkosSystem (const unsigned int sys_num)

const Moose::Kokkos::System &	getKokkosSystem (const unsigned int sys_num) const

Moose::Kokkos::System &	getKokkosSystem (const unsigned int sys_num)

const Moose::Kokkos::System &	getKokkosSystem (const unsigned int sys_num) const

bool	hasMultiApps () const

bool	hasMultiApps (ExecFlagType type) const

bool	hasMultiApps () const

bool	hasMultiApps (ExecFlagType type) const

bool	hasMultiApp (const std::string &name) const

bool	hasMultiApp (const std::string &name) const

const AutomaticMortarGeneration &	getMortarInterface (const std::pair< BoundaryID, BoundaryID > &primary_secondary_boundary_pair, const std::pair< SubdomainID, SubdomainID > &primary_secondary_subdomain_pair, bool on_displaced) const

AutomaticMortarGeneration &	getMortarInterface (const std::pair< BoundaryID, BoundaryID > &primary_secondary_boundary_pair, const std::pair< SubdomainID, SubdomainID > &primary_secondary_subdomain_pair, bool on_displaced)

const AutomaticMortarGeneration &	getMortarInterface (const std::pair< BoundaryID, BoundaryID > &primary_secondary_boundary_pair, const std::pair< SubdomainID, SubdomainID > &primary_secondary_subdomain_pair, bool on_displaced) const

AutomaticMortarGeneration &	getMortarInterface (const std::pair< BoundaryID, BoundaryID > &primary_secondary_boundary_pair, const std::pair< SubdomainID, SubdomainID > &primary_secondary_subdomain_pair, bool on_displaced)

const MaterialPropertyStorage &	getMaterialPropertyStorage ()

const MaterialPropertyStorage &	getMaterialPropertyStorage ()

const MaterialPropertyStorage &	getBndMaterialPropertyStorage ()

const MaterialPropertyStorage &	getBndMaterialPropertyStorage ()

const MaterialPropertyStorage &	getNeighborMaterialPropertyStorage ()

const MaterialPropertyStorage &	getNeighborMaterialPropertyStorage ()

Moose::Kokkos::MaterialPropertyStorage &	getKokkosMaterialPropertyStorage ()

Moose::Kokkos::MaterialPropertyStorage &	getKokkosMaterialPropertyStorage ()

Moose::Kokkos::MaterialPropertyStorage &	getKokkosBndMaterialPropertyStorage ()

Moose::Kokkos::MaterialPropertyStorage &	getKokkosBndMaterialPropertyStorage ()

Moose::Kokkos::MaterialPropertyStorage &	getKokkosNeighborMaterialPropertyStorage ()

Moose::Kokkos::MaterialPropertyStorage &	getKokkosNeighborMaterialPropertyStorage ()

const MooseObjectWarehouse< Indicator > &	getIndicatorWarehouse ()

const MooseObjectWarehouse< Indicator > &	getIndicatorWarehouse ()

const MooseObjectWarehouse< InternalSideIndicatorBase > &	getInternalSideIndicatorWarehouse ()

const MooseObjectWarehouse< InternalSideIndicatorBase > &	getInternalSideIndicatorWarehouse ()

const MooseObjectWarehouse< Marker > &	getMarkerWarehouse ()

const MooseObjectWarehouse< Marker > &	getMarkerWarehouse ()

bool	needBoundaryMaterialOnSide (BoundaryID bnd_id, const THREAD_ID tid)

bool	needBoundaryMaterialOnSide (BoundaryID bnd_id, const THREAD_ID tid)

bool	needInterfaceMaterialOnSide (BoundaryID bnd_id, const THREAD_ID tid)

bool	needInterfaceMaterialOnSide (BoundaryID bnd_id, const THREAD_ID tid)

bool	needInternalNeighborSideMaterial (SubdomainID subdomain_id, const THREAD_ID tid)

bool	needInternalNeighborSideMaterial (SubdomainID subdomain_id, const THREAD_ID tid)

const ExecFlagType &	getCurrentExecuteOnFlag () const

const ExecFlagType &	getCurrentExecuteOnFlag () const

void	setCurrentExecuteOnFlag (const ExecFlagType &)

void	setCurrentExecuteOnFlag (const ExecFlagType &)

const Parallel::Communicator &	comm () const

processor_id_type	n_processors () const

processor_id_type	processor_id () const

bool	isDefaultPostprocessorValue (const std::string &param_name, const unsigned int index=0) const

bool	hasPostprocessorByName (const PostprocessorName &name) const

std::size_t	coupledPostprocessors (const std::string &param_name) const

const PostprocessorName &	getPostprocessorName (const std::string &param_name, const unsigned int index=0) const

const PostprocessorValue &	getPostprocessorValue (const std::string &param_name, const unsigned int index=0) const

const PostprocessorValue &	getPostprocessorValue (const std::string &param_name, const unsigned int index=0) const

const PostprocessorValue &	getPostprocessorValueOld (const std::string &param_name, const unsigned int index=0) const

const PostprocessorValue &	getPostprocessorValueOld (const std::string &param_name, const unsigned int index=0) const

const PostprocessorValue &	getPostprocessorValueOlder (const std::string &param_name, const unsigned int index=0) const

const PostprocessorValue &	getPostprocessorValueOlder (const std::string &param_name, const unsigned int index=0) const

const PostprocessorValue &	getPostprocessorValueOldByName (const PostprocessorName &name) const

const PostprocessorValue &	getPostprocessorValueOldByName (const PostprocessorName &name) const

const PostprocessorValue &	getPostprocessorValueOlderByName (const PostprocessorName &name) const

const PostprocessorValue &	getPostprocessorValueOlderByName (const PostprocessorName &name) const

Static Public Member Functions
static InputParameters	validParams ()

static void	callMooseError (MooseApp const app, const InputParameters &params, std::string msg, const bool with_prefix, const hit::Node node, const bool show_trace=true)

static void	selectVectorTagsFromSystem (const SystemBase &system, const std::vector< VectorTag > &input_vector_tags, std::set< TagID > &selected_tags)

static void	selectMatrixTagsFromSystem (const SystemBase &system, const std::map< TagName, TagID > &input_matrix_tags, std::set< TagID > &selected_tags)

static void	objectSetupHelper (const std::vector< T * > &objects, const ExecFlagType &exec_flag)

static void	objectSetupHelper (const std::vector< T * > &objects, const ExecFlagType &exec_flag)

static void	objectExecuteHelper (const std::vector< T * > &objects)

static void	objectExecuteHelper (const std::vector< T * > &objects)

Public Attributes
struct SubChannel1PhaseProblem::FrictionStruct	_friction_args

struct SubChannel1PhaseProblem::NusseltStruct	_nusselt_args

const PostprocessorValue &	_P_out
	Outlet pressure postprocessor value. More...

const SinglePhaseFluidProperties *	_fp
	Non-owning pointer to fluid properties user object. More...

std::map< std::string, std::vector< dof_id_type > >	_var_dof_map

	usingCombinedWarningSolutionWarnings

const ConsoleStream	_console

std::vector< Real >	_real_zero

std::vector< VariableValue >	_scalar_zero

std::vector< VariableValue >	_zero

std::vector< VariablePhiValue >	_phi_zero

std::vector< MooseArray< ADReal > >	_ad_zero

std::vector< VariableGradient >	_grad_zero

std::vector< MooseArray< ADRealVectorValue > >	_ad_grad_zero

std::vector< VariablePhiGradient >	_grad_phi_zero

std::vector< VariableSecond >	_second_zero

std::vector< MooseArray< ADRealTensorValue > >	_ad_second_zero

std::vector< VariablePhiSecond >	_second_phi_zero

std::vector< Point >	_point_zero

std::vector< VectorVariableValue >	_vector_zero

std::vector< VectorVariableCurl >	_vector_curl_zero

Static Public Attributes
static const std::string	type_param

static const std::string	name_param

static const std::string	unique_name_param

static const std::string	app_param

static const std::string	moose_base_param

static const std::string	kokkos_object_param

Protected Member Functions
virtual void	initializeSolution () override
	Function to initialize the solution & geometry fields. More...

virtual Real	computeAddedHeatPin (unsigned int i_ch, unsigned int iz) const override
	Pure virtual: daughters provide different implementations. More...

virtual Real	getSubChannelPeripheralDuctWidth (unsigned int i_ch) const override
	Function that computes the width of the duct cell that the peripheral subchannel i_ch sees. More...

virtual void	computeh (int iblock) override
	Computes Enthalpy per channel for block iblock. More...

PetscErrorCode	cleanUp ()

virtual Real	computeAddedHeatDuct (unsigned int i_ch, unsigned int iz) const
	Non-pure: implemented in the base (or override in a child if needed) More...

void	computeWijFromSolve (int iblock)
	Computes diversion crossflow per gap for block iblock. More...

void	computeSumWij (int iblock)
	Computes net diversion crossflow per channel for block iblock. More...

void	computeMdot (int iblock)
	Computes mass flow per channel for block iblock. More...

void	computeWijPrime (int iblock)
	Computes turbulent crossflow per gap for block iblock. More...

Real	computeMixingParameter (unsigned int i_gap, unsigned int iz) const
	Computes and validates the turbulent mixing parameter. More...

Real	computeSweepFlowMixingParameter (unsigned int i_gap, unsigned int iz) const
	Computes and validates the sweep-flow mixing parameter. More...

void	computeDP (int iblock)
	Computes Pressure Drop per channel for block iblock. More...

void	computeP (int iblock)
	Computes Pressure per channel for block iblock. More...

void	computeT (int iblock)
	Computes Temperature per channel for block iblock. More...

void	computeRho (int iblock)
	Computes Density per channel for block iblock. More...

void	computeMu (int iblock)
	Computes Viscosity per channel for block iblock. More...

void	computeWijResidual (int iblock)
	Computes Residual Matrix based on the lateral momentum conservation equation for block iblock. More...

libMesh::DenseVector< Real >	residualFunction (int iblock, libMesh::DenseVector< Real > solution)
	Computes Residual Vector based on the lateral momentum conservation equation for block iblock & updates flow variables based on current crossflow solution. More...

PetscErrorCode	petscSnesSolver (int iblock, const libMesh::DenseVector< Real > &solution, libMesh::DenseVector< Real > &root)
	Computes solution of nonlinear equation using snes and provided a residual in a formFunction. More...

PetscErrorCode	implicitPetscSolve (int iblock)
	Computes implicit solve using PetSc. More...

void	detectDeformation ()
	Detects whether pin diameter or duct displacement fields require geometry recalculation. More...

PetscScalar	computeInterpolationCoefficients (PetscScalar Peclet=0.0)
	Functions that computes the interpolation scheme given the Peclet number. More...

PetscScalar	computeInterpolatedValue (PetscScalar topValue, PetscScalar botValue, PetscScalar Peclet=0.0)

Real	computeGravityDir (const MooseEnum &dir) const
	inline function that is used to define the gravity direction More...

PetscErrorCode	solveAndPopulateEnthalpy (Mat A, Vec rhs, unsigned int first_node, unsigned int last_node, const char *ksp_prefix)
	Solve a linear system (A * x = rhs) with a simple PCJACOBI KSP and populate the enthalpy solution into _h_soln for nodes [first_node, last_node]. More...

PetscErrorCode	createPetscVector (Vec &v, PetscInt n)
	Petsc Functions. More...

PetscErrorCode	createPetscMatrix (Mat &M, PetscInt n, PetscInt m)

template<class T >
PetscErrorCode	populateVectorFromDense (Vec &x, const T &solution, const unsigned int first_axial_level, const unsigned int last_axial_level, const unsigned int cross_dimension)

template<class T >
PetscErrorCode	populateDenseFromVector (const Vec &x, T &solution, const unsigned int first_axial_level, const unsigned int last_axial_level, const unsigned int cross_dimension)

template<class T >
PetscErrorCode	populateVectorFromHandle (Vec &x, const T &solution, const unsigned int first_axial_level, const unsigned int last_axial_level, const unsigned int cross_dimension)

template<class T >
PetscErrorCode	populateSolutionChan (const Vec &x, T &solution, const unsigned int first_axial_level, const unsigned int last_axial_level, const unsigned int cross_dimension)

virtual void	meshChanged ()

MooseVariableFieldBase &	getVariableHelper (const THREAD_ID tid, const std::string &var_name, Moose::VarKindType expected_var_type, Moose::VarFieldType expected_var_field_type, const std::vector< T > &nls, const SystemBase &aux) const

void	createTagVectors ()

void	createTagSolutions ()

virtual void	meshDisplaced ()

void	computeSystems (const ExecFlagType &type)

bool	duplicateVariableCheck (const std::string &var_name, const libMesh::FEType &type, bool is_aux, const std::set< SubdomainID > *const active_subdomains)

void	computeUserObjectsInternal (const ExecFlagType &type, TheWarehouse::Query &query)

void	computeKokkosUserObjectsInternal (const ExecFlagType &type, TheWarehouse::Query &query)

void	checkDisplacementOrders ()

void	checkUserObjects ()

void	checkDependMaterialsHelper (const std::map< SubdomainID, std::vector< std::shared_ptr< MaterialBase >>> &materials_map)

void	checkCoordinateSystems ()

void	reinitBecauseOfGhostingOrNewGeomObjects (bool mortar_changed=false)

void	addObjectParamsHelper (InputParameters &params, const std::string &object_name, const std::string &var_param_name="variable")

bool	verifyVectorTags () const

void	flagInvalidSolutionInternal (const InvalidSolutionID invalid_solution_id) const

InvalidSolutionID	registerInvalidSolutionInternal (const std::string &message, const bool warning) const

PerfID	registerTimedSection (const std::string &section_name, const unsigned int level) const

PerfID	registerTimedSection (const std::string &section_name, const unsigned int level, const std::string &live_message, const bool print_dots=true) const

std::string	timedSectionName (const std::string &section_name) const

T &	declareRestartableData (const std::string &data_name, Args &&... args)

ManagedValue< T >	declareManagedRestartableDataWithContext (const std::string &data_name, void *context, Args &&... args)

const T &	getRestartableData (const std::string &data_name) const

T &	declareRestartableDataWithContext (const std::string &data_name, void *context, Args &&... args)

T &	declareRecoverableData (const std::string &data_name, Args &&... args)

T &	declareRestartableDataWithObjectName (const std::string &data_name, const std::string &object_name, Args &&... args)

T &	declareRestartableDataWithObjectNameWithContext (const std::string &data_name, const std::string &object_name, void *context, Args &&... args)

std::string	restartableName (const std::string &data_name) const

virtual void	addPostprocessorDependencyHelper (const PostprocessorName &) const

Protected Attributes
TriSubChannelMesh &	_tri_sch_mesh

Mat	_hc_axial_heat_conduction_mat

Vec	_hc_axial_heat_conduction_rhs

Mat	_hc_radial_heat_conduction_mat

Vec	_hc_radial_heat_conduction_rhs

Mat	_hc_sweep_enthalpy_mat

Vec	_hc_sweep_enthalpy_rhs

SubChannelMesh &	_subchannel_mesh

unsigned int	_n_blocks
	number of axial blocks More...

libMesh::DenseMatrix< Real >	_DP

libMesh::DenseMatrix< Real > &	_Wij

libMesh::DenseMatrix< Real >	_Wij_old

libMesh::DenseMatrix< Real >	_WijPrime

libMesh::DenseMatrix< Real >	_Wij_residual_matrix

const Real	_g_grav

const Real &	_kij

unsigned int	_n_cells

unsigned int	_n_gaps

unsigned int	_n_pins

unsigned int	_n_channels

unsigned int	_block_size

std::vector< Real >	_z_grid
	axial location of nodes More...

Real	_one

Real	_TR
	Flag that activates or deactivates the transient parts of the equations we solve by multiplication. More...

const bool	_compute_density
	Flag that activates or deactivates the calculation of density. More...

const bool	_compute_viscosity
	Flag that activates or deactivates the calculation of viscosity. More...

const bool	_compute_power
	Flag that informs if we need to solve the Enthalpy/Temperature equations or not. More...

const bool	_pin_mesh_exist
	Flag that informs if there is a pin mesh or not. More...

const bool	_duct_mesh_exist
	Flag that informs if there is a duct mesh or not. More...

bool	_converged
	Variable that informs whether we exited external solve with a converged solution or not. More...

bool	_time_integrator_checked = false
	Whether the time integrator has been checked for consistency with the implementation. More...

Real	_dt
	Time step. More...

Real	_CT
	Turbulent modeling parameter used in axial momentum equation. More...

const Real &	_P_tol
	Convergence tolerance for the pressure loop in external solve. More...

const Real &	_T_tol
	Convergence tolerance for the temperature loop in internal solve. More...

const int &	_T_maxit
	Maximum iterations for the inner temperature loop. More...

const PetscReal &	_rtol
	The relative convergence tolerance, (relative decrease) for the ksp linear solver. More...

const PetscReal &	_atol
	The absolute convergence tolerance for the ksp linear solver. More...

const PetscReal &	_dtol
	The divergence tolerance for the ksp linear solver. More...

const PetscInt &	_maxit
	The maximum number of iterations to use for the ksp linear solver. More...

const MooseEnum	_interpolation_scheme
	The interpolation method used in constructing the systems. More...

const MooseEnum	_gravity_direction
	The direction of gravity. More...

const Real	_dir_grav

const bool	_implicit_bool
	Flag to define the usage of a implicit or explicit solution. More...

const bool	_staggered_pressure_bool
	Flag to define the usage of staggered or collocated pressure. More...

const bool	_segregated_bool
	Segregated solve. More...

const bool	_verbose_subchannel
	Boolean to printout information related to subchannel solve. More...

bool	_deformation = false
	Flag that activates the effect of deformation (pin/duct) based on the auxvalues for displacement, Dpin. More...

const SCMFrictionClosureBase *	_friction_closure
	Friction closure object. More...

const SCMMixingClosureBase *	_mixing_closure
	Turbulent Mixing closure object. More...

const SCMHTCClosureBase *	_pin_HTC_closure
	HTC closure objects. More...

const SCMHTCClosureBase *	_duct_HTC_closure

std::unique_ptr< SolutionHandle >	_mdot_soln
	Solutions handles and link to TH tables properties. More...

std::unique_ptr< SolutionHandle >	_SumWij_soln

std::unique_ptr< SolutionHandle >	_P_soln

std::unique_ptr< SolutionHandle >	_DP_soln

std::unique_ptr< SolutionHandle >	_h_soln

std::unique_ptr< SolutionHandle >	_T_soln

std::unique_ptr< SolutionHandle >	_Tpin_soln

std::unique_ptr< SolutionHandle >	_Dpin_soln

std::unique_ptr< SolutionHandle >	_rho_soln

std::unique_ptr< SolutionHandle >	_mu_soln

std::unique_ptr< SolutionHandle >	_S_flow_soln

std::unique_ptr< SolutionHandle >	_w_perim_soln

std::unique_ptr< SolutionHandle >	_q_prime_soln

std::unique_ptr< SolutionHandle >	_duct_heat_flux_soln

std::unique_ptr< SolutionHandle >	_Tduct_soln

std::unique_ptr< SolutionHandle >	_displacement_soln

std::unique_ptr< SolutionHandle >	_ff_soln

std::unique_ptr< SolutionHandle >	_HTC_soln

Mat	_mc_sumWij_mat
	Matrices and vectors to be used in implicit assembly Mass conservation Mass conservation - sum of cross fluxes. More...

Vec	_Wij_vec

Vec	_prod

Vec	_prodp

Mat	_mc_axial_convection_mat
	Mass conservation - axial convection. More...

Vec	_mc_axial_convection_rhs

Mat	_amc_turbulent_cross_flows_mat
	Mass conservation - density time derivative No implicit matrix. More...

Vec	_amc_turbulent_cross_flows_rhs

Mat	_amc_time_derivative_mat
	Axial momentum conservation - time derivative. More...

Vec	_amc_time_derivative_rhs

Mat	_amc_advective_derivative_mat
	Axial momentum conservation - advective (Eulerian) derivative. More...

Vec	_amc_advective_derivative_rhs

Mat	_amc_cross_derivative_mat
	Axial momentum conservation - cross flux derivative. More...

Vec	_amc_cross_derivative_rhs

Mat	_amc_friction_force_mat
	Axial momentum conservation - friction force. More...

Vec	_amc_friction_force_rhs

Vec	_amc_gravity_rhs
	Axial momentum conservation - buoyancy force No implicit matrix. More...

Mat	_amc_pressure_force_mat
	Axial momentum conservation - pressure force. More...

Vec	_amc_pressure_force_rhs

Mat	_amc_sys_mdot_mat
	Axial momentum system matrix. More...

Vec	_amc_sys_mdot_rhs

Mat	_cmc_time_derivative_mat
	Cross momentum Cross momentum conservation - time derivative. More...

Vec	_cmc_time_derivative_rhs

Mat	_cmc_advective_derivative_mat
	Cross momentum conservation - advective (Eulerian) derivative. More...

Vec	_cmc_advective_derivative_rhs

Mat	_cmc_friction_force_mat
	Cross momentum conservation - friction force. More...

Vec	_cmc_friction_force_rhs

Mat	_cmc_pressure_force_mat
	Cross momentum conservation - pressure force. More...

Vec	_cmc_pressure_force_rhs

Mat	_cmc_sys_Wij_mat
	Lateral momentum system matrix. More...

Vec	_cmc_sys_Wij_rhs

Mat	_hc_time_derivative_mat
	Enthalpy Enthalpy conservation - time derivative. More...

Vec	_hc_time_derivative_rhs

Mat	_hc_advective_derivative_mat
	Enthalpy conservation - advective (Eulerian) derivative;. More...

Vec	_hc_advective_derivative_rhs

Mat	_hc_cross_derivative_mat
	Enthalpy conservation - cross flux derivative. More...

Vec	_hc_cross_derivative_rhs

Vec	_hc_added_heat_rhs
	Enthalpy conservation - source and sink. More...

Mat	_hc_sys_h_mat
	System matrices. More...

Vec	_hc_sys_h_rhs

PetscScalar	_added_K = 0.0
	Added resistances for monolithic convergence. More...

PetscScalar	_added_K_old = 1000.0

PetscScalar	_max_sumWij

PetscScalar	_max_sumWij_new

PetscScalar	_correction_factor = 1.0

MooseMesh &	_mesh

bool	_initialized

std::optional< std::vector< ConvergenceName > >	_nonlinear_convergence_names

std::optional< std::vector< ConvergenceName > >	_linear_convergence_names

std::optional< ConvergenceName >	_multiapp_fixed_point_convergence_name

std::optional< ConvergenceName >	_steady_state_convergence_name

std::set< TagID >	_fe_vector_tags

std::set< TagID >	_fe_matrix_tags

std::set< TagID >	_linear_vector_tags

std::set< TagID >	_linear_matrix_tags

const bool &	_solve

bool	_transient

Real &	_time

Real &	_time_old

int &	_t_step

Real &	_dt_old

bool	_need_to_add_default_nonlinear_convergence

bool	_need_to_add_default_multiapp_fixed_point_convergence

bool	_need_to_add_default_steady_state_convergence

const std::vector< LinearSystemName >	_linear_sys_names

const std::size_t	_num_linear_sys

std::vector< std::shared_ptr< LinearSystem > >	_linear_systems

std::map< LinearSystemName, unsigned int >	_linear_sys_name_to_num

LinearSystem *	_current_linear_sys

const bool	_using_default_nl

const std::vector< NonlinearSystemName >	_nl_sys_names

const std::size_t	_num_nl_sys

std::vector< std::shared_ptr< NonlinearSystemBase > >	_nl

std::map< NonlinearSystemName, unsigned int >	_nl_sys_name_to_num

NonlinearSystemBase *	_current_nl_sys

SolverSystem *	_current_solver_sys

std::vector< std::shared_ptr< SolverSystem > >	_solver_systems

std::map< SolverVariableName, unsigned int >	_solver_var_to_sys_num

std::map< SolverSystemName, unsigned int >	_solver_sys_name_to_num

std::vector< SolverSystemName >	_solver_sys_names

std::shared_ptr< AuxiliarySystem >	_aux

Moose::CouplingType	_coupling

std::vector< std::unique_ptr< libMesh::CouplingMatrix > >	_cm

Moose::Kokkos::Array< Moose::Kokkos::System >	_kokkos_systems

std::map< std::string, unsigned int >	_subspace_dim

std::vector< std::vector< std::unique_ptr< Assembly > > >	_assembly

Moose::Kokkos::Assembly	_kokkos_assembly

MooseObjectWarehouse< MeshDivision >	_mesh_divisions

MooseObjectWarehouse< Function >	_functions

MooseObjectWarehouse< Moose::FunctionBase >	_kokkos_functions

MooseObjectWarehouse< Convergence >	_convergences

MooseObjectWarehouse< KernelBase >	_nonlocal_kernels

MooseObjectWarehouse< IntegratedBCBase >	_nonlocal_integrated_bcs

MaterialPropertyRegistry	_material_prop_registry

MaterialPropertyStorage &	_material_props

MaterialPropertyStorage &	_bnd_material_props

MaterialPropertyStorage &	_neighbor_material_props

Moose::Kokkos::MaterialPropertyStorage &	_kokkos_material_props

Moose::Kokkos::MaterialPropertyStorage &	_kokkos_bnd_material_props

Moose::Kokkos::MaterialPropertyStorage &	_kokkos_neighbor_material_props

MooseObjectWarehouse< Marker >	_markers

ReporterData	_reporter_data

ExecuteMooseObjectWarehouse< MultiApp >	_multi_apps

ExecuteMooseObjectWarehouse< TransientMultiApp >	_transient_multi_apps

ExecuteMooseObjectWarehouse< Transfer >	_transfers

ExecuteMooseObjectWarehouse< Transfer >	_to_multi_app_transfers

ExecuteMooseObjectWarehouse< Transfer >	_from_multi_app_transfers

ExecuteMooseObjectWarehouse< Transfer >	_between_multi_app_transfers

std::map< std::string, std::unique_ptr< RandomData > >	_random_data_objects

std::vector< std::unordered_map< SubdomainID, bool > >	_block_mat_side_cache

std::vector< std::unordered_map< BoundaryID, bool > >	_bnd_mat_side_cache

std::vector< std::unordered_map< BoundaryID, bool > >	_interface_mat_side_cache

std::vector< MeshChangedInterface *>	_notify_when_mesh_changes

std::vector< MeshDisplacedInterface *>	_notify_when_mesh_displaces

Adaptivity	_adaptivity

unsigned int	_cycles_completed

std::shared_ptr< XFEMInterface >	_xfem

MooseMesh *	_displaced_mesh

std::shared_ptr< DisplacedProblem >	_displaced_problem

GeometricSearchData	_geometric_search_data

std::unique_ptr< MortarInterfaceWarehouse >	_mortar_data

bool	_reinit_displaced_elem

bool	_reinit_displaced_face

bool	_reinit_displaced_neighbor

bool	_input_file_saved

bool	_has_dampers

bool	_has_constraints

bool	_snesmf_reuse_base

bool	_skip_exception_check

bool	_snesmf_reuse_base_set_by_user

bool	_has_initialized_stateful

bool	_const_jacobian

bool	_has_jacobian

bool	_needs_old_newton_iter

bool	_previous_nl_solution_required

std::vector< bool >	_previous_multiapp_fp_nl_solution_required

bool	_previous_multiapp_fp_aux_solution_required

bool	_has_nonlocal_coupling

bool	_calculate_jacobian_in_uo

std::vector< std::vector< const MooseVariableFEBase *> >	_uo_jacobian_moose_vars

std::vector< unsigned char >	_has_active_material_properties

std::vector< SolverParams >	_solver_params

CoverageCheckMode	_kernel_coverage_check

std::vector< SubdomainName >	_kernel_coverage_blocks

const bool	_boundary_restricted_node_integrity_check

const bool	_boundary_restricted_elem_integrity_check

CoverageCheckMode	_material_coverage_check

std::vector< SubdomainName >	_material_coverage_blocks

bool	_fv_bcs_integrity_check

const bool	_material_dependency_check

const bool	_uo_aux_state_check

bool	_check_residual_for_nans

unsigned int	_max_qps

libMesh::Order	_max_scalar_order

bool	_has_time_integrator

bool	_has_exception

bool	_parallel_barrier_messaging

MooseEnum	_verbose_setup

bool	_verbose_multiapps

bool	_verbose_restore

std::string	_exception_message

ExecFlagType	_current_execute_on_flag

ExecuteMooseObjectWarehouse< Control >	_control_warehouse

Moose::PetscSupport::PetscOptions	_petsc_options

PetscOptions	_petsc_option_data_base

bool	_is_petsc_options_inserted

std::shared_ptr< LineSearch >	_line_search

std::unique_ptr< libMesh::ConstElemRange >	_evaluable_local_elem_range

std::unique_ptr< libMesh::ConstElemRange >	_nl_evaluable_local_elem_range

std::unique_ptr< libMesh::ConstElemRange >	_aux_evaluable_local_elem_range

std::unique_ptr< libMesh::ConstElemRange >	_current_algebraic_elem_range

std::unique_ptr< libMesh::ConstNodeRange >	_current_algebraic_node_range

std::unique_ptr< ConstBndNodeRange >	_current_algebraic_bnd_node_range

bool	_using_ad_mat_props

unsigned short	_current_ic_state

const bool	_use_hash_table_matrix_assembly

std::map< TagName, TagID >	_matrix_tag_name_to_tag_id

std::map< TagID, TagName >	_matrix_tag_id_to_tag_name

Factory &	_factory

DiracKernelInfo	_dirac_kernel_info

std::map< SubdomainID, std::set< std::string > >	_map_block_material_props

std::map< BoundaryID, std::set< std::string > >	_map_boundary_material_props

std::map< SubdomainID, std::set< MaterialPropertyName > >	_zero_block_material_props

std::map< BoundaryID, std::set< MaterialPropertyName > >	_zero_boundary_material_props

std::set< std::string >	_material_property_requested

std::vector< std::set< MooseVariableFieldBase *> >	_active_elemental_moose_variables

std::vector< unsigned int >	_has_active_elemental_moose_variables

std::vector< std::set< TagID > >	_active_fe_var_coupleable_matrix_tags

std::vector< std::set< TagID > >	_active_fe_var_coupleable_vector_tags

std::vector< std::set< TagID > >	_active_sc_var_coupleable_matrix_tags

std::vector< std::set< TagID > >	_active_sc_var_coupleable_vector_tags

bool	_default_ghosting

std::set< dof_id_type >	_ghosted_elems

bool	_currently_computing_jacobian

bool	_currently_computing_residual_and_jacobian

bool	_computing_nonlinear_residual

bool	_currently_computing_residual

bool	_safe_access_tagged_matrices

bool	_safe_access_tagged_vectors

bool	_have_ad_objects

std::unordered_set< TagID >	_not_zeroed_tagged_vectors

bool	_cli_option_found

bool	_color_output

bool	_termination_requested

const bool &	_enabled

MooseApp &	_app

ActionFactory &	_action_factory

const std::string &	_type

const std::string &	_name

const InputParameters &	_pars

MooseApp &	_pg_moose_app

const std::string	_prefix

MooseApp &	_restartable_app

const std::string	_restartable_system_name

const THREAD_ID	_restartable_tid

const bool	_restartable_read_only

InitialConditionWarehouse	_ics

FVInitialConditionWarehouse	_fv_ics

ScalarInitialConditionWarehouse	_scalar_ics

MaterialWarehouse	_materials

MaterialWarehouse	_interface_materials

MaterialWarehouse	_discrete_materials

MaterialWarehouse	_all_materials

MaterialWarehouse	_kokkos_materials

MooseObjectWarehouse< Indicator >	_indicators

MooseObjectWarehouse< InternalSideIndicatorBase >	_internal_side_indicators

std::map< SubdomainID, std::multimap< std::string, std::string > >	_map_block_material_props_check

std::map< BoundaryID, std::multimap< std::string, std::string > >	_map_boundary_material_props_check

const Parallel::Communicator &	_communicator

Detailed Description

Triangular subchannel solver.

Definition at line 19 of file TriSubChannel1PhaseProblem.h.

Constructor & Destructor Documentation

◆ TriSubChannel1PhaseProblem()

TriSubChannel1PhaseProblem::TriSubChannel1PhaseProblem ( const InputParameters & params )

Definition at line 31 of file TriSubChannel1PhaseProblem.C.

   : SubChannel1PhaseProblem(params),
     _tri_sch_mesh(SCM::getMesh<TriSubChannelMesh>(_subchannel_mesh))
 {
   // Initializing heat conduction system
   LibmeshPetscCall(createPetscMatrix(
       _hc_axial_heat_conduction_mat, _block_size * _n_channels, _block_size * _n_channels));
   LibmeshPetscCall(createPetscVector(_hc_axial_heat_conduction_rhs, _block_size * _n_channels));
   LibmeshPetscCall(createPetscMatrix(
       _hc_radial_heat_conduction_mat, _block_size * _n_channels, _block_size * _n_channels));
   LibmeshPetscCall(createPetscVector(_hc_radial_heat_conduction_rhs, _block_size * _n_channels));
   LibmeshPetscCall(createPetscMatrix(
       _hc_sweep_enthalpy_mat, _block_size * _n_channels, _block_size * _n_channels));
   LibmeshPetscCall(createPetscVector(_hc_sweep_enthalpy_rhs, _block_size * _n_channels));
 }

◆ ~TriSubChannel1PhaseProblem()

TriSubChannel1PhaseProblem::~TriSubChannel1PhaseProblem ( )

virtual

Definition at line 47 of file TriSubChannel1PhaseProblem.C.

 {
   PetscErrorCode ierr = cleanUp();
   if (ierr)
     mooseError(name(), ": Error in memory cleanup");
 }

Member Function Documentation

◆ cleanUp()

PetscErrorCode TriSubChannel1PhaseProblem::cleanUp ( )

protected

Definition at line 55 of file TriSubChannel1PhaseProblem.C.

Referenced by ~TriSubChannel1PhaseProblem().

 {
   PetscFunctionBegin;
   // Clean up heat conduction system
   LibmeshPetscCall(MatDestroy(&_hc_axial_heat_conduction_mat));
   LibmeshPetscCall(VecDestroy(&_hc_axial_heat_conduction_rhs));
   LibmeshPetscCall(MatDestroy(&_hc_radial_heat_conduction_mat));
   LibmeshPetscCall(VecDestroy(&_hc_radial_heat_conduction_rhs));
   LibmeshPetscCall(MatDestroy(&_hc_sweep_enthalpy_mat));
   LibmeshPetscCall(VecDestroy(&_hc_sweep_enthalpy_rhs));
   PetscFunctionReturn(LIBMESH_PETSC_SUCCESS);
 }

◆ computeAddedHeatDuct()

Real SubChannel1PhaseProblem::computeAddedHeatDuct	(	unsigned int	i_ch,
		unsigned int	iz
	)		const

protectedvirtualinherited

Non-pure: implemented in the base (or override in a child if needed)

Definition at line 2066 of file SubChannel1PhaseProblem.C.

Referenced by computeh(), and SubChannel1PhaseProblem::getAddedHeatDuct().

 {
   mooseAssert(iz > 0, "Trapezoidal rule requires starting at index 1 at least");
   if (_duct_mesh_exist)
   {
     auto subch_type = _subchannel_mesh.getSubchannelType(i_ch);
     if (subch_type == EChannelType::EDGE || subch_type == EChannelType::CORNER)
     {
       auto dz = _z_grid[iz] - _z_grid[iz - 1];
       auto * node_in_chan = _subchannel_mesh.getChannelNode(i_ch, iz - 1);
       auto * node_out_chan = _subchannel_mesh.getChannelNode(i_ch, iz);
       auto * node_in_duct = _subchannel_mesh.getDuctNodeFromChannel(node_in_chan);
       auto * node_out_duct = _subchannel_mesh.getDuctNodeFromChannel(node_out_chan);
       auto heat_rate_in = (*_duct_heat_flux_soln)(node_in_duct);
       auto heat_rate_out = (*_duct_heat_flux_soln)(node_out_duct);
       auto width = getSubChannelPeripheralDuctWidth(i_ch);
       return 0.5 * (heat_rate_in + heat_rate_out) * dz * width;
     }
     else
     {
       return 0.0;
     }
   }
   else
   {
     return 0.0;
   }
 }

◆ computeAddedHeatPin()

Real TriSubChannel1PhaseProblem::computeAddedHeatPin	(	unsigned int	i_ch,
		unsigned int	iz
	)		const

overrideprotectedvirtual

Pure virtual: daughters provide different implementations.

Implements SubChannel1PhaseProblem.

Definition at line 262 of file TriSubChannel1PhaseProblem.C.

Referenced by computeh().

 {
   if (!_pin_mesh_exist)
     return 0.0;
 
   // Compute axial location of nodes.
   auto z2 = _z_grid[iz];
   auto z1 = _z_grid[iz - 1];
   auto heated_length = _subchannel_mesh.getHeatedLength();
   auto unheated_length_entry = _subchannel_mesh.getHeatedLengthEntry();
   if (MooseUtils::absoluteFuzzyGreaterThan(z2, unheated_length_entry) &&
       MooseUtils::absoluteFuzzyLessThan(z1, unheated_length_entry + heated_length))
   {
     // Compute the height of this element.
     auto dz = z2 - z1;
     Real factor;
     auto subch_type = _subchannel_mesh.getSubchannelType(i_ch);
     switch (subch_type)
     {
       case EChannelType::CENTER:
         factor = 1.0 / 6.0;
         break;
       case EChannelType::EDGE:
         factor = 1.0 / 4.0;
         break;
       case EChannelType::CORNER:
         factor = 1.0 / 6.0;
         break;
       default:
         return 0.0; // handle invalid subch_type if needed
     }
     double heat_rate_in = 0.0;
     double heat_rate_out = 0.0;
     for (auto i_pin : _subchannel_mesh.getChannelPins(i_ch))
     {
       auto * node_in = _subchannel_mesh.getPinNode(i_pin, iz - 1);
       auto * node_out = _subchannel_mesh.getPinNode(i_pin, iz);
       heat_rate_out += factor * (*_q_prime_soln)(node_out);
       heat_rate_in += factor * (*_q_prime_soln)(node_in);
     }
     return (heat_rate_in + heat_rate_out) * dz / 2.0;
   }
   else
     return 0.0;
 }

◆ computeDP()

void SubChannel1PhaseProblem::computeDP ( int iblock )

protectedinherited

Computes Pressure Drop per channel for block iblock.

Upwind local form loss

Time derivative term

Advective derivative term

Cross derivative term

Friction term

Upwind local form loss

Gravity force

Assembling system

Definition at line 676 of file SubChannel1PhaseProblem.C.

Referenced by SubChannel1PhaseProblem::implicitPetscSolve(), and SubChannel1PhaseProblem::residualFunction().

 {
   const unsigned int last_node = (iblock + 1) * _block_size;
   const unsigned int first_node = iblock * _block_size + 1;
   if (!_implicit_bool)
   {
     for (unsigned int iz = first_node; iz < last_node + 1; iz++)
     {
       auto k_grid = _subchannel_mesh.getKGrid();
       auto dz = _z_grid[iz] - _z_grid[iz - 1];
       for (unsigned int i_ch = 0; i_ch < _n_channels; i_ch++)
       {
         auto * node_in = _subchannel_mesh.getChannelNode(i_ch, iz - 1);
         auto * node_out = _subchannel_mesh.getChannelNode(i_ch, iz);
         auto rho_in = (*_rho_soln)(node_in);
         auto rho_out = (*_rho_soln)(node_out);
         auto mu_in = (*_mu_soln)(node_in);
         auto S = (*_S_flow_soln)(node_in);
         auto w_perim = (*_w_perim_soln)(node_in);
         // hydraulic diameter in the i direction
         auto Dh_i = 4.0 * S / w_perim;
         auto time_term = _TR * ((*_mdot_soln)(node_out)-_mdot_soln->old(node_out)) * dz / _dt -
                          dz * 2.0 * (*_mdot_soln)(node_out) * (rho_out - _rho_soln->old(node_out)) /
                              rho_in / _dt;
         auto mass_term1 =
             Utility::pow<2>((*_mdot_soln)(node_out)) * (1.0 / S / rho_out - 1.0 / S / rho_in);
         auto mass_term2 = -2.0 * (*_mdot_soln)(node_out) * (*_SumWij_soln)(node_out) / S / rho_in;
         auto crossflow_term = 0.0;
         auto turbulent_term = 0.0;
         unsigned int counter = 0;
         for (auto i_gap : _subchannel_mesh.getChannelGaps(i_ch))
         {
           auto chans = _subchannel_mesh.getGapChannels(i_gap);
           unsigned int ii_ch = chans.first;
           unsigned int jj_ch = chans.second;
           auto * node_in_i = _subchannel_mesh.getChannelNode(ii_ch, iz - 1);
           auto * node_in_j = _subchannel_mesh.getChannelNode(jj_ch, iz - 1);
           auto * node_out_i = _subchannel_mesh.getChannelNode(ii_ch, iz);
           auto * node_out_j = _subchannel_mesh.getChannelNode(jj_ch, iz);
           auto rho_i = (*_rho_soln)(node_in_i);
           auto rho_j = (*_rho_soln)(node_in_j);
           auto Si = (*_S_flow_soln)(node_in_i);
           auto Sj = (*_S_flow_soln)(node_in_j);
           Real u_star = 0.0;
           // figure out donor axial velocity
           if (_Wij(i_gap, iz) > 0.0)
             u_star = (*_mdot_soln)(node_out_i) / Si / rho_i;
           else
             u_star = (*_mdot_soln)(node_out_j) / Sj / rho_j;
 
           crossflow_term +=
               _subchannel_mesh.getCrossflowSign(i_ch, counter) * _Wij(i_gap, iz) * u_star;
 
           turbulent_term += _WijPrime(i_gap, iz) * (2 * (*_mdot_soln)(node_out) / rho_in / S -
                                                     (*_mdot_soln)(node_out_j) / Sj / rho_j -
                                                     (*_mdot_soln)(node_out_i) / Si / rho_i);
           counter++;
         }
         turbulent_term *= _CT;
         auto Re = (((*_mdot_soln)(node_in) / S) * Dh_i / mu_in);
         _friction_args = FrictionStruct(i_ch, Re, S, w_perim);
         Real ff = _friction_closure->computeFrictionFactor(_friction_args);
         if (_ff_soln)
           _ff_soln->set(node_out, ff);
         auto ki = 0.0;
         if ((*_mdot_soln)(node_out) >= 0)
           ki = k_grid[i_ch][iz - 1];
         else
           ki = k_grid[i_ch][iz];
         auto friction_term = (ff * dz / Dh_i + ki) * 0.5 *
                              (*_mdot_soln)(node_out)*std::abs((*_mdot_soln)(node_out)) /
                              (S * (*_rho_soln)(node_out));
         auto gravity_term = _dir_grav * _g_grav * (*_rho_soln)(node_out)*dz * S;
         auto DP = (1 / S) * (time_term + mass_term1 + mass_term2 + crossflow_term + turbulent_term +
                              friction_term + gravity_term); // Pa
         _DP(i_ch, iz) = DP;
         if (_DP_soln)
           _DP_soln->set(node_out, DP);
       }
     }
   }
   else
   {
     LibmeshPetscCall(MatZeroEntries(_amc_time_derivative_mat));
     LibmeshPetscCall(MatZeroEntries(_amc_advective_derivative_mat));
     LibmeshPetscCall(MatZeroEntries(_amc_cross_derivative_mat));
     LibmeshPetscCall(MatZeroEntries(_amc_friction_force_mat));
     LibmeshPetscCall(VecZeroEntries(_amc_time_derivative_rhs));
     LibmeshPetscCall(VecZeroEntries(_amc_advective_derivative_rhs));
     LibmeshPetscCall(VecZeroEntries(_amc_cross_derivative_rhs));
     LibmeshPetscCall(VecZeroEntries(_amc_friction_force_rhs));
     LibmeshPetscCall(VecZeroEntries(_amc_gravity_rhs));
     LibmeshPetscCall(MatZeroEntries(_amc_sys_mdot_mat));
     LibmeshPetscCall(VecZeroEntries(_amc_sys_mdot_rhs));
     for (unsigned int iz = first_node; iz < last_node + 1; iz++)
     {
       auto k_grid = _subchannel_mesh.getKGrid();
       auto dz = _z_grid[iz] - _z_grid[iz - 1];
       auto iz_ind = iz - first_node;
       for (unsigned int i_ch = 0; i_ch < _n_channels; i_ch++)
       {
         // inlet and outlet nodes
         auto * node_in = _subchannel_mesh.getChannelNode(i_ch, iz - 1);
         auto * node_out = _subchannel_mesh.getChannelNode(i_ch, iz);
 
         // interpolation weight coefficient
         PetscScalar Pe = 0.5;
         if (_interpolation_scheme == 3)
         {
           // Compute the Peclet number
           auto S_in = (*_S_flow_soln)(node_in);
           auto S_out = (*_S_flow_soln)(node_out);
           auto S_interp = computeInterpolatedValue(S_out, S_in, 0.5);
           auto w_perim_in = (*_w_perim_soln)(node_in);
           auto w_perim_out = (*_w_perim_soln)(node_out);
           auto w_perim_interp = this->computeInterpolatedValue(w_perim_out, w_perim_in, 0.5);
           auto mdot_loc =
               this->computeInterpolatedValue((*_mdot_soln)(node_out), (*_mdot_soln)(node_in), 0.5);
           auto mu_in = (*_mu_soln)(node_in);
           auto mu_out = (*_mu_soln)(node_out);
           auto mu_interp = this->computeInterpolatedValue(mu_out, mu_in, 0.5);
           auto Dh_i = 4.0 * S_interp / w_perim_interp;
           // Compute friction factor
           auto Re = ((mdot_loc / S_interp) * Dh_i / mu_interp);
           _friction_args = FrictionStruct(i_ch, Re, S_interp, w_perim_interp);
           Real ff = _friction_closure->computeFrictionFactor(_friction_args);
           if (_ff_soln)
             _ff_soln->set(node_out, ff);
           auto ki = 0.0;
           if ((*_mdot_soln)(node_out) >= 0)
             ki = k_grid[i_ch][iz - 1];
           else
             ki = k_grid[i_ch][iz];
           Pe = 1.0 / ((ff * dz / Dh_i + ki) * 0.5) * mdot_loc / std::abs(mdot_loc);
         }
         auto alpha = computeInterpolationCoefficients(Pe);
 
         // inlet, outlet, and interpolated density
         auto rho_in = (*_rho_soln)(node_in);
         auto rho_out = (*_rho_soln)(node_out);
         auto rho_interp = computeInterpolatedValue(rho_out, rho_in, Pe);
 
         // inlet, outlet, and interpolated viscosity
         auto mu_in = (*_mu_soln)(node_in);
         auto mu_out = (*_mu_soln)(node_out);
         auto mu_interp = computeInterpolatedValue(mu_out, mu_in, Pe);
 
         // inlet, outlet, and interpolated axial surface area
         auto S_in = (*_S_flow_soln)(node_in);
         auto S_out = (*_S_flow_soln)(node_out);
         auto S_interp = computeInterpolatedValue(S_out, S_in, Pe);
 
         // inlet, outlet, and interpolated wetted perimeter
         auto w_perim_in = (*_w_perim_soln)(node_in);
         auto w_perim_out = (*_w_perim_soln)(node_out);
         auto w_perim_interp = computeInterpolatedValue(w_perim_out, w_perim_in, Pe);
 
         // hydraulic diameter in the i direction
         auto Dh_i = 4.0 * S_interp / w_perim_interp;
 
         if (iz == first_node)
         {
           PetscScalar value_vec_tt = -1.0 * _TR * alpha * (*_mdot_soln)(node_in)*dz / _dt;
           PetscInt row_vec_tt = i_ch + _n_channels * iz_ind;
           LibmeshPetscCall(
               VecSetValues(_amc_time_derivative_rhs, 1, &row_vec_tt, &value_vec_tt, ADD_VALUES));
         }
         else
         {
           PetscInt row_tt = i_ch + _n_channels * iz_ind;
           PetscInt col_tt = i_ch + _n_channels * (iz_ind - 1);
           PetscScalar value_tt = _TR * alpha * dz / _dt;
           LibmeshPetscCall(MatSetValues(
               _amc_time_derivative_mat, 1, &row_tt, 1, &col_tt, &value_tt, INSERT_VALUES));
         }
 
         // Adding diagonal elements
         PetscInt row_tt = i_ch + _n_channels * iz_ind;
         PetscInt col_tt = i_ch + _n_channels * iz_ind;
         PetscScalar value_tt = _TR * (1.0 - alpha) * dz / _dt;
         LibmeshPetscCall(MatSetValues(
             _amc_time_derivative_mat, 1, &row_tt, 1, &col_tt, &value_tt, INSERT_VALUES));
 
         // Adding RHS elements
         PetscScalar mdot_old_interp =
             computeInterpolatedValue(_mdot_soln->old(node_out), _mdot_soln->old(node_in), Pe);
         PetscScalar value_vec_tt = _TR * mdot_old_interp * dz / _dt;
         PetscInt row_vec_tt = i_ch + _n_channels * iz_ind;
         LibmeshPetscCall(
             VecSetValues(_amc_time_derivative_rhs, 1, &row_vec_tt, &value_vec_tt, ADD_VALUES));
 
         if (iz == first_node)
         {
           PetscScalar value_vec_at = Utility::pow<2>((*_mdot_soln)(node_in)) / (S_in * rho_in);
           PetscInt row_vec_at = i_ch + _n_channels * iz_ind;
           LibmeshPetscCall(VecSetValues(
               _amc_advective_derivative_rhs, 1, &row_vec_at, &value_vec_at, ADD_VALUES));
         }
         else
         {
           PetscInt row_at = i_ch + _n_channels * iz_ind;
           PetscInt col_at = i_ch + _n_channels * (iz_ind - 1);
           PetscScalar value_at = -1.0 * std::abs((*_mdot_soln)(node_in)) / (S_in * rho_in);
           LibmeshPetscCall(MatSetValues(
               _amc_advective_derivative_mat, 1, &row_at, 1, &col_at, &value_at, INSERT_VALUES));
         }
 
         // Adding diagonal elements
         PetscInt row_at = i_ch + _n_channels * iz_ind;
         PetscInt col_at = i_ch + _n_channels * iz_ind;
         PetscScalar value_at = std::abs((*_mdot_soln)(node_out)) / (S_out * rho_out);
         LibmeshPetscCall(MatSetValues(
             _amc_advective_derivative_mat, 1, &row_at, 1, &col_at, &value_at, INSERT_VALUES));
 
         unsigned int counter = 0;
         unsigned int cross_index = iz; // iz-1;
         for (auto i_gap : _subchannel_mesh.getChannelGaps(i_ch))
         {
           auto chans = _subchannel_mesh.getGapChannels(i_gap);
           unsigned int ii_ch = chans.first;
           unsigned int jj_ch = chans.second;
           auto * node_in_i = _subchannel_mesh.getChannelNode(ii_ch, iz - 1);
           auto * node_in_j = _subchannel_mesh.getChannelNode(jj_ch, iz - 1);
           auto * node_out_i = _subchannel_mesh.getChannelNode(ii_ch, iz);
           auto * node_out_j = _subchannel_mesh.getChannelNode(jj_ch, iz);
           auto rho_i =
               computeInterpolatedValue((*_rho_soln)(node_out_i), (*_rho_soln)(node_in_i), Pe);
           auto rho_j =
               computeInterpolatedValue((*_rho_soln)(node_out_j), (*_rho_soln)(node_in_j), Pe);
           auto S_i =
               computeInterpolatedValue((*_S_flow_soln)(node_out_i), (*_S_flow_soln)(node_in_i), Pe);
           auto S_j =
               computeInterpolatedValue((*_S_flow_soln)(node_out_j), (*_S_flow_soln)(node_in_j), Pe);
           auto u_star = 0.0;
           // figure out donor axial velocity
           if (_Wij(i_gap, cross_index) > 0.0)
           {
             if (iz == first_node)
             {
               u_star = (*_mdot_soln)(node_in_i) / S_i / rho_i;
               PetscScalar value_vec_ct = -1.0 * alpha *
                                          _subchannel_mesh.getCrossflowSign(i_ch, counter) *
                                          _Wij(i_gap, cross_index) * u_star;
               PetscInt row_vec_ct = i_ch + _n_channels * iz_ind;
               LibmeshPetscCall(VecSetValues(
                   _amc_cross_derivative_rhs, 1, &row_vec_ct, &value_vec_ct, ADD_VALUES));
             }
             else
             {
               PetscScalar value_ct = alpha * _subchannel_mesh.getCrossflowSign(i_ch, counter) *
                                      _Wij(i_gap, cross_index) / S_i / rho_i;
               PetscInt row_ct = i_ch + _n_channels * iz_ind;
               PetscInt col_ct = ii_ch + _n_channels * (iz_ind - 1);
               LibmeshPetscCall(MatSetValues(
                   _amc_cross_derivative_mat, 1, &row_ct, 1, &col_ct, &value_ct, ADD_VALUES));
             }
             PetscScalar value_ct = (1.0 - alpha) *
                                    _subchannel_mesh.getCrossflowSign(i_ch, counter) *
                                    _Wij(i_gap, cross_index) / S_i / rho_i;
             PetscInt row_ct = i_ch + _n_channels * iz_ind;
             PetscInt col_ct = ii_ch + _n_channels * iz_ind;
             LibmeshPetscCall(MatSetValues(
                 _amc_cross_derivative_mat, 1, &row_ct, 1, &col_ct, &value_ct, ADD_VALUES));
           }
           else if (_Wij(i_gap, cross_index) < 0.0) // _Wij=0 operations not necessary
           {
             if (iz == first_node)
             {
               u_star = (*_mdot_soln)(node_in_j) / S_j / rho_j;
               PetscScalar value_vec_ct = -1.0 * alpha *
                                          _subchannel_mesh.getCrossflowSign(i_ch, counter) *
                                          _Wij(i_gap, cross_index) * u_star;
               PetscInt row_vec_ct = i_ch + _n_channels * iz_ind;
               LibmeshPetscCall(VecSetValues(
                   _amc_cross_derivative_rhs, 1, &row_vec_ct, &value_vec_ct, ADD_VALUES));
             }
             else
             {
               PetscScalar value_ct = alpha * _subchannel_mesh.getCrossflowSign(i_ch, counter) *
                                      _Wij(i_gap, cross_index) / S_j / rho_j;
               PetscInt row_ct = i_ch + _n_channels * iz_ind;
               PetscInt col_ct = jj_ch + _n_channels * (iz_ind - 1);
               LibmeshPetscCall(MatSetValues(
                   _amc_cross_derivative_mat, 1, &row_ct, 1, &col_ct, &value_ct, ADD_VALUES));
             }
             PetscScalar value_ct = (1.0 - alpha) *
                                    _subchannel_mesh.getCrossflowSign(i_ch, counter) *
                                    _Wij(i_gap, cross_index) / S_j / rho_j;
             PetscInt row_ct = i_ch + _n_channels * iz_ind;
             PetscInt col_ct = jj_ch + _n_channels * iz_ind;
             LibmeshPetscCall(MatSetValues(
                 _amc_cross_derivative_mat, 1, &row_ct, 1, &col_ct, &value_ct, ADD_VALUES));
           }
 
           if (iz == first_node)
           {
             PetscScalar value_vec_ct = -2.0 * alpha * (*_mdot_soln)(node_in)*_CT *
                                        _WijPrime(i_gap, cross_index) / (rho_interp * S_interp);
             value_vec_ct += alpha * (*_mdot_soln)(node_in_j)*_CT * _WijPrime(i_gap, cross_index) /
                             (rho_j * S_j);
             value_vec_ct += alpha * (*_mdot_soln)(node_in_i)*_CT * _WijPrime(i_gap, cross_index) /
                             (rho_i * S_i);
             PetscInt row_vec_ct = i_ch + _n_channels * iz_ind;
             LibmeshPetscCall(
                 VecSetValues(_amc_cross_derivative_rhs, 1, &row_vec_ct, &value_vec_ct, ADD_VALUES));
           }
           else
           {
             PetscScalar value_center_ct =
                 2.0 * alpha * _CT * _WijPrime(i_gap, cross_index) / (rho_interp * S_interp);
             PetscInt row_ct = i_ch + _n_channels * iz_ind;
             PetscInt col_ct = i_ch + _n_channels * (iz_ind - 1);
             LibmeshPetscCall(MatSetValues(
                 _amc_cross_derivative_mat, 1, &row_ct, 1, &col_ct, &value_center_ct, ADD_VALUES));
 
             PetscScalar value_left_ct =
                 -1.0 * alpha * _CT * _WijPrime(i_gap, cross_index) / (rho_j * S_j);
             row_ct = i_ch + _n_channels * iz_ind;
             col_ct = jj_ch + _n_channels * (iz_ind - 1);
             LibmeshPetscCall(MatSetValues(
                 _amc_cross_derivative_mat, 1, &row_ct, 1, &col_ct, &value_left_ct, ADD_VALUES));
 
             PetscScalar value_right_ct =
                 -1.0 * alpha * _CT * _WijPrime(i_gap, cross_index) / (rho_i * S_i);
             row_ct = i_ch + _n_channels * iz_ind;
             col_ct = ii_ch + _n_channels * (iz_ind - 1);
             LibmeshPetscCall(MatSetValues(
                 _amc_cross_derivative_mat, 1, &row_ct, 1, &col_ct, &value_right_ct, ADD_VALUES));
           }
 
           PetscScalar value_center_ct =
               2.0 * (1.0 - alpha) * _CT * _WijPrime(i_gap, cross_index) / (rho_interp * S_interp);
           PetscInt row_ct = i_ch + _n_channels * iz_ind;
           PetscInt col_ct = i_ch + _n_channels * iz_ind;
           LibmeshPetscCall(MatSetValues(
               _amc_cross_derivative_mat, 1, &row_ct, 1, &col_ct, &value_center_ct, ADD_VALUES));
 
           PetscScalar value_left_ct =
               -1.0 * (1.0 - alpha) * _CT * _WijPrime(i_gap, cross_index) / (rho_j * S_j);
           row_ct = i_ch + _n_channels * iz_ind;
           col_ct = jj_ch + _n_channels * iz_ind;
           LibmeshPetscCall(MatSetValues(
               _amc_cross_derivative_mat, 1, &row_ct, 1, &col_ct, &value_left_ct, ADD_VALUES));
 
           PetscScalar value_right_ct =
               -1.0 * (1.0 - alpha) * _CT * _WijPrime(i_gap, cross_index) / (rho_i * S_i);
           row_ct = i_ch + _n_channels * iz_ind;
           col_ct = ii_ch + _n_channels * iz_ind;
           LibmeshPetscCall(MatSetValues(
               _amc_cross_derivative_mat, 1, &row_ct, 1, &col_ct, &value_right_ct, ADD_VALUES));
           counter++;
         }
 
         PetscScalar mdot_interp =
             computeInterpolatedValue((*_mdot_soln)(node_out), (*_mdot_soln)(node_in), Pe);
         auto Re = ((mdot_interp / S_interp) * Dh_i / mu_interp);
         _friction_args = FrictionStruct(i_ch, Re, S_interp, w_perim_interp);
         Real ff = _friction_closure->computeFrictionFactor(_friction_args);
         if (_ff_soln)
           _ff_soln->set(node_out, ff);
         auto ki = 0.0;
         if ((*_mdot_soln)(node_out) >= 0)
           ki = k_grid[i_ch][iz - 1];
         else
           ki = k_grid[i_ch][iz];
         auto coef = (ff * dz / Dh_i + ki) * 0.5 * std::abs((*_mdot_soln)(node_out)) /
                     (S_interp * rho_interp);
         if (iz == first_node)
         {
           PetscScalar value_vec = -1.0 * alpha * coef * (*_mdot_soln)(node_in);
           PetscInt row_vec = i_ch + _n_channels * iz_ind;
           LibmeshPetscCall(
               VecSetValues(_amc_friction_force_rhs, 1, &row_vec, &value_vec, ADD_VALUES));
         }
         else
         {
           PetscInt row = i_ch + _n_channels * iz_ind;
           PetscInt col = i_ch + _n_channels * (iz_ind - 1);
           PetscScalar value = alpha * coef;
           LibmeshPetscCall(
               MatSetValues(_amc_friction_force_mat, 1, &row, 1, &col, &value, INSERT_VALUES));
         }
 
         // Adding diagonal elements
         PetscInt row = i_ch + _n_channels * iz_ind;
         PetscInt col = i_ch + _n_channels * iz_ind;
         PetscScalar value = (1.0 - alpha) * coef;
         LibmeshPetscCall(
             MatSetValues(_amc_friction_force_mat, 1, &row, 1, &col, &value, INSERT_VALUES));
 
         PetscScalar value_vec = _dir_grav * -1.0 * _g_grav * rho_interp * dz * S_interp;
         PetscInt row_vec = i_ch + _n_channels * iz_ind;
         LibmeshPetscCall(VecSetValues(_amc_gravity_rhs, 1, &row_vec, &value_vec, ADD_VALUES));
       }
     }
     LibmeshPetscCall(MatZeroEntries(_amc_sys_mdot_mat));
     LibmeshPetscCall(VecZeroEntries(_amc_sys_mdot_rhs));
     LibmeshPetscCall(MatAssemblyBegin(_amc_time_derivative_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_amc_time_derivative_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyBegin(_amc_advective_derivative_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_amc_advective_derivative_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyBegin(_amc_cross_derivative_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_amc_cross_derivative_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyBegin(_amc_friction_force_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_amc_friction_force_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyBegin(_amc_sys_mdot_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_amc_sys_mdot_mat, MAT_FINAL_ASSEMBLY));
     // Matrix
 #if !PETSC_VERSION_LESS_THAN(3, 15, 0)
     LibmeshPetscCall(
         MatAXPY(_amc_sys_mdot_mat, 1.0, _amc_time_derivative_mat, UNKNOWN_NONZERO_PATTERN));
     LibmeshPetscCall(MatAssemblyBegin(_amc_sys_mdot_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_amc_sys_mdot_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(
         MatAXPY(_amc_sys_mdot_mat, 1.0, _amc_advective_derivative_mat, UNKNOWN_NONZERO_PATTERN));
     LibmeshPetscCall(MatAssemblyBegin(_amc_sys_mdot_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_amc_sys_mdot_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(
         MatAXPY(_amc_sys_mdot_mat, 1.0, _amc_cross_derivative_mat, UNKNOWN_NONZERO_PATTERN));
     LibmeshPetscCall(MatAssemblyBegin(_amc_sys_mdot_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_amc_sys_mdot_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(
         MatAXPY(_amc_sys_mdot_mat, 1.0, _amc_friction_force_mat, UNKNOWN_NONZERO_PATTERN));
 #else
     LibmeshPetscCall(
         MatAXPY(_amc_sys_mdot_mat, 1.0, _amc_time_derivative_mat, DIFFERENT_NONZERO_PATTERN));
     LibmeshPetscCall(MatAssemblyBegin(_amc_sys_mdot_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_amc_sys_mdot_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(
         MatAXPY(_amc_sys_mdot_mat, 1.0, _amc_advective_derivative_mat, DIFFERENT_NONZERO_PATTERN));
     LibmeshPetscCall(MatAssemblyBegin(_amc_sys_mdot_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_amc_sys_mdot_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(
         MatAXPY(_amc_sys_mdot_mat, 1.0, _amc_cross_derivative_mat, DIFFERENT_NONZERO_PATTERN));
     LibmeshPetscCall(MatAssemblyBegin(_amc_sys_mdot_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_amc_sys_mdot_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(
         MatAXPY(_amc_sys_mdot_mat, 1.0, _amc_friction_force_mat, DIFFERENT_NONZERO_PATTERN));
 #endif
     LibmeshPetscCall(MatAssemblyBegin(_amc_sys_mdot_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_amc_sys_mdot_mat, MAT_FINAL_ASSEMBLY));
     // RHS
     LibmeshPetscCall(VecAXPY(_amc_sys_mdot_rhs, 1.0, _amc_time_derivative_rhs));
     LibmeshPetscCall(VecAXPY(_amc_sys_mdot_rhs, 1.0, _amc_advective_derivative_rhs));
     LibmeshPetscCall(VecAXPY(_amc_sys_mdot_rhs, 1.0, _amc_cross_derivative_rhs));
     LibmeshPetscCall(VecAXPY(_amc_sys_mdot_rhs, 1.0, _amc_friction_force_rhs));
     LibmeshPetscCall(VecAXPY(_amc_sys_mdot_rhs, 1.0, _amc_gravity_rhs));
     if (_segregated_bool)
     {
       // Assembly the matrix system
       LibmeshPetscCall(populateVectorFromHandle<SolutionHandle>(
           _prod, *_mdot_soln, first_node, last_node, _n_channels));
       Vec ls;
       LibmeshPetscCall(VecDuplicate(_amc_sys_mdot_rhs, &ls));
       LibmeshPetscCall(MatMult(_amc_sys_mdot_mat, _prod, ls));
       LibmeshPetscCall(VecAXPY(ls, -1.0, _amc_sys_mdot_rhs));
       PetscScalar * xx;
       LibmeshPetscCall(VecGetArray(ls, &xx));
       for (unsigned int iz = first_node; iz < last_node + 1; iz++)
       {
         auto iz_ind = iz - first_node;
         for (unsigned int i_ch = 0; i_ch < _n_channels; i_ch++)
         {
           // Setting nodes
           auto * node_in = _subchannel_mesh.getChannelNode(i_ch, iz - 1);
           auto * node_out = _subchannel_mesh.getChannelNode(i_ch, iz);
 
           // inlet, outlet, and interpolated axial surface area
           auto S_in = (*_S_flow_soln)(node_in);
           auto S_out = (*_S_flow_soln)(node_out);
           auto S_interp = computeInterpolatedValue(S_out, S_in, 0.5);
 
           // Setting solutions
           if (S_interp != 0)
           {
             auto DP = (1 / S_interp) * xx[iz_ind * _n_channels + i_ch];
             _DP(i_ch, iz) = DP;
             if (_DP_soln)
               _DP_soln->set(node_out, DP);
           }
           else
           {
             auto DP = 0.0;
             _DP(i_ch, iz) = DP;
             if (_DP_soln)
               _DP_soln->set(node_out, DP);
           }
         }
       }
       LibmeshPetscCall(VecDestroy(&ls));
     }
   }
 }

◆ computeGravityDir()

Real SubChannel1PhaseProblem::computeGravityDir ( const MooseEnum & dir ) const

inlineprotectedinherited

inline function that is used to define the gravity direction

Definition at line 161 of file SubChannel1PhaseProblem.h.

   {
     switch (dir)
     {
       case 0: // counter_flow
         return 1.0;
       case 1: // co_flow
         return -1.0;
       case 2: // none
         return 0.0;
       default:
         mooseError(name(), ": Invalid gravity direction: expected counter_flow, co_flow, or none");
     }
   }

◆ computeh()

void TriSubChannel1PhaseProblem::computeh ( int iblock )

overrideprotectedvirtual

Computes Enthalpy per channel for block iblock.

TODO: Current axial derivative is zero - check if outflow conditions may make a difference

Implements SubChannel1PhaseProblem.

Definition at line 325 of file TriSubChannel1PhaseProblem.C.

 {
   unsigned int last_node = (iblock + 1) * _block_size;
   unsigned int first_node = iblock * _block_size + 1;
   const Real & wire_lead_length = _tri_sch_mesh.getWireLeadLength();
   const Real & wire_diameter = _tri_sch_mesh.getWireDiameter();
   const Real & pitch = _subchannel_mesh.getPitch();
   const Real & pin_diameter = _subchannel_mesh.getPinDiameter();
 
   if (iblock == 0)
   {
     for (unsigned int i_ch = 0; i_ch < _n_channels; i_ch++)
     {
       auto * node = _subchannel_mesh.getChannelNode(i_ch, 0);
       auto h_out = _fp->h_from_p_T((*_P_soln)(node) + _P_out, (*_T_soln)(node));
       if (h_out < 0)
       {
         mooseError(
             name(), " : Calculation of negative Enthalpy h_out = : ", h_out, " Axial Level= : ", 0);
       }
       _h_soln->set(node, h_out);
     }
   }
 
   if (!_implicit_bool)
   {
     for (unsigned int iz = first_node; iz < last_node + 1; iz++)
     {
       auto z_grid = _subchannel_mesh.getZGrid();
       auto dz = z_grid[iz] - z_grid[iz - 1];
       // Calculation of average mass flux of all periphery subchannels
       Real edge_flux_ave = 0.0;
       Real mdot_sum = 0.0;
       Real si_sum = 0.0;
       for (unsigned int i_ch = 0; i_ch < _n_channels; i_ch++)
       {
         auto subch_type = _subchannel_mesh.getSubchannelType(i_ch);
         if (subch_type == EChannelType::EDGE || subch_type == EChannelType::CORNER)
         {
           auto * node_in = _subchannel_mesh.getChannelNode(i_ch, iz - 1);
           auto Si = (*_S_flow_soln)(node_in);
           auto mdot_in = (*_mdot_soln)(node_in);
           mdot_sum = mdot_sum + mdot_in;
           si_sum = si_sum + Si;
         }
       }
       edge_flux_ave = mdot_sum / si_sum;
 
       for (unsigned int i_ch = 0; i_ch < _n_channels; i_ch++)
       {
         auto * node_in = _subchannel_mesh.getChannelNode(i_ch, iz - 1);
         auto * node_out = _subchannel_mesh.getChannelNode(i_ch, iz);
         auto mdot_in = (*_mdot_soln)(node_in);
         auto h_in = (*_h_soln)(node_in); // J/kg
         auto volume = dz * (*_S_flow_soln)(node_in);
         auto mdot_out = (*_mdot_soln)(node_out);
         auto h_out = 0.0;
         Real sumWijh = 0.0;
         Real sumWijPrimeDhij = 0.0;
         Real sweep_enthalpy = 0.0;
         Real e_cond = 0.0;
 
         // Calculate added enthalpy from heatflux (Pin, Duct)
         Real added_enthalpy = computeAddedHeatPin(i_ch, iz);
         added_enthalpy += computeAddedHeatDuct(i_ch, iz);
 
         // Calculate net sum of enthalpy into/out-of channel i from channels j around i
         // (Turbulent diffusion, Diversion Crossflow, Sweep flow Enthalpy, Radial heat conduction)
         unsigned int counter = 0;
         for (auto i_gap : _subchannel_mesh.getChannelGaps(i_ch))
         {
           auto chans = _subchannel_mesh.getGapChannels(i_gap);
           auto gap = _subchannel_mesh.getGapWidth(iz, i_gap);
           auto Sij = dz * gap;
           unsigned int ii_ch = chans.first;  // the first subchannel next to gap i_gap
           unsigned int jj_ch = chans.second; // the second subchannel next to gap i_gap
           auto * node_in_i = _subchannel_mesh.getChannelNode(ii_ch, iz - 1);
           auto * node_in_j = _subchannel_mesh.getChannelNode(jj_ch, iz - 1);
           auto subch_type_i = _subchannel_mesh.getSubchannelType(ii_ch);
           auto subch_type_j = _subchannel_mesh.getSubchannelType(jj_ch);
           // Define donor enthalpy
           auto h_star = 0.0;
           if (_Wij(i_gap, iz) > 0.0)
             h_star = (*_h_soln)(node_in_i);
           else if (_Wij(i_gap, iz) < 0.0)
             h_star = (*_h_soln)(node_in_j);
           // Diversion crossflow
           // take care of the sign by applying the map, use donor cell
           sumWijh += _subchannel_mesh.getCrossflowSign(i_ch, counter) * _Wij(i_gap, iz) * h_star;
           counter++;
           // SWEEP FLOW is calculated if i_gap is located in the periphery
           // and we have a wire-wrap (if i_gap is in the periphery then i_ch is in the periphery)
           // There are two gaps per periphery subchannel that this is true.
           if ((subch_type_i == EChannelType::CORNER || subch_type_i == EChannelType::EDGE) &&
               (subch_type_j == EChannelType::CORNER || subch_type_j == EChannelType::EDGE) &&
               (wire_lead_length != 0) && (wire_diameter != 0))
           {
             // donor subchannel and node of sweep flow. The donor subchannel is the subchannel next
             // to i_ch that sweep flow, flows from and into i_ch
             auto sweep_donor = _tri_sch_mesh.getSweepFlowChans(i_ch).first;
             auto * node_sweep_donor = _subchannel_mesh.getChannelNode(sweep_donor, iz - 1);
             // if one of the neighbor subchannels of the periphery gap is the donor subchannel
             //(the other would be the i_ch) sweep enthalpy flows into i_ch
             if ((ii_ch == sweep_donor) || (jj_ch == sweep_donor))
             {
               sweep_enthalpy += computeSweepFlowMixingParameter(i_gap, iz) * edge_flux_ave * Sij *
                                 (*_h_soln)(node_sweep_donor);
             }
             // else sweep enthalpy flows out of i_ch
             else
             {
               sweep_enthalpy -= computeSweepFlowMixingParameter(i_gap, iz) * edge_flux_ave * Sij *
                                 (*_h_soln)(node_in);
             }
           }
           // Inner gap
           // Turbulent Diffusion
           else
           {
             sumWijPrimeDhij +=
                 _WijPrime(i_gap, iz) * (2 * h_in - (*_h_soln)(node_in_j) - (*_h_soln)(node_in_i));
           }
 
           // compute the radial heat conduction through the gaps
           Real dist_ij = pitch;
 
           if (subch_type_i == EChannelType::EDGE && subch_type_j == EChannelType::EDGE)
           {
             dist_ij = pitch;
           }
           else if ((subch_type_i == EChannelType::CORNER && subch_type_j == EChannelType::EDGE) ||
                    (subch_type_i == EChannelType::EDGE && subch_type_j == EChannelType::CORNER))
           {
             dist_ij = pitch;
           }
           else
           {
             dist_ij = pitch / std::sqrt(3);
           }
 
           auto thcon_i = _fp->k_from_p_T((*_P_soln)(node_in_i) + _P_out, (*_T_soln)(node_in_i));
           auto thcon_j = _fp->k_from_p_T((*_P_soln)(node_in_j) + _P_out, (*_T_soln)(node_in_j));
           auto shape_factor =
               0.66 * (pitch / pin_diameter) *
               std::pow((_subchannel_mesh.getGapWidth(iz, i_gap) / pin_diameter), -0.3);
           if (ii_ch == i_ch)
           {
             e_cond += 0.5 * (thcon_i + thcon_j) * Sij * shape_factor *
                       ((*_T_soln)(node_in_j) - (*_T_soln)(node_in_i)) / dist_ij;
           }
           else
           {
             e_cond += -0.5 * (thcon_i + thcon_j) * Sij * shape_factor *
                       ((*_T_soln)(node_in_j) - (*_T_soln)(node_in_i)) / dist_ij;
           }
         }
 
         // compute the axial heat conduction between current and lower axial node
         auto * node_in_i = _subchannel_mesh.getChannelNode(i_ch, iz);
         auto * node_in_j = _subchannel_mesh.getChannelNode(i_ch, iz - 1);
         auto thcon_i = _fp->k_from_p_T((*_P_soln)(node_in_i) + _P_out, (*_T_soln)(node_in_i));
         auto thcon_j = _fp->k_from_p_T((*_P_soln)(node_in_j) + _P_out, (*_T_soln)(node_in_j));
         auto Si = (*_S_flow_soln)(node_in_i);
         auto dist_ij = z_grid[iz] - z_grid[iz - 1];
 
         e_cond += 0.5 * (thcon_i + thcon_j) * Si * ((*_T_soln)(node_in_j) - (*_T_soln)(node_in_i)) /
                   dist_ij;
 
         unsigned int nz = _subchannel_mesh.getNumOfAxialCells();
         // compute the axial heat conduction between current and upper axial node
         if (iz < nz)
         {
           auto * node_in_i = _subchannel_mesh.getChannelNode(i_ch, iz);
           auto * node_in_j = _subchannel_mesh.getChannelNode(i_ch, iz + 1);
           auto thcon_i = _fp->k_from_p_T((*_P_soln)(node_in_i) + _P_out, (*_T_soln)(node_in_i));
           auto thcon_j = _fp->k_from_p_T((*_P_soln)(node_in_j) + _P_out, (*_T_soln)(node_in_j));
           auto Si = (*_S_flow_soln)(node_in_i);
           auto dist_ij = z_grid[iz + 1] - z_grid[iz];
           e_cond += 0.5 * (thcon_i + thcon_j) * Si *
                     ((*_T_soln)(node_in_j) - (*_T_soln)(node_in_i)) / dist_ij;
         }
 
         // end of radial heat conduction calc.
         h_out =
             (mdot_in * h_in - sumWijh - sumWijPrimeDhij + added_enthalpy + e_cond + sweep_enthalpy +
              _TR * _rho_soln->old(node_out) * _h_soln->old(node_out) * volume / _dt) /
             (mdot_out + _TR * (*_rho_soln)(node_out)*volume / _dt);
         if (h_out < 0)
         {
           mooseError(name(),
                      " : Calculation of negative Enthalpy h_out = : ",
                      h_out,
                      " Axial Level= : ",
                      iz);
         }
         _h_soln->set(node_out, h_out); // J/kg
       }
     }
   }
   else
   {
     LibmeshPetscCall(MatZeroEntries(_hc_time_derivative_mat));
     LibmeshPetscCall(MatZeroEntries(_hc_advective_derivative_mat));
     LibmeshPetscCall(MatZeroEntries(_hc_cross_derivative_mat));
     LibmeshPetscCall(MatZeroEntries(_hc_axial_heat_conduction_mat));
     LibmeshPetscCall(MatZeroEntries(_hc_radial_heat_conduction_mat));
     LibmeshPetscCall(MatZeroEntries(_hc_sweep_enthalpy_mat));
 
     LibmeshPetscCall(VecZeroEntries(_hc_time_derivative_rhs));
     LibmeshPetscCall(VecZeroEntries(_hc_advective_derivative_rhs));
     LibmeshPetscCall(VecZeroEntries(_hc_cross_derivative_rhs));
     LibmeshPetscCall(VecZeroEntries(_hc_added_heat_rhs));
     LibmeshPetscCall(VecZeroEntries(_hc_axial_heat_conduction_rhs));
     LibmeshPetscCall(VecZeroEntries(_hc_radial_heat_conduction_rhs));
     LibmeshPetscCall(VecZeroEntries(_hc_sweep_enthalpy_rhs));
 
     LibmeshPetscCall(MatZeroEntries(_hc_sys_h_mat));
     LibmeshPetscCall(VecZeroEntries(_hc_sys_h_rhs));
 
     for (unsigned int iz = first_node; iz < last_node + 1; iz++)
     {
       auto dz = _z_grid[iz] - _z_grid[iz - 1];
       auto pitch = _subchannel_mesh.getPitch();
       auto pin_diameter = _subchannel_mesh.getPinDiameter();
       auto iz_ind = iz - first_node;
 
       for (unsigned int i_ch = 0; i_ch < _n_channels; i_ch++)
       {
         auto * node_in = _subchannel_mesh.getChannelNode(i_ch, iz - 1);
         auto * node_out = _subchannel_mesh.getChannelNode(i_ch, iz);
         auto S_in = (*_S_flow_soln)(node_in);
         auto S_out = (*_S_flow_soln)(node_out);
         auto S_interp = computeInterpolatedValue(S_out, S_in, 0.5);
         auto volume = dz * S_interp;
 
         PetscScalar Pe = 0.5;
         if (_interpolation_scheme == 3)
         {
           // Compute the Peclet number
           auto w_perim_in = (*_w_perim_soln)(node_in);
           auto w_perim_out = (*_w_perim_soln)(node_out);
           auto w_perim_interp = this->computeInterpolatedValue(w_perim_out, w_perim_in, 0.5);
           auto K_in = _fp->k_from_p_T((*_P_soln)(node_in) + _P_out, (*_T_soln)(node_in));
           auto K_out = _fp->k_from_p_T((*_P_soln)(node_out) + _P_out, (*_T_soln)(node_out));
           auto K = this->computeInterpolatedValue(K_out, K_in, 0.5);
           auto cp_in = _fp->cp_from_p_T((*_P_soln)(node_in) + _P_out, (*_T_soln)(node_in));
           auto cp_out = _fp->cp_from_p_T((*_P_soln)(node_out) + _P_out, (*_T_soln)(node_out));
           auto cp = this->computeInterpolatedValue(cp_out, cp_in, 0.5);
           auto mdot_loc =
               this->computeInterpolatedValue((*_mdot_soln)(node_out), (*_mdot_soln)(node_in), 0.5);
           // hydraulic diameter in the i direction
           auto Dh_i = 4.0 * S_interp / w_perim_interp;
           Pe = mdot_loc * Dh_i * cp / (K * S_interp) * (mdot_loc / std::abs(mdot_loc));
         }
         auto alpha = computeInterpolationCoefficients(Pe);
 
         // Time derivative term
         if (iz == first_node)
         {
           PetscScalar value_vec_tt =
               -1.0 * _TR * alpha * (*_rho_soln)(node_in) * (*_h_soln)(node_in)*volume / _dt;
           PetscInt row_vec_tt = i_ch + _n_channels * iz_ind;
           LibmeshPetscCall(
               VecSetValues(_hc_time_derivative_rhs, 1, &row_vec_tt, &value_vec_tt, ADD_VALUES));
         }
         else
         {
           PetscInt row_tt = i_ch + _n_channels * iz_ind;
           PetscInt col_tt = i_ch + _n_channels * (iz_ind - 1);
           PetscScalar value_tt = _TR * alpha * (*_rho_soln)(node_in)*volume / _dt;
           LibmeshPetscCall(MatSetValues(
               _hc_time_derivative_mat, 1, &row_tt, 1, &col_tt, &value_tt, INSERT_VALUES));
         }
 
         // Adding diagonal elements
         PetscInt row_tt = i_ch + _n_channels * iz_ind;
         PetscInt col_tt = i_ch + _n_channels * iz_ind;
         PetscScalar value_tt = _TR * (1.0 - alpha) * (*_rho_soln)(node_out)*volume / _dt;
         LibmeshPetscCall(MatSetValues(
             _hc_time_derivative_mat, 1, &row_tt, 1, &col_tt, &value_tt, INSERT_VALUES));
 
         // Adding RHS elements
         PetscScalar rho_old_interp =
             computeInterpolatedValue(_rho_soln->old(node_out), _rho_soln->old(node_in), Pe);
         PetscScalar h_old_interp =
             computeInterpolatedValue(_h_soln->old(node_out), _h_soln->old(node_in), Pe);
         PetscScalar value_vec_tt = _TR * rho_old_interp * h_old_interp * volume / _dt;
         PetscInt row_vec_tt = i_ch + _n_channels * iz_ind;
         LibmeshPetscCall(
             VecSetValues(_hc_time_derivative_rhs, 1, &row_vec_tt, &value_vec_tt, ADD_VALUES));
 
         // Advective derivative term
         if (iz == first_node)
         {
           PetscInt row_at = i_ch + _n_channels * iz_ind;
           PetscScalar value_at = alpha * (*_mdot_soln)(node_in) * (*_h_soln)(node_in);
           LibmeshPetscCall(
               VecSetValues(_hc_advective_derivative_rhs, 1, &row_at, &value_at, ADD_VALUES));
 
           value_at = alpha * (*_mdot_soln)(node_out) - (1 - alpha) * (*_mdot_soln)(node_in);
           PetscInt col_at = i_ch + _n_channels * iz_ind;
           LibmeshPetscCall(MatSetValues(
               _hc_advective_derivative_mat, 1, &row_at, 1, &col_at, &value_at, ADD_VALUES));
 
           value_at = (1 - alpha) * (*_mdot_soln)(node_out);
           col_at = i_ch + _n_channels * (iz_ind + 1);
           LibmeshPetscCall(MatSetValues(
               _hc_advective_derivative_mat, 1, &row_at, 1, &col_at, &value_at, ADD_VALUES));
         }
         else if (iz == last_node)
         {
           PetscInt row_at = i_ch + _n_channels * iz_ind;
           PetscScalar value_at = 1.0 * (*_mdot_soln)(node_out);
           PetscInt col_at = i_ch + _n_channels * iz_ind;
           LibmeshPetscCall(MatSetValues(
               _hc_advective_derivative_mat, 1, &row_at, 1, &col_at, &value_at, ADD_VALUES));
 
           value_at = -1.0 * (*_mdot_soln)(node_in);
           col_at = i_ch + _n_channels * (iz_ind - 1);
           LibmeshPetscCall(MatSetValues(
               _hc_advective_derivative_mat, 1, &row_at, 1, &col_at, &value_at, ADD_VALUES));
         }
         else
         {
           PetscInt row_at = i_ch + _n_channels * iz_ind;
           PetscInt col_at;
 
           PetscScalar value_at = -alpha * (*_mdot_soln)(node_in);
           col_at = i_ch + _n_channels * (iz_ind - 1);
           LibmeshPetscCall(MatSetValues(
               _hc_advective_derivative_mat, 1, &row_at, 1, &col_at, &value_at, ADD_VALUES));
 
           value_at = alpha * (*_mdot_soln)(node_out) - (1 - alpha) * (*_mdot_soln)(node_in);
           col_at = i_ch + _n_channels * iz_ind;
           LibmeshPetscCall(MatSetValues(
               _hc_advective_derivative_mat, 1, &row_at, 1, &col_at, &value_at, ADD_VALUES));
 
           value_at = (1 - alpha) * (*_mdot_soln)(node_out);
           col_at = i_ch + _n_channels * (iz_ind + 1);
           LibmeshPetscCall(MatSetValues(
               _hc_advective_derivative_mat, 1, &row_at, 1, &col_at, &value_at, ADD_VALUES));
         }
 
         // Axial heat conduction
         auto * node_center = _subchannel_mesh.getChannelNode(i_ch, iz);
         auto K_center = _fp->k_from_p_T((*_P_soln)(node_center) + _P_out, (*_T_soln)(node_center));
         auto cp_center =
             _fp->cp_from_p_T((*_P_soln)(node_center) + _P_out, (*_T_soln)(node_center));
         auto diff_center = K_center / (cp_center + 1e-15);
 
         if (iz == first_node)
         {
           auto * node_top = _subchannel_mesh.getChannelNode(i_ch, iz + 1);
           auto * node_bottom = _subchannel_mesh.getChannelNode(i_ch, iz - 1);
           auto K_bottom =
               _fp->k_from_p_T((*_P_soln)(node_bottom) + _P_out, (*_T_soln)(node_bottom));
           auto K_top = _fp->k_from_p_T((*_P_soln)(node_top) + _P_out, (*_T_soln)(node_top));
           auto cp_bottom =
               _fp->cp_from_p_T((*_P_soln)(node_bottom) + _P_out, (*_T_soln)(node_bottom));
           auto cp_top = _fp->cp_from_p_T((*_P_soln)(node_top) + _P_out, (*_T_soln)(node_top));
           auto diff_bottom = K_bottom / (cp_bottom + 1e-15);
           auto diff_top = K_top / (cp_top + 1e-15);
 
           auto dz_up = _z_grid[iz + 1] - _z_grid[iz];
           auto dz_down = _z_grid[iz] - _z_grid[iz - 1];
           auto S_up =
               computeInterpolatedValue((*_S_flow_soln)(node_top), (*_S_flow_soln)(node_center));
           auto S_down =
               computeInterpolatedValue((*_S_flow_soln)(node_center), (*_S_flow_soln)(node_bottom));
           auto diff_up = computeInterpolatedValue(diff_top, diff_center);
           auto diff_down = computeInterpolatedValue(diff_center, diff_bottom);
 
           // Diagonal  value
           PetscInt row_at = i_ch + _n_channels * iz_ind;
           PetscInt col_at = i_ch + _n_channels * iz_ind;
           PetscScalar value_at = diff_up * S_up / dz_up + diff_down * S_down / dz_down;
           LibmeshPetscCall(MatSetValues(
               _hc_axial_heat_conduction_mat, 1, &row_at, 1, &col_at, &value_at, INSERT_VALUES));
 
           // Bottom value
           value_at = 1.0 * diff_down * S_down / dz_down * (*_h_soln)(node_bottom);
           LibmeshPetscCall(
               VecSetValues(_hc_axial_heat_conduction_rhs, 1, &row_at, &value_at, ADD_VALUES));
 
           // Top value
           col_at = i_ch + _n_channels * (iz_ind + 1);
           value_at = -diff_up * S_up / dz_up;
           LibmeshPetscCall(MatSetValues(
               _hc_axial_heat_conduction_mat, 1, &row_at, 1, &col_at, &value_at, INSERT_VALUES));
         }
         else if (iz == last_node)
         {
           auto * node_bottom = _subchannel_mesh.getChannelNode(i_ch, iz - 1);
           auto K_bottom =
               _fp->k_from_p_T((*_P_soln)(node_bottom) + _P_out, (*_T_soln)(node_bottom));
           auto cp_bottom =
               _fp->cp_from_p_T((*_P_soln)(node_bottom) + _P_out, (*_T_soln)(node_bottom));
           auto diff_bottom = K_bottom / (cp_bottom + 1e-15);
 
           auto dz_down = _z_grid[iz] - _z_grid[iz - 1];
           auto S_down = 0.5 * ((*_S_flow_soln)(node_center) + (*_S_flow_soln)(node_bottom));
           auto diff_down = 0.5 * (diff_center + diff_bottom);
 
           // Diagonal  value
           PetscInt row_at = i_ch + _n_channels * iz_ind;
           PetscInt col_at = i_ch + _n_channels * iz_ind;
           PetscScalar value_at = diff_down * S_down / dz_down;
           LibmeshPetscCall(MatSetValues(
               _hc_axial_heat_conduction_mat, 1, &row_at, 1, &col_at, &value_at, INSERT_VALUES));
 
           // Bottom value
           col_at = i_ch + _n_channels * (iz_ind - 1);
           value_at = -diff_down * S_down / dz_down;
           LibmeshPetscCall(MatSetValues(
               _hc_axial_heat_conduction_mat, 1, &row_at, 1, &col_at, &value_at, INSERT_VALUES));
 
           // Outflow derivative
           // value_at = -1.0 * (*_mdot_soln)(node_center) * (*_h_soln)(node_center);
           // VecSetValues(_hc_axial_heat_conduction_rhs, 1, &row_at, &value_at, ADD_VALUES);
         }
         else
         {
           auto * node_top = _subchannel_mesh.getChannelNode(i_ch, iz + 1);
           auto * node_bottom = _subchannel_mesh.getChannelNode(i_ch, iz - 1);
           auto K_bottom =
               _fp->k_from_p_T((*_P_soln)(node_bottom) + _P_out, (*_T_soln)(node_bottom));
           auto K_top = _fp->k_from_p_T((*_P_soln)(node_top) + _P_out, (*_T_soln)(node_top));
           auto cp_bottom =
               _fp->cp_from_p_T((*_P_soln)(node_bottom) + _P_out, (*_T_soln)(node_bottom));
           auto cp_top = _fp->cp_from_p_T((*_P_soln)(node_top) + _P_out, (*_T_soln)(node_top));
           auto diff_bottom = K_bottom / (cp_bottom + 1e-15);
           auto diff_top = K_top / (cp_top + 1e-15);
 
           auto dz_up = _z_grid[iz + 1] - _z_grid[iz];
           auto dz_down = _z_grid[iz] - _z_grid[iz - 1];
           auto S_up =
               computeInterpolatedValue((*_S_flow_soln)(node_top), (*_S_flow_soln)(node_center));
           auto S_down =
               computeInterpolatedValue((*_S_flow_soln)(node_center), (*_S_flow_soln)(node_bottom));
           auto diff_up = computeInterpolatedValue(diff_top, diff_center);
           auto diff_down = computeInterpolatedValue(diff_center, diff_bottom);
 
           // Diagonal value
           PetscInt row_at = i_ch + _n_channels * iz_ind;
           PetscInt col_at = i_ch + _n_channels * iz_ind;
           PetscScalar value_at = diff_up * S_up / dz_up + diff_down * S_down / dz_down;
           LibmeshPetscCall(MatSetValues(
               _hc_axial_heat_conduction_mat, 1, &row_at, 1, &col_at, &value_at, INSERT_VALUES));
 
           // Bottom value
           col_at = i_ch + _n_channels * (iz_ind - 1);
           value_at = -diff_down * S_down / dz_down;
           LibmeshPetscCall(MatSetValues(
               _hc_axial_heat_conduction_mat, 1, &row_at, 1, &col_at, &value_at, INSERT_VALUES));
 
           // Top value
           col_at = i_ch + _n_channels * (iz_ind + 1);
           value_at = -diff_up * S_up / dz_up;
           LibmeshPetscCall(MatSetValues(
               _hc_axial_heat_conduction_mat, 1, &row_at, 1, &col_at, &value_at, INSERT_VALUES));
         }
 
         // Radial Terms
         unsigned int counter = 0;
         unsigned int cross_index = iz;
         // Real radial_heat_conduction(0.0);
         for (auto i_gap : _subchannel_mesh.getChannelGaps(i_ch))
         {
           auto chans = _subchannel_mesh.getGapChannels(i_gap);
           unsigned int ii_ch = chans.first;
           unsigned int jj_ch = chans.second;
           auto * node_in_i = _subchannel_mesh.getChannelNode(ii_ch, iz - 1);
           auto * node_in_j = _subchannel_mesh.getChannelNode(jj_ch, iz - 1);
           PetscScalar h_star;
           // figure out donor axial velocity
           if (_Wij(i_gap, cross_index) > 0.0)
           {
             if (iz == first_node)
             {
               h_star = (*_h_soln)(node_in_i);
               PetscScalar value_vec_ct = -1.0 * alpha *
                                          _subchannel_mesh.getCrossflowSign(i_ch, counter) *
                                          _Wij(i_gap, cross_index) * h_star;
               PetscInt row_vec_ct = i_ch + _n_channels * iz_ind;
               LibmeshPetscCall(VecSetValues(
                   _hc_cross_derivative_rhs, 1, &row_vec_ct, &value_vec_ct, ADD_VALUES));
             }
             else
             {
               PetscScalar value_ct = alpha * _subchannel_mesh.getCrossflowSign(i_ch, counter) *
                                      _Wij(i_gap, cross_index);
               PetscInt row_ct = i_ch + _n_channels * iz_ind;
               PetscInt col_ct = ii_ch + _n_channels * (iz_ind - 1);
               LibmeshPetscCall(MatSetValues(
                   _hc_cross_derivative_mat, 1, &row_ct, 1, &col_ct, &value_ct, ADD_VALUES));
             }
             PetscScalar value_ct = (1.0 - alpha) *
                                    _subchannel_mesh.getCrossflowSign(i_ch, counter) *
                                    _Wij(i_gap, cross_index);
             PetscInt row_ct = i_ch + _n_channels * iz_ind;
             PetscInt col_ct = ii_ch + _n_channels * iz_ind;
             LibmeshPetscCall(MatSetValues(
                 _hc_cross_derivative_mat, 1, &row_ct, 1, &col_ct, &value_ct, ADD_VALUES));
           }
           else if (_Wij(i_gap, cross_index) < 0.0) // _Wij=0 operations not necessary
           {
             if (iz == first_node)
             {
               h_star = (*_h_soln)(node_in_j);
               PetscScalar value_vec_ct = -1.0 * alpha *
                                          _subchannel_mesh.getCrossflowSign(i_ch, counter) *
                                          _Wij(i_gap, cross_index) * h_star;
               PetscInt row_vec_ct = i_ch + _n_channels * iz_ind;
               LibmeshPetscCall(VecSetValues(
                   _hc_cross_derivative_rhs, 1, &row_vec_ct, &value_vec_ct, ADD_VALUES));
             }
             else
             {
               PetscScalar value_ct = alpha * _subchannel_mesh.getCrossflowSign(i_ch, counter) *
                                      _Wij(i_gap, cross_index);
               PetscInt row_ct = i_ch + _n_channels * iz_ind;
               PetscInt col_ct = jj_ch + _n_channels * (iz_ind - 1);
               LibmeshPetscCall(MatSetValues(
                   _hc_cross_derivative_mat, 1, &row_ct, 1, &col_ct, &value_ct, ADD_VALUES));
             }
             PetscScalar value_ct = (1.0 - alpha) *
                                    _subchannel_mesh.getCrossflowSign(i_ch, counter) *
                                    _Wij(i_gap, cross_index);
             PetscInt row_ct = i_ch + _n_channels * iz_ind;
             PetscInt col_ct = jj_ch + _n_channels * iz_ind;
             LibmeshPetscCall(MatSetValues(
                 _hc_cross_derivative_mat, 1, &row_ct, 1, &col_ct, &value_ct, ADD_VALUES));
           }
 
           // Turbulent cross flows
           if (iz == first_node)
           {
             PetscScalar value_vec_ct =
                 -2.0 * alpha * (*_h_soln)(node_in)*_WijPrime(i_gap, cross_index);
             value_vec_ct += alpha * (*_h_soln)(node_in_j)*_WijPrime(i_gap, cross_index);
             value_vec_ct += alpha * (*_h_soln)(node_in_i)*_WijPrime(i_gap, cross_index);
             PetscInt row_vec_ct = i_ch + _n_channels * iz_ind;
             LibmeshPetscCall(
                 VecSetValues(_hc_cross_derivative_rhs, 1, &row_vec_ct, &value_vec_ct, ADD_VALUES));
           }
           else
           {
             PetscScalar value_center_ct = 2.0 * alpha * _WijPrime(i_gap, cross_index);
             PetscInt row_ct = i_ch + _n_channels * iz_ind;
             PetscInt col_ct = i_ch + _n_channels * (iz_ind - 1);
             LibmeshPetscCall(MatSetValues(
                 _hc_cross_derivative_mat, 1, &row_ct, 1, &col_ct, &value_center_ct, ADD_VALUES));
 
             PetscScalar value_left_ct = -1.0 * alpha * _WijPrime(i_gap, cross_index);
             row_ct = i_ch + _n_channels * iz_ind;
             col_ct = jj_ch + _n_channels * (iz_ind - 1);
             LibmeshPetscCall(MatSetValues(
                 _hc_cross_derivative_mat, 1, &row_ct, 1, &col_ct, &value_left_ct, ADD_VALUES));
 
             PetscScalar value_right_ct = -1.0 * alpha * _WijPrime(i_gap, cross_index);
             row_ct = i_ch + _n_channels * iz_ind;
             col_ct = ii_ch + _n_channels * (iz_ind - 1);
             LibmeshPetscCall(MatSetValues(
                 _hc_cross_derivative_mat, 1, &row_ct, 1, &col_ct, &value_right_ct, ADD_VALUES));
           }
           PetscScalar value_center_ct = 2.0 * (1.0 - alpha) * _WijPrime(i_gap, cross_index);
           PetscInt row_ct = i_ch + _n_channels * iz_ind;
           PetscInt col_ct = i_ch + _n_channels * iz_ind;
           LibmeshPetscCall(MatSetValues(
               _hc_cross_derivative_mat, 1, &row_ct, 1, &col_ct, &value_center_ct, ADD_VALUES));
 
           PetscScalar value_left_ct = -1.0 * (1.0 - alpha) * _WijPrime(i_gap, cross_index);
           row_ct = i_ch + _n_channels * iz_ind;
           col_ct = jj_ch + _n_channels * iz_ind;
           LibmeshPetscCall(MatSetValues(
               _hc_cross_derivative_mat, 1, &row_ct, 1, &col_ct, &value_left_ct, ADD_VALUES));
 
           PetscScalar value_right_ct = -1.0 * (1.0 - alpha) * _WijPrime(i_gap, cross_index);
           row_ct = i_ch + _n_channels * iz_ind;
           col_ct = ii_ch + _n_channels * iz_ind;
           LibmeshPetscCall(MatSetValues(
               _hc_cross_derivative_mat, 1, &row_ct, 1, &col_ct, &value_right_ct, ADD_VALUES));
 
           // Radial heat conduction
           auto subch_type_i = _subchannel_mesh.getSubchannelType(ii_ch);
           auto subch_type_j = _subchannel_mesh.getSubchannelType(jj_ch);
           Real dist_ij = pitch;
 
           if (subch_type_i == EChannelType::EDGE && subch_type_j == EChannelType::EDGE)
           {
             dist_ij = pitch;
           }
           else if ((subch_type_i == EChannelType::CORNER && subch_type_j == EChannelType::EDGE) ||
                    (subch_type_i == EChannelType::EDGE && subch_type_j == EChannelType::CORNER))
           {
             dist_ij = pitch;
           }
           else
           {
             dist_ij = pitch / std::sqrt(3);
           }
 
           auto Sij = dz * _subchannel_mesh.getGapWidth(iz, i_gap);
           auto K_i = _fp->k_from_p_T((*_P_soln)(node_in_i) + _P_out, (*_T_soln)(node_in_i));
           auto K_j = _fp->k_from_p_T((*_P_soln)(node_in_j) + _P_out, (*_T_soln)(node_in_j));
           auto cp_i = _fp->cp_from_p_T((*_P_soln)(node_in_i) + _P_out, (*_T_soln)(node_in_i));
           auto cp_j = _fp->cp_from_p_T((*_P_soln)(node_in_j) + _P_out, (*_T_soln)(node_in_j));
           auto A_i = K_i / cp_i;
           auto A_j = K_j / cp_j;
           auto harm_A = 2.0 * A_i * A_j / (A_i + A_j);
           auto shape_factor =
               0.66 * (pitch / pin_diameter) *
               std::pow((_subchannel_mesh.getGapWidth(iz, i_gap) / pin_diameter), -0.3);
           // auto base_value =  0.5 * (A_i + A_j) * Sij * shape_factor / dist_ij;
           auto base_value = harm_A * shape_factor * Sij / dist_ij;
           auto neg_base_value = -1.0 * base_value;
 
           row_ct = ii_ch + _n_channels * iz_ind;
           col_ct = ii_ch + _n_channels * iz_ind;
           LibmeshPetscCall(MatSetValues(
               _hc_radial_heat_conduction_mat, 1, &row_ct, 1, &col_ct, &base_value, ADD_VALUES));
 
           row_ct = jj_ch + _n_channels * iz_ind;
           col_ct = jj_ch + _n_channels * iz_ind;
           LibmeshPetscCall(MatSetValues(
               _hc_radial_heat_conduction_mat, 1, &row_ct, 1, &col_ct, &base_value, ADD_VALUES));
 
           row_ct = ii_ch + _n_channels * iz_ind;
           col_ct = jj_ch + _n_channels * iz_ind;
           LibmeshPetscCall(MatSetValues(
               _hc_radial_heat_conduction_mat, 1, &row_ct, 1, &col_ct, &neg_base_value, ADD_VALUES));
 
           row_ct = jj_ch + _n_channels * iz_ind;
           col_ct = ii_ch + _n_channels * iz_ind;
           LibmeshPetscCall(MatSetValues(
               _hc_radial_heat_conduction_mat, 1, &row_ct, 1, &col_ct, &neg_base_value, ADD_VALUES));
           counter++;
         }
 
         // Compute the sweep flow enthalpy change
         // Calculation of average mass flux of all periphery subchannels
         Real edge_flux_ave = 0.0;
         Real mdot_sum = 0.0;
         Real si_sum = 0.0;
         for (unsigned int i_ch = 0; i_ch < _n_channels; i_ch++)
         {
           auto subch_type = _subchannel_mesh.getSubchannelType(i_ch);
           if (subch_type == EChannelType::EDGE || subch_type == EChannelType::CORNER)
           {
             auto * node_in = _subchannel_mesh.getChannelNode(i_ch, iz - 1);
             auto Si = (*_S_flow_soln)(node_in);
             auto mdot_in = (*_mdot_soln)(node_in);
             mdot_sum = mdot_sum + mdot_in;
             si_sum = si_sum + Si;
           }
         }
         edge_flux_ave = mdot_sum / si_sum;
         auto subch_type = _subchannel_mesh.getSubchannelType(i_ch);
         PetscScalar sweep_enthalpy = 0.0;
         if ((subch_type == EChannelType::EDGE || subch_type == EChannelType::CORNER) &&
             (wire_diameter != 0.0) && (wire_lead_length != 0.0))
         {
           auto beta_in = std::numeric_limits<double>::quiet_NaN();
           auto beta_out = std::numeric_limits<double>::quiet_NaN();
           // donor sweep channel for i_ch
           auto sweep_donor = _tri_sch_mesh.getSweepFlowChans(i_ch).first;
           auto * node_sweep_donor = _subchannel_mesh.getChannelNode(sweep_donor, iz - 1);
           // Calculation of turbulent mixing parameter
           for (auto i_gap : _subchannel_mesh.getChannelGaps(i_ch))
           {
             auto chans = _subchannel_mesh.getGapChannels(i_gap);
             unsigned int ii_ch = chans.first;
             unsigned int jj_ch = chans.second;
             auto subch_type_i = _subchannel_mesh.getSubchannelType(ii_ch);
             auto subch_type_j = _subchannel_mesh.getSubchannelType(jj_ch);
             if ((subch_type_i == EChannelType::CORNER || subch_type_i == EChannelType::EDGE) &&
                 (subch_type_j == EChannelType::CORNER || subch_type_j == EChannelType::EDGE))
             {
               if ((ii_ch == sweep_donor) || (jj_ch == sweep_donor))
               {
                 beta_in = computeSweepFlowMixingParameter(i_gap, iz);
               }
               else
               {
                 beta_out = computeSweepFlowMixingParameter(i_gap, iz);
               }
             }
           }
           // Abort execution if required values are unset
           mooseAssert(!std::isnan(beta_in),
                       "beta_in was not set. Check gap logic for i_ch = " + std::to_string(i_ch) +
                           ", iz = " + std::to_string(iz));
           mooseAssert(!std::isnan(beta_out),
                       "beta_out was not set. Check gap logic for i_ch = " + std::to_string(i_ch) +
                           ", iz = " + std::to_string(iz));
 
           auto gap = _tri_sch_mesh.getDuctToPinGap();
           auto Sij = dz * gap;
           auto wsweep_in = edge_flux_ave * beta_in * Sij;
           auto wsweep_out = edge_flux_ave * beta_out * Sij;
           auto sweep_hin = (*_h_soln)(node_sweep_donor);
           auto sweep_hout = (*_h_soln)(node_in);
           sweep_enthalpy = (wsweep_in * sweep_hin - wsweep_out * sweep_hout);
 
           if (iz == first_node)
           {
             PetscInt row_sh = i_ch + _n_channels * iz_ind;
             PetscScalar value_hs = -sweep_enthalpy;
             LibmeshPetscCall(
                 VecSetValues(_hc_sweep_enthalpy_rhs, 1, &row_sh, &value_hs, ADD_VALUES));
           }
           else
           {
             // coefficient of sweep_hin
             PetscInt row_sh = i_ch + _n_channels * (iz_ind - 1);
             PetscInt col_sh = i_ch + _n_channels * (iz_ind - 1);
             LibmeshPetscCall(MatSetValues(
                 _hc_sweep_enthalpy_mat, 1, &row_sh, 1, &col_sh, &wsweep_out, ADD_VALUES));
             PetscInt col_sh_l = sweep_donor + _n_channels * (iz_ind - 1);
             PetscScalar neg_sweep_in = -1.0 * wsweep_in;
             // coefficient of sweep_hout
             LibmeshPetscCall(MatSetValues(
                 _hc_sweep_enthalpy_mat, 1, &row_sh, 1, &col_sh_l, &(neg_sweep_in), ADD_VALUES));
           }
         }
 
         // Add heat enthalpy from pin and/or duct
         PetscScalar added_enthalpy = computeAddedHeatPin(i_ch, iz);
         added_enthalpy += computeAddedHeatDuct(i_ch, iz);
         PetscInt row_vec_ht = i_ch + _n_channels * iz_ind;
         LibmeshPetscCall(
             VecSetValues(_hc_added_heat_rhs, 1, &row_vec_ht, &added_enthalpy, ADD_VALUES));
       }
     }
     // Assembling system
     LibmeshPetscCall(MatAssemblyBegin(_hc_time_derivative_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_hc_time_derivative_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyBegin(_hc_advective_derivative_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_hc_advective_derivative_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyBegin(_hc_cross_derivative_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_hc_cross_derivative_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyBegin(_hc_axial_heat_conduction_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_hc_axial_heat_conduction_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyBegin(_hc_radial_heat_conduction_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_hc_radial_heat_conduction_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyBegin(_hc_sweep_enthalpy_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_hc_sweep_enthalpy_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyBegin(_hc_sys_h_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_hc_sys_h_mat, MAT_FINAL_ASSEMBLY));
     // Add all matrices together
     LibmeshPetscCall(
         MatAXPY(_hc_sys_h_mat, 1.0, _hc_time_derivative_mat, DIFFERENT_NONZERO_PATTERN));
     LibmeshPetscCall(MatAssemblyBegin(_hc_sys_h_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_hc_sys_h_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(
         MatAXPY(_hc_sys_h_mat, 1.0, _hc_advective_derivative_mat, DIFFERENT_NONZERO_PATTERN));
     LibmeshPetscCall(MatAssemblyBegin(_hc_sys_h_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_hc_sys_h_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(
         MatAXPY(_hc_sys_h_mat, 1.0, _hc_cross_derivative_mat, DIFFERENT_NONZERO_PATTERN));
     LibmeshPetscCall(MatAssemblyBegin(_hc_sys_h_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_hc_sys_h_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(
         MatAXPY(_hc_sys_h_mat, 1.0, _hc_axial_heat_conduction_mat, DIFFERENT_NONZERO_PATTERN));
     LibmeshPetscCall(MatAssemblyBegin(_hc_sys_h_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_hc_sys_h_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(
         MatAXPY(_hc_sys_h_mat, 1.0, _hc_radial_heat_conduction_mat, DIFFERENT_NONZERO_PATTERN));
     LibmeshPetscCall(MatAssemblyBegin(_hc_sys_h_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_hc_sys_h_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(
         MatAXPY(_hc_sys_h_mat, 1.0, _hc_sweep_enthalpy_mat, DIFFERENT_NONZERO_PATTERN));
     LibmeshPetscCall(MatAssemblyBegin(_hc_sys_h_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_hc_sys_h_mat, MAT_FINAL_ASSEMBLY));
     if (_verbose_subchannel)
       _console << "Block: " << iblock << " - Enthalpy conservation matrix assembled" << std::endl;
     // RHS
     LibmeshPetscCall(VecAXPY(_hc_sys_h_rhs, 1.0, _hc_time_derivative_rhs));
     LibmeshPetscCall(VecAXPY(_hc_sys_h_rhs, 1.0, _hc_advective_derivative_rhs));
     LibmeshPetscCall(VecAXPY(_hc_sys_h_rhs, 1.0, _hc_cross_derivative_rhs));
     LibmeshPetscCall(VecAXPY(_hc_sys_h_rhs, 1.0, _hc_added_heat_rhs));
     LibmeshPetscCall(VecAXPY(_hc_sys_h_rhs, 1.0, _hc_axial_heat_conduction_rhs));
     LibmeshPetscCall(VecAXPY(_hc_sys_h_rhs, 1.0, _hc_radial_heat_conduction_rhs));
     LibmeshPetscCall(VecAXPY(_hc_sys_h_rhs, 1.0, _hc_sweep_enthalpy_rhs));
 
     // Use system to solve for and populate enthalpy
     LibmeshPetscCall(this->solveAndPopulateEnthalpy(
         _hc_sys_h_mat, _hc_sys_h_rhs, first_node, last_node, "h_sys_"));
   }
 }

◆ computeInterpolatedValue()

PetscScalar SubChannel1PhaseProblem::computeInterpolatedValue	(	PetscScalar	topValue,
		PetscScalar	botValue,
		PetscScalar	Peclet = `0.0`
	)

protectedinherited

Definition at line 459 of file SubChannel1PhaseProblem.C.

Referenced by SubChannel1PhaseProblem::computeDP(), QuadSubChannel1PhaseProblem::computeh(), computeh(), SubChannel1PhaseProblem::computeP(), and SubChannel1PhaseProblem::computeWijResidual().

 {
   PetscScalar alpha = computeInterpolationCoefficients(Peclet);
   return alpha * botValue + (1.0 - alpha) * topValue;
 }

◆ computeInterpolationCoefficients()

PetscScalar SubChannel1PhaseProblem::computeInterpolationCoefficients ( PetscScalar Peclet = 0.0 )

protectedinherited

Functions that computes the interpolation scheme given the Peclet number.

Definition at line 439 of file SubChannel1PhaseProblem.C.

Referenced by SubChannel1PhaseProblem::computeDP(), QuadSubChannel1PhaseProblem::computeh(), computeh(), SubChannel1PhaseProblem::computeInterpolatedValue(), SubChannel1PhaseProblem::computeP(), and SubChannel1PhaseProblem::computeWijResidual().

 {
   switch (_interpolation_scheme)
   {
     case 0: // upwind interpolation
       return 1.0;
     case 1: // downwind interpolation
       return 0.0;
     case 2: // central_difference interpolation
       return 0.5;
     case 3: // exponential interpolation (Peclet limited)
       return ((Peclet - 1.0) * std::exp(Peclet) + 1) / (Peclet * (std::exp(Peclet) - 1.) + 1e-10);
     default:
       mooseError(name(),
                  ": Interpolation scheme should be a string: upwind, downwind, central_difference, "
                  "exponential");
   }
 }

◆ computeMdot()

void SubChannel1PhaseProblem::computeMdot ( int iblock )

protectedinherited

Computes mass flow per channel for block iblock.

Definition at line 566 of file SubChannel1PhaseProblem.C.

Referenced by SubChannel1PhaseProblem::implicitPetscSolve(), and SubChannel1PhaseProblem::residualFunction().

 {
   const unsigned int last_node = (iblock + 1) * _block_size;
   const unsigned int first_node = iblock * _block_size + 1;
   if (!_implicit_bool)
   {
     for (unsigned int iz = first_node; iz < last_node + 1; iz++)
     {
       auto dz = _z_grid[iz] - _z_grid[iz - 1];
       for (unsigned int i_ch = 0; i_ch < _n_channels; i_ch++)
       {
         auto * node_in = _subchannel_mesh.getChannelNode(i_ch, iz - 1);
         auto * node_out = _subchannel_mesh.getChannelNode(i_ch, iz);
         auto volume = dz * (*_S_flow_soln)(node_in);
         auto time_term = _TR * ((*_rho_soln)(node_out)-_rho_soln->old(node_out)) * volume / _dt;
         // Wij positive out of i into j;
         auto mdot_out = (*_mdot_soln)(node_in) - (*_SumWij_soln)(node_out)-time_term;
         if (mdot_out < 0)
         {
           _console << "Wij = : " << _Wij << "\n";
           mooseError(name(),
                      " : Calculation of negative mass flow mdot_out = : ",
                      mdot_out,
                      " Axial Level= : ",
                      iz,
                      " - Implicit solves are required for recirculating flow.");
         }
         _mdot_soln->set(node_out, mdot_out); // kg/sec
       }
     }
   }
   else
   {
     for (unsigned int iz = first_node; iz < last_node + 1; iz++)
     {
       auto dz = _z_grid[iz] - _z_grid[iz - 1];
       auto iz_ind = iz - first_node;
       for (unsigned int i_ch = 0; i_ch < _n_channels; i_ch++)
       {
         auto * node_in = _subchannel_mesh.getChannelNode(i_ch, iz - 1);
         auto * node_out = _subchannel_mesh.getChannelNode(i_ch, iz);
         auto volume = dz * (*_S_flow_soln)(node_in);
 
         // Adding time derivative to the RHS
         auto time_term = _TR * ((*_rho_soln)(node_out)-_rho_soln->old(node_out)) * volume / _dt;
         PetscInt row_vec = i_ch + _n_channels * iz_ind;
         PetscScalar value_vec = -1.0 * time_term;
         LibmeshPetscCall(
             VecSetValues(_mc_axial_convection_rhs, 1, &row_vec, &value_vec, INSERT_VALUES));
 
         // Imposing bottom boundary condition or adding of diagonal elements
         if (iz == first_node)
         {
           PetscScalar value_vec = (*_mdot_soln)(node_in);
           PetscInt row_vec = i_ch + _n_channels * iz_ind;
           LibmeshPetscCall(
               VecSetValues(_mc_axial_convection_rhs, 1, &row_vec, &value_vec, ADD_VALUES));
         }
         else
         {
           PetscInt row = i_ch + _n_channels * iz_ind;
           PetscInt col = i_ch + _n_channels * (iz_ind - 1);
           PetscScalar value = -1.0;
           LibmeshPetscCall(
               MatSetValues(_mc_axial_convection_mat, 1, &row, 1, &col, &value, INSERT_VALUES));
         }
 
         // Adding diagonal elements
         PetscInt row = i_ch + _n_channels * iz_ind;
         PetscInt col = i_ch + _n_channels * iz_ind;
         PetscScalar value = 1.0;
         LibmeshPetscCall(
             MatSetValues(_mc_axial_convection_mat, 1, &row, 1, &col, &value, INSERT_VALUES));
 
         // Adding cross flows RHS
         if (_segregated_bool)
         {
           PetscScalar value_vec_2 = -1.0 * (*_SumWij_soln)(node_out);
           PetscInt row_vec_2 = i_ch + _n_channels * iz_ind;
           LibmeshPetscCall(
               VecSetValues(_mc_axial_convection_rhs, 1, &row_vec_2, &value_vec_2, ADD_VALUES));
         }
       }
     }
     LibmeshPetscCall(MatAssemblyBegin(_mc_axial_convection_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_mc_axial_convection_mat, MAT_FINAL_ASSEMBLY));
 
     if (_segregated_bool)
     {
       KSP ksploc;
       PC pc;
       Vec sol;
       LibmeshPetscCall(VecDuplicate(_mc_axial_convection_rhs, &sol));
       LibmeshPetscCall(KSPCreate(PETSC_COMM_SELF, &ksploc));
       LibmeshPetscCall(KSPSetOperators(ksploc, _mc_axial_convection_mat, _mc_axial_convection_mat));
       LibmeshPetscCall(KSPGetPC(ksploc, &pc));
       LibmeshPetscCall(PCSetType(pc, PCJACOBI));
       LibmeshPetscCall(KSPSetTolerances(ksploc, _rtol, _atol, _dtol, _maxit));
       LibmeshPetscCall(KSPSetFromOptions(ksploc));
       LibmeshPetscCall(KSPSolve(ksploc, _mc_axial_convection_rhs, sol));
       LibmeshPetscCall(populateSolutionChan<SolutionHandle>(
           sol, *_mdot_soln, first_node, last_node, _n_channels));
       LibmeshPetscCall(VecZeroEntries(_mc_axial_convection_rhs));
       LibmeshPetscCall(KSPDestroy(&ksploc));
       LibmeshPetscCall(VecDestroy(&sol));
     }
   }
 }

◆ computeMixingParameter()

Real SubChannel1PhaseProblem::computeMixingParameter	(	unsigned int	i_gap,
		unsigned int	iz
	)		const

protectedinherited

Computes and validates the turbulent mixing parameter.

Definition at line 1889 of file SubChannel1PhaseProblem.C.

Referenced by SubChannel1PhaseProblem::computeWijPrime().

 {
   auto beta = _mixing_closure->computeMixingParameter(i_gap, iz);
   if (!std::isfinite(beta) || beta < 0.0)
     mooseError(name(),
                ": Mixing closure returned invalid beta = ",
                beta,
                " for gap ",
                i_gap,
                " at axial index ",
                iz,
                ". Beta must be finite and non-negative.");
 
   return beta;
 }

◆ computeMu()

void SubChannel1PhaseProblem::computeMu ( int iblock )

protectedinherited

Computes Viscosity per channel for block iblock.

Definition at line 1451 of file SubChannel1PhaseProblem.C.

Referenced by SubChannel1PhaseProblem::externalSolve().

 {
   const unsigned int last_node = (iblock + 1) * _block_size;
   const unsigned int first_node = iblock * _block_size + 1;
   if (iblock == 0)
   {
     for (unsigned int i_ch = 0; i_ch < _n_channels; i_ch++)
     {
       auto * node = _subchannel_mesh.getChannelNode(i_ch, 0);
       _mu_soln->set(node, _fp->mu_from_p_T((*_P_soln)(node) + _P_out, (*_T_soln)(node)));
     }
   }
   for (unsigned int iz = first_node; iz < last_node + 1; iz++)
   {
     for (unsigned int i_ch = 0; i_ch < _n_channels; i_ch++)
     {
       auto * node = _subchannel_mesh.getChannelNode(i_ch, iz);
       _mu_soln->set(node, _fp->mu_from_p_T((*_P_soln)(node) + _P_out, (*_T_soln)(node)));
     }
   }
 }

◆ computeP()

void SubChannel1PhaseProblem::computeP ( int iblock )

protectedinherited

Computes Pressure per channel for block iblock.

Definition at line 1180 of file SubChannel1PhaseProblem.C.

Referenced by SubChannel1PhaseProblem::implicitPetscSolve(), and SubChannel1PhaseProblem::residualFunction().

 {
   const unsigned int last_node = (iblock + 1) * _block_size;
   const unsigned int first_node = iblock * _block_size + 1;
   if (!_implicit_bool)
   {
     if (!_staggered_pressure_bool)
     {
       for (unsigned int iz = last_node; iz > first_node - 1; iz--)
       {
         // Calculate pressure in the inlet of the cell assuming known outlet
         for (unsigned int i_ch = 0; i_ch < _n_channels; i_ch++)
         {
           auto * node_out = _subchannel_mesh.getChannelNode(i_ch, iz);
           auto * node_in = _subchannel_mesh.getChannelNode(i_ch, iz - 1);
           // update Pressure solution
           _P_soln->set(node_in, (*_P_soln)(node_out) + _DP(i_ch, iz));
         }
       }
     }
     else
     {
       for (unsigned int iz = last_node; iz > first_node - 1; iz--)
       {
         // Calculate pressure in the inlet of the cell assuming known outlet
         for (unsigned int i_ch = 0; i_ch < _n_channels; i_ch++)
         {
           auto * node_out = _subchannel_mesh.getChannelNode(i_ch, iz);
           auto * node_in = _subchannel_mesh.getChannelNode(i_ch, iz - 1);
           // update Pressure solution
           // Note: assuming uniform axial discretization in the curren code
           // We will need to update this later if we allow non-uniform refinements in the axial
           // direction
           PetscScalar Pe = 0.5;
           auto alpha = computeInterpolationCoefficients(Pe);
           if (iz == last_node)
           {
             _P_soln->set(node_in, (*_P_soln)(node_out) + _DP(i_ch, iz) / 2.0);
           }
           else
           {
             _P_soln->set(node_in,
                          (*_P_soln)(node_out) + (1.0 - alpha) * _DP(i_ch, iz) +
                              alpha * _DP(i_ch, iz - 1));
           }
         }
       }
     }
   }
   else
   {
     if (!_staggered_pressure_bool)
     {
       LibmeshPetscCall(VecZeroEntries(_amc_pressure_force_rhs));
       for (unsigned int iz = last_node; iz > first_node - 1; iz--)
       {
         auto iz_ind = iz - first_node;
         // Calculate pressure in the inlet of the cell assuming known outlet
         for (unsigned int i_ch = 0; i_ch < _n_channels; i_ch++)
         {
           auto * node_out = _subchannel_mesh.getChannelNode(i_ch, iz);
           auto * node_in = _subchannel_mesh.getChannelNode(i_ch, iz - 1);
 
           // inlet, outlet, and interpolated axial surface area
           auto S_in = (*_S_flow_soln)(node_in);
           auto S_out = (*_S_flow_soln)(node_out);
           auto S_interp = computeInterpolatedValue(S_out, S_in, 0.5);
 
           // Creating matrix of coefficients
           PetscInt row = i_ch + _n_channels * iz_ind;
           PetscInt col = i_ch + _n_channels * iz_ind;
           PetscScalar value = -1.0 * S_interp;
           LibmeshPetscCall(
               MatSetValues(_amc_pressure_force_mat, 1, &row, 1, &col, &value, INSERT_VALUES));
 
           if (iz == last_node)
           {
             PetscScalar value = -1.0 * (*_P_soln)(node_out)*S_interp;
             PetscInt row = i_ch + _n_channels * iz_ind;
             LibmeshPetscCall(VecSetValues(_amc_pressure_force_rhs, 1, &row, &value, ADD_VALUES));
           }
           else
           {
             PetscInt row = i_ch + _n_channels * iz_ind;
             PetscInt col = i_ch + _n_channels * (iz_ind + 1);
             PetscScalar value = 1.0 * S_interp;
             LibmeshPetscCall(
                 MatSetValues(_amc_pressure_force_mat, 1, &row, 1, &col, &value, INSERT_VALUES));
           }
 
           if (_segregated_bool)
           {
             auto dp_out = _DP(i_ch, iz);
             PetscScalar value_v = -1.0 * dp_out * S_interp;
             PetscInt row_v = i_ch + _n_channels * iz_ind;
             LibmeshPetscCall(
                 VecSetValues(_amc_pressure_force_rhs, 1, &row_v, &value_v, ADD_VALUES));
           }
         }
       }
       // Solving pressure problem
       LibmeshPetscCall(MatAssemblyBegin(_amc_pressure_force_mat, MAT_FINAL_ASSEMBLY));
       LibmeshPetscCall(MatAssemblyEnd(_amc_pressure_force_mat, MAT_FINAL_ASSEMBLY));
       if (_segregated_bool)
       {
         KSP ksploc;
         PC pc;
         Vec sol;
         LibmeshPetscCall(VecDuplicate(_amc_pressure_force_rhs, &sol));
         LibmeshPetscCall(KSPCreate(PETSC_COMM_SELF, &ksploc));
         LibmeshPetscCall(KSPSetOperators(ksploc, _amc_pressure_force_mat, _amc_pressure_force_mat));
         LibmeshPetscCall(KSPGetPC(ksploc, &pc));
         LibmeshPetscCall(PCSetType(pc, PCJACOBI));
         LibmeshPetscCall(KSPSetTolerances(ksploc, _rtol, _atol, _dtol, _maxit));
         LibmeshPetscCall(KSPSetFromOptions(ksploc));
         LibmeshPetscCall(KSPSolve(ksploc, _amc_pressure_force_rhs, sol));
         PetscScalar * xx;
         LibmeshPetscCall(VecGetArray(sol, &xx));
         // update Pressure solution
         for (unsigned int iz = last_node; iz > first_node - 1; iz--)
         {
           auto iz_ind = iz - first_node;
           for (unsigned int i_ch = 0; i_ch < _n_channels; i_ch++)
           {
             auto * node_in = _subchannel_mesh.getChannelNode(i_ch, iz - 1);
             PetscScalar value = xx[iz_ind * _n_channels + i_ch];
             _P_soln->set(node_in, value);
           }
         }
         LibmeshPetscCall(VecZeroEntries(_amc_pressure_force_rhs));
         LibmeshPetscCall(KSPDestroy(&ksploc));
         LibmeshPetscCall(VecDestroy(&sol));
       }
     }
     else
     {
       LibmeshPetscCall(VecZeroEntries(_amc_pressure_force_rhs));
       for (unsigned int iz = last_node; iz > first_node - 1; iz--)
       {
         auto iz_ind = iz - first_node;
         // Calculate pressure in the inlet of the cell assuming known outlet
         for (unsigned int i_ch = 0; i_ch < _n_channels; i_ch++)
         {
           auto * node_out = _subchannel_mesh.getChannelNode(i_ch, iz);
           auto * node_in = _subchannel_mesh.getChannelNode(i_ch, iz - 1);
 
           // inlet, outlet, and interpolated axial surface area
           auto S_in = (*_S_flow_soln)(node_in);
           auto S_out = (*_S_flow_soln)(node_out);
           auto S_interp = computeInterpolatedValue(S_out, S_in, 0.5);
 
           // Creating matrix of coefficients
           PetscInt row = i_ch + _n_channels * iz_ind;
           PetscInt col = i_ch + _n_channels * iz_ind;
           PetscScalar value = -1.0 * S_interp;
           LibmeshPetscCall(
               MatSetValues(_amc_pressure_force_mat, 1, &row, 1, &col, &value, INSERT_VALUES));
 
           if (iz == last_node)
           {
             PetscScalar value = -1.0 * (*_P_soln)(node_out)*S_interp;
             PetscInt row = i_ch + _n_channels * iz_ind;
             LibmeshPetscCall(VecSetValues(_amc_pressure_force_rhs, 1, &row, &value, ADD_VALUES));
 
             auto dp_out = _DP(i_ch, iz);
             PetscScalar value_v = -1.0 * dp_out / 2.0 * S_interp;
             PetscInt row_v = i_ch + _n_channels * iz_ind;
             LibmeshPetscCall(
                 VecSetValues(_amc_pressure_force_rhs, 1, &row_v, &value_v, ADD_VALUES));
           }
           else
           {
             PetscInt row = i_ch + _n_channels * iz_ind;
             PetscInt col = i_ch + _n_channels * (iz_ind + 1);
             PetscScalar value = 1.0 * S_interp;
             LibmeshPetscCall(
                 MatSetValues(_amc_pressure_force_mat, 1, &row, 1, &col, &value, INSERT_VALUES));
 
             if (_segregated_bool)
             {
               auto dp_in = _DP(i_ch, iz - 1);
               auto dp_out = _DP(i_ch, iz);
               auto dp_interp = computeInterpolatedValue(dp_out, dp_in, 0.5);
               PetscScalar value_v = -1.0 * dp_interp * S_interp;
               PetscInt row_v = i_ch + _n_channels * iz_ind;
               LibmeshPetscCall(
                   VecSetValues(_amc_pressure_force_rhs, 1, &row_v, &value_v, ADD_VALUES));
             }
           }
         }
       }
       // Solving pressure problem
       LibmeshPetscCall(MatAssemblyBegin(_amc_pressure_force_mat, MAT_FINAL_ASSEMBLY));
       LibmeshPetscCall(MatAssemblyEnd(_amc_pressure_force_mat, MAT_FINAL_ASSEMBLY));
       if (_verbose_subchannel)
         _console << "Block: " << iblock << " - Axial momentum pressure force matrix assembled"
                  << std::endl;
 
       if (_segregated_bool)
       {
         KSP ksploc;
         PC pc;
         Vec sol;
         LibmeshPetscCall(VecDuplicate(_amc_pressure_force_rhs, &sol));
         LibmeshPetscCall(KSPCreate(PETSC_COMM_SELF, &ksploc));
         LibmeshPetscCall(KSPSetOperators(ksploc, _amc_pressure_force_mat, _amc_pressure_force_mat));
         LibmeshPetscCall(KSPGetPC(ksploc, &pc));
         LibmeshPetscCall(PCSetType(pc, PCJACOBI));
         LibmeshPetscCall(KSPSetTolerances(ksploc, _rtol, _atol, _dtol, _maxit));
         LibmeshPetscCall(KSPSetFromOptions(ksploc));
         LibmeshPetscCall(KSPSolve(ksploc, _amc_pressure_force_rhs, sol));
         PetscScalar * xx;
         LibmeshPetscCall(VecGetArray(sol, &xx));
         // update Pressure solution
         for (unsigned int iz = last_node; iz > first_node - 1; iz--)
         {
           auto iz_ind = iz - first_node;
           for (unsigned int i_ch = 0; i_ch < _n_channels; i_ch++)
           {
             auto * node_in = _subchannel_mesh.getChannelNode(i_ch, iz - 1);
             PetscScalar value = xx[iz_ind * _n_channels + i_ch];
             _P_soln->set(node_in, value);
           }
         }
         LibmeshPetscCall(VecZeroEntries(_amc_pressure_force_rhs));
         LibmeshPetscCall(KSPDestroy(&ksploc));
         LibmeshPetscCall(VecDestroy(&sol));
       }
     }
   }
 }

◆ computeRho()

void SubChannel1PhaseProblem::computeRho ( int iblock )

protectedinherited

Computes Density per channel for block iblock.

Definition at line 1428 of file SubChannel1PhaseProblem.C.

Referenced by SubChannel1PhaseProblem::externalSolve().

 {
   const unsigned int last_node = (iblock + 1) * _block_size;
   const unsigned int first_node = iblock * _block_size + 1;
   if (iblock == 0)
   {
     for (unsigned int i_ch = 0; i_ch < _n_channels; i_ch++)
     {
       auto * node = _subchannel_mesh.getChannelNode(i_ch, 0);
       _rho_soln->set(node, _fp->rho_from_p_T((*_P_soln)(node) + _P_out, (*_T_soln)(node)));
     }
   }
   for (unsigned int iz = first_node; iz < last_node + 1; iz++)
   {
     for (unsigned int i_ch = 0; i_ch < _n_channels; i_ch++)
     {
       auto * node = _subchannel_mesh.getChannelNode(i_ch, iz);
       _rho_soln->set(node, _fp->rho_from_p_T((*_P_soln)(node) + _P_out, (*_T_soln)(node)));
     }
   }
 }

◆ computeSumWij()

void SubChannel1PhaseProblem::computeSumWij ( int iblock )

protectedinherited

Computes net diversion crossflow per channel for block iblock.

Definition at line 501 of file SubChannel1PhaseProblem.C.

Referenced by SubChannel1PhaseProblem::implicitPetscSolve(), and SubChannel1PhaseProblem::residualFunction().

 {
   const unsigned int last_node = (iblock + 1) * _block_size;
   const unsigned int first_node = iblock * _block_size + 1;
   // Add to solution vector if explicit
   if (!_implicit_bool)
   {
     for (unsigned int iz = first_node; iz < last_node + 1; iz++)
     {
       for (unsigned int i_ch = 0; i_ch < _n_channels; i_ch++)
       {
         auto * node_out = _subchannel_mesh.getChannelNode(i_ch, iz);
         Real sumWij = 0.0;
         // Calculate sum of crossflow into channel i from channels j around i
         unsigned int counter = 0;
         for (auto i_gap : _subchannel_mesh.getChannelGaps(i_ch))
         {
           sumWij += _subchannel_mesh.getCrossflowSign(i_ch, counter) * _Wij(i_gap, iz);
           counter++;
         }
         // The net crossflow coming out of cell i [kg/sec]
         _SumWij_soln->set(node_out, sumWij);
       }
     }
   }
   // Add to matrix if implicit
   else
   {
     for (unsigned int iz = first_node; iz < last_node + 1; iz++)
     {
       unsigned int iz_ind = iz - first_node;
       for (unsigned int i_ch = 0; i_ch < _n_channels; i_ch++)
       {
         // Calculate sum of crossflow into channel i from channels j around i
         unsigned int counter = 0;
         for (auto i_gap : _subchannel_mesh.getChannelGaps(i_ch))
         {
           PetscInt row = i_ch + _n_channels * iz_ind;
           PetscInt col = i_gap + _n_gaps * iz_ind;
           PetscScalar value = _subchannel_mesh.getCrossflowSign(i_ch, counter);
           LibmeshPetscCall(MatSetValues(_mc_sumWij_mat, 1, &row, 1, &col, &value, INSERT_VALUES));
           counter++;
         }
       }
     }
     LibmeshPetscCall(MatAssemblyBegin(_mc_sumWij_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_mc_sumWij_mat, MAT_FINAL_ASSEMBLY));
     if (_segregated_bool)
     {
       Vec loc_prod;
       Vec loc_Wij;
       LibmeshPetscCall(VecDuplicate(_amc_sys_mdot_rhs, &loc_prod));
       LibmeshPetscCall(VecDuplicate(_Wij_vec, &loc_Wij));
       LibmeshPetscCall(populateVectorFromDense<libMesh::DenseMatrix<Real>>(
           loc_Wij, _Wij, first_node, last_node, _n_gaps));
       LibmeshPetscCall(MatMult(_mc_sumWij_mat, loc_Wij, loc_prod));
       LibmeshPetscCall(populateSolutionChan<SolutionHandle>(
           loc_prod, *_SumWij_soln, first_node, last_node, _n_channels));
       LibmeshPetscCall(VecDestroy(&loc_prod));
       LibmeshPetscCall(VecDestroy(&loc_Wij));
     }
   }
 }

◆ computeSweepFlowMixingParameter()

Real SubChannel1PhaseProblem::computeSweepFlowMixingParameter	(	unsigned int	i_gap,
		unsigned int	iz
	)		const

protectedinherited

Computes and validates the sweep-flow mixing parameter.

Definition at line 1906 of file SubChannel1PhaseProblem.C.

Referenced by computeh().

 {
   auto beta = _mixing_closure->computeSweepFlowMixingParameter(i_gap, iz);
   if (!std::isfinite(beta) || beta < 0.0)
     mooseError(name(),
                ": Mixing closure returned invalid sweep-flow coefficient = ",
                beta,
                " for gap ",
                i_gap,
                " at axial index ",
                iz,
                ". sweep-flow coefficient must be finite and non-negative.");
 
   return beta;
 }

◆ computeT()

void SubChannel1PhaseProblem::computeT ( int iblock )

protectedinherited

Computes Temperature per channel for block iblock.

Definition at line 1413 of file SubChannel1PhaseProblem.C.

Referenced by SubChannel1PhaseProblem::externalSolve().

 {
   const unsigned int last_node = (iblock + 1) * _block_size;
   const unsigned int first_node = iblock * _block_size + 1;
   for (unsigned int iz = first_node; iz < last_node + 1; iz++)
   {
     for (unsigned int i_ch = 0; i_ch < _n_channels; i_ch++)
     {
       auto * node = _subchannel_mesh.getChannelNode(i_ch, iz);
       _T_soln->set(node, _fp->T_from_p_h((*_P_soln)(node) + _P_out, (*_h_soln)(node)));
     }
   }
 }

◆ computeWijFromSolve()

void SubChannel1PhaseProblem::computeWijFromSolve ( int iblock )

protectedinherited

Computes diversion crossflow per gap for block iblock.

Definition at line 468 of file SubChannel1PhaseProblem.C.

Referenced by SubChannel1PhaseProblem::externalSolve().

 {
   const unsigned int last_node = (iblock + 1) * _block_size;
   const unsigned int first_node = iblock * _block_size + 1;
   // Initial guess, port crossflow of block (iblock) into a vector that will act as my initial guess
   libMesh::DenseVector<Real> solution_seed(_n_gaps * _block_size, 0.0);
   for (unsigned int iz = first_node; iz < last_node + 1; iz++)
   {
     for (unsigned int i_gap = 0; i_gap < _n_gaps; i_gap++)
     {
       int i = _n_gaps * (iz - first_node) + i_gap; // column wise transfer
       solution_seed(i) = _Wij(i_gap, iz);
     }
   }
 
   // Solving the combined lateral momentum equation for Wij using a PETSc solver and update vector
   // root
   libMesh::DenseVector<Real> root(_n_gaps * _block_size, 0.0);
   LibmeshPetscCall(petscSnesSolver(iblock, solution_seed, root));
 
   // Assign the solution to the cross-flow matrix
   int i = 0;
   for (unsigned int iz = first_node; iz < last_node + 1; iz++)
   {
     for (unsigned int i_gap = 0; i_gap < _n_gaps; i_gap++)
     {
       _Wij(i_gap, iz) = root(i);
       i++;
     }
   }
 }

◆ computeWijPrime()

void SubChannel1PhaseProblem::computeWijPrime ( int iblock )

protectedinherited

Computes turbulent crossflow per gap for block iblock.

Update turbulent crossflow

Definition at line 1793 of file SubChannel1PhaseProblem.C.

Referenced by SubChannel1PhaseProblem::externalSolve(), SubChannel1PhaseProblem::implicitPetscSolve(), and SubChannel1PhaseProblem::residualFunction().

 {
   const unsigned int last_node = (iblock + 1) * _block_size;
   const unsigned int first_node = iblock * _block_size + 1;
   for (unsigned int iz = first_node; iz < last_node + 1; iz++)
   {
     auto dz = _z_grid[iz] - _z_grid[iz - 1];
     for (unsigned int i_gap = 0; i_gap < _n_gaps; i_gap++)
     {
       auto chans = _subchannel_mesh.getGapChannels(i_gap);
       unsigned int i_ch = chans.first;
       unsigned int j_ch = chans.second;
       auto * node_in_i = _subchannel_mesh.getChannelNode(i_ch, iz - 1);
       auto * node_out_i = _subchannel_mesh.getChannelNode(i_ch, iz);
       auto * node_in_j = _subchannel_mesh.getChannelNode(j_ch, iz - 1);
       auto * node_out_j = _subchannel_mesh.getChannelNode(j_ch, iz);
       auto Si_in = (*_S_flow_soln)(node_in_i);
       auto Sj_in = (*_S_flow_soln)(node_in_j);
       auto Si_out = (*_S_flow_soln)(node_out_i);
       auto Sj_out = (*_S_flow_soln)(node_out_j);
       auto gap = _subchannel_mesh.getGapWidth(iz, i_gap);
       auto Sij = dz * gap;
       auto avg_massflux =
           0.5 * (((*_mdot_soln)(node_in_i) + (*_mdot_soln)(node_in_j)) / (Si_in + Sj_in) +
                  ((*_mdot_soln)(node_out_i) + (*_mdot_soln)(node_out_j)) / (Si_out + Sj_out));
       auto beta = computeMixingParameter(i_gap, iz);
 
       if (!_implicit_bool)
       {
         _WijPrime(i_gap, iz) = beta * avg_massflux * Sij;
       }
       else
       {
         auto iz_ind = iz - first_node;
         PetscScalar base_value = beta * 0.5 * Sij;
 
         // Bottom values
         if (iz == first_node)
         {
           PetscScalar value_tl = -1.0 * base_value / (Si_in + Sj_in) *
                                  ((*_mdot_soln)(node_in_i) + (*_mdot_soln)(node_in_j));
           PetscInt row = i_gap + _n_gaps * iz_ind;
           LibmeshPetscCall(
               VecSetValues(_amc_turbulent_cross_flows_rhs, 1, &row, &value_tl, INSERT_VALUES));
         }
         else
         {
           PetscScalar value_tl = base_value / (Si_in + Sj_in);
           PetscInt row = i_gap + _n_gaps * iz_ind;
 
           PetscInt col_ich = i_ch + _n_channels * (iz_ind - 1);
           LibmeshPetscCall(MatSetValues(
               _amc_turbulent_cross_flows_mat, 1, &row, 1, &col_ich, &value_tl, INSERT_VALUES));
 
           PetscInt col_jch = j_ch + _n_channels * (iz_ind - 1);
           LibmeshPetscCall(MatSetValues(
               _amc_turbulent_cross_flows_mat, 1, &row, 1, &col_jch, &value_tl, INSERT_VALUES));
         }
 
         // Top values
         PetscScalar value_bl = base_value / (Si_out + Sj_out);
         PetscInt row = i_gap + _n_gaps * iz_ind;
 
         PetscInt col_ich = i_ch + _n_channels * iz_ind;
         LibmeshPetscCall(MatSetValues(
             _amc_turbulent_cross_flows_mat, 1, &row, 1, &col_ich, &value_bl, INSERT_VALUES));
 
         PetscInt col_jch = j_ch + _n_channels * iz_ind;
         LibmeshPetscCall(MatSetValues(
             _amc_turbulent_cross_flows_mat, 1, &row, 1, &col_jch, &value_bl, INSERT_VALUES));
       }
     }
   }
 
   if (_implicit_bool)
   {
     LibmeshPetscCall(MatAssemblyBegin(_amc_turbulent_cross_flows_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_amc_turbulent_cross_flows_mat, MAT_FINAL_ASSEMBLY));
 
     Vec loc_prod;
     Vec loc_Wij;
     LibmeshPetscCall(VecDuplicate(_amc_sys_mdot_rhs, &loc_prod));
     LibmeshPetscCall(VecDuplicate(_Wij_vec, &loc_Wij));
     LibmeshPetscCall(populateVectorFromHandle<SolutionHandle>(
         loc_prod, *_mdot_soln, first_node, last_node, _n_channels));
     LibmeshPetscCall(MatMult(_amc_turbulent_cross_flows_mat, loc_prod, loc_Wij));
     LibmeshPetscCall(VecAXPY(loc_Wij, -1.0, _amc_turbulent_cross_flows_rhs));
     LibmeshPetscCall(populateDenseFromVector<libMesh::DenseMatrix<Real>>(
         loc_Wij, _WijPrime, first_node, last_node, _n_gaps));
     LibmeshPetscCall(VecDestroy(&loc_prod));
     LibmeshPetscCall(VecDestroy(&loc_Wij));
   }
 }

◆ computeWijResidual()

void SubChannel1PhaseProblem::computeWijResidual ( int iblock )

protectedinherited

Computes Residual Matrix based on the lateral momentum conservation equation for block iblock.

Assembling system

Definition at line 1474 of file SubChannel1PhaseProblem.C.

Referenced by SubChannel1PhaseProblem::implicitPetscSolve(), and SubChannel1PhaseProblem::residualFunction().

 {
   const unsigned int last_node = (iblock + 1) * _block_size;
   const unsigned int first_node = iblock * _block_size + 1;
   // Cross flow residual
   if (!_implicit_bool)
   {
     const Real & pitch = _subchannel_mesh.getPitch();
     for (unsigned int iz = first_node; iz < last_node + 1; iz++)
     {
       auto dz = _z_grid[iz] - _z_grid[iz - 1];
       for (unsigned int i_gap = 0; i_gap < _n_gaps; i_gap++)
       {
         auto chans = _subchannel_mesh.getGapChannels(i_gap);
         unsigned int i_ch = chans.first;
         unsigned int j_ch = chans.second;
         auto * node_in_i = _subchannel_mesh.getChannelNode(i_ch, iz - 1);
         auto * node_out_i = _subchannel_mesh.getChannelNode(i_ch, iz);
         auto * node_in_j = _subchannel_mesh.getChannelNode(j_ch, iz - 1);
         auto * node_out_j = _subchannel_mesh.getChannelNode(j_ch, iz);
         auto rho_i = (*_rho_soln)(node_in_i);
         auto rho_j = (*_rho_soln)(node_in_j);
         auto Si = (*_S_flow_soln)(node_in_i);
         auto Sj = (*_S_flow_soln)(node_in_j);
         auto Sij = dz * _subchannel_mesh.getGapWidth(iz, i_gap);
         auto Lij = pitch;
         // total local form loss in the ij direction
         auto friction_term = _kij * _Wij(i_gap, iz) * std::abs(_Wij(i_gap, iz));
         auto DPij = (*_P_soln)(node_in_i) - (*_P_soln)(node_in_j);
         // Figure out donor cell density
         auto rho_star = 0.0;
         if (_Wij(i_gap, iz) > 0.0)
           rho_star = rho_i;
         else if (_Wij(i_gap, iz) < 0.0)
           rho_star = rho_j;
         else
           rho_star = (rho_i + rho_j) / 2.0;
         auto mass_term_out =
             (*_mdot_soln)(node_out_i) / (*_S_flow_soln)(node_out_i) / (*_rho_soln)(node_out_i) +
             (*_mdot_soln)(node_out_j) / (*_S_flow_soln)(node_out_j) / (*_rho_soln)(node_out_j);
         auto mass_term_in =
             (*_mdot_soln)(node_in_i) / Si / rho_i + (*_mdot_soln)(node_in_j) / Sj / rho_j;
         auto term_out = Sij * rho_star * (Lij / dz) * mass_term_out * _Wij(i_gap, iz);
         auto term_in = Sij * rho_star * (Lij / dz) * mass_term_in * _Wij(i_gap, iz - 1);
         auto inertia_term = term_out - term_in;
         auto pressure_term = 2 * Utility::pow<2>(Sij) * DPij * rho_star;
         auto time_term =
             _TR * 2.0 * (_Wij(i_gap, iz) - _Wij_old(i_gap, iz)) * Lij * Sij * rho_star / _dt;
 
         _Wij_residual_matrix(i_gap, iz - 1 - iblock * _block_size) =
             time_term + friction_term + inertia_term - pressure_term;
       }
     }
   }
   else
   {
     // Initializing to zero the elements of the lateral momentum assembly
     LibmeshPetscCall(MatZeroEntries(_cmc_time_derivative_mat));
     LibmeshPetscCall(MatZeroEntries(_cmc_advective_derivative_mat));
     LibmeshPetscCall(MatZeroEntries(_cmc_friction_force_mat));
     LibmeshPetscCall(MatZeroEntries(_cmc_pressure_force_mat));
     LibmeshPetscCall(VecZeroEntries(_cmc_time_derivative_rhs));
     LibmeshPetscCall(VecZeroEntries(_cmc_advective_derivative_rhs));
     LibmeshPetscCall(VecZeroEntries(_cmc_friction_force_rhs));
     LibmeshPetscCall(VecZeroEntries(_cmc_pressure_force_rhs));
     LibmeshPetscCall(MatZeroEntries(_cmc_sys_Wij_mat));
     LibmeshPetscCall(VecZeroEntries(_cmc_sys_Wij_rhs));
     const Real & pitch = _subchannel_mesh.getPitch();
     for (unsigned int iz = first_node; iz < last_node + 1; iz++)
     {
       auto dz = _z_grid[iz] - _z_grid[iz - 1];
       auto iz_ind = iz - first_node;
       for (unsigned int i_gap = 0; i_gap < _n_gaps; i_gap++)
       {
         auto chans = _subchannel_mesh.getGapChannels(i_gap);
         unsigned int i_ch = chans.first;
         unsigned int j_ch = chans.second;
         auto * node_in_i = _subchannel_mesh.getChannelNode(i_ch, iz - 1);
         auto * node_out_i = _subchannel_mesh.getChannelNode(i_ch, iz);
         auto * node_in_j = _subchannel_mesh.getChannelNode(j_ch, iz - 1);
         auto * node_out_j = _subchannel_mesh.getChannelNode(j_ch, iz);
 
         // inlet, outlet, and interpolated densities
         auto rho_i_in = (*_rho_soln)(node_in_i);
         auto rho_i_out = (*_rho_soln)(node_out_i);
         auto rho_i_interp = computeInterpolatedValue(rho_i_out, rho_i_in, 0.5);
         auto rho_j_in = (*_rho_soln)(node_in_j);
         auto rho_j_out = (*_rho_soln)(node_out_j);
         auto rho_j_interp = computeInterpolatedValue(rho_j_out, rho_j_in, 0.5);
 
         // inlet, outlet, and interpolated areas
         auto S_i_in = (*_S_flow_soln)(node_in_i);
         auto S_i_out = (*_S_flow_soln)(node_out_i);
         auto S_j_in = (*_S_flow_soln)(node_in_j);
         auto S_j_out = (*_S_flow_soln)(node_out_j);
 
         // Cross-sectional gap area
         auto Sij = dz * _subchannel_mesh.getGapWidth(iz, i_gap);
         auto Lij = pitch;
 
         // Figure out donor cell density
         auto rho_star = 0.0;
         if (_Wij(i_gap, iz) > 0.0)
           rho_star = rho_i_interp;
         else if (_Wij(i_gap, iz) < 0.0)
           rho_star = rho_j_interp;
         else
           rho_star = (rho_i_interp + rho_j_interp) / 2.0;
 
         // Assembling time derivative
         PetscScalar time_factor = _TR * Lij * Sij * rho_star / _dt;
         PetscInt row_td = i_gap + _n_gaps * iz_ind;
         PetscInt col_td = i_gap + _n_gaps * iz_ind;
         PetscScalar value_td = time_factor;
         LibmeshPetscCall(MatSetValues(
             _cmc_time_derivative_mat, 1, &row_td, 1, &col_td, &value_td, INSERT_VALUES));
         PetscScalar value_td_rhs = time_factor * _Wij_old(i_gap, iz);
         LibmeshPetscCall(
             VecSetValues(_cmc_time_derivative_rhs, 1, &row_td, &value_td_rhs, INSERT_VALUES));
 
         // Assembling inertial term
         PetscScalar Pe = 0.5;
         auto alpha = computeInterpolationCoefficients(Pe);
         auto mass_term_out = (*_mdot_soln)(node_out_i) / S_i_out / rho_i_out +
                              (*_mdot_soln)(node_out_j) / S_j_out / rho_j_out;
         auto mass_term_in = (*_mdot_soln)(node_in_i) / S_i_in / rho_i_in +
                             (*_mdot_soln)(node_in_j) / S_j_in / rho_j_in;
         auto term_out = Sij * rho_star * (Lij / dz) * mass_term_out / 2.0;
         auto term_in = Sij * rho_star * (Lij / dz) * mass_term_in / 2.0;
         if (iz == first_node)
         {
           PetscInt row_ad = i_gap + _n_gaps * iz_ind;
           PetscScalar value_ad = term_in * alpha * _Wij(i_gap, iz - 1);
           LibmeshPetscCall(
               VecSetValues(_cmc_advective_derivative_rhs, 1, &row_ad, &value_ad, ADD_VALUES));
 
           PetscInt col_ad = i_gap + _n_gaps * iz_ind;
           value_ad = -1.0 * term_in * (1.0 - alpha) + term_out * alpha;
           LibmeshPetscCall(MatSetValues(
               _cmc_advective_derivative_mat, 1, &row_ad, 1, &col_ad, &value_ad, INSERT_VALUES));
 
           col_ad = i_gap + _n_gaps * (iz_ind + 1);
           value_ad = term_out * (1.0 - alpha);
           LibmeshPetscCall(MatSetValues(
               _cmc_advective_derivative_mat, 1, &row_ad, 1, &col_ad, &value_ad, INSERT_VALUES));
         }
         else if (iz == last_node)
         {
           PetscInt row_ad = i_gap + _n_gaps * iz_ind;
           PetscInt col_ad = i_gap + _n_gaps * (iz_ind - 1);
           PetscScalar value_ad = -1.0 * term_in * alpha;
           LibmeshPetscCall(MatSetValues(
               _cmc_advective_derivative_mat, 1, &row_ad, 1, &col_ad, &value_ad, INSERT_VALUES));
 
           col_ad = i_gap + _n_gaps * iz_ind;
           value_ad = -1.0 * term_in * (1.0 - alpha) + term_out * alpha;
           LibmeshPetscCall(MatSetValues(
               _cmc_advective_derivative_mat, 1, &row_ad, 1, &col_ad, &value_ad, INSERT_VALUES));
 
           value_ad = -1.0 * term_out * (1.0 - alpha) * _Wij(i_gap, iz);
           LibmeshPetscCall(
               VecSetValues(_cmc_advective_derivative_rhs, 1, &row_ad, &value_ad, ADD_VALUES));
         }
         else
         {
           PetscInt row_ad = i_gap + _n_gaps * iz_ind;
           PetscInt col_ad = i_gap + _n_gaps * (iz_ind - 1);
           PetscScalar value_ad = -1.0 * term_in * alpha;
           LibmeshPetscCall(MatSetValues(
               _cmc_advective_derivative_mat, 1, &row_ad, 1, &col_ad, &value_ad, INSERT_VALUES));
 
           col_ad = i_gap + _n_gaps * iz_ind;
           value_ad = -1.0 * term_in * (1.0 - alpha) + term_out * alpha;
           LibmeshPetscCall(MatSetValues(
               _cmc_advective_derivative_mat, 1, &row_ad, 1, &col_ad, &value_ad, INSERT_VALUES));
 
           col_ad = i_gap + _n_gaps * (iz_ind + 1);
           value_ad = term_out * (1.0 - alpha);
           LibmeshPetscCall(MatSetValues(
               _cmc_advective_derivative_mat, 1, &row_ad, 1, &col_ad, &value_ad, INSERT_VALUES));
         }
         // Assembling friction force
         PetscInt row_ff = i_gap + _n_gaps * iz_ind;
         PetscInt col_ff = i_gap + _n_gaps * iz_ind;
         PetscScalar value_ff = _kij * std::abs(_Wij(i_gap, iz)) / 2.0;
         LibmeshPetscCall(MatSetValues(
             _cmc_friction_force_mat, 1, &row_ff, 1, &col_ff, &value_ff, INSERT_VALUES));
 
         // Assembling pressure force
         alpha = computeInterpolationCoefficients(Pe);
 
         if (!_staggered_pressure_bool)
         {
           PetscScalar pressure_factor = Utility::pow<2>(Sij) * rho_star;
           PetscInt row_pf = i_gap + _n_gaps * iz_ind;
           PetscInt col_pf = i_ch + _n_channels * iz_ind;
           PetscScalar value_pf = -1.0 * alpha * pressure_factor;
           LibmeshPetscCall(
               MatSetValues(_cmc_pressure_force_mat, 1, &row_pf, 1, &col_pf, &value_pf, ADD_VALUES));
           col_pf = j_ch + _n_channels * iz_ind;
           value_pf = alpha * pressure_factor;
           LibmeshPetscCall(
               MatSetValues(_cmc_pressure_force_mat, 1, &row_pf, 1, &col_pf, &value_pf, ADD_VALUES));
 
           if (iz == last_node)
           {
             PetscInt row_pf = i_gap + _n_gaps * iz_ind;
             PetscScalar value_pf = (1.0 - alpha) * pressure_factor * (*_P_soln)(node_out_i);
             LibmeshPetscCall(
                 VecSetValues(_cmc_pressure_force_rhs, 1, &row_pf, &value_pf, ADD_VALUES));
             value_pf = -1.0 * (1.0 - alpha) * pressure_factor * (*_P_soln)(node_out_j);
             LibmeshPetscCall(
                 VecSetValues(_cmc_pressure_force_rhs, 1, &row_pf, &value_pf, ADD_VALUES));
           }
           else
           {
             row_pf = i_gap + _n_gaps * iz_ind;
             col_pf = i_ch + _n_channels * (iz_ind + 1);
             value_pf = -1.0 * (1.0 - alpha) * pressure_factor;
             LibmeshPetscCall(MatSetValues(
                 _cmc_pressure_force_mat, 1, &row_pf, 1, &col_pf, &value_pf, ADD_VALUES));
             col_pf = j_ch + _n_channels * (iz_ind + 1);
             value_pf = (1.0 - alpha) * pressure_factor;
             LibmeshPetscCall(MatSetValues(
                 _cmc_pressure_force_mat, 1, &row_pf, 1, &col_pf, &value_pf, ADD_VALUES));
           }
         }
         else
         {
           PetscScalar pressure_factor = Utility::pow<2>(Sij) * rho_star;
           PetscInt row_pf = i_gap + _n_gaps * iz_ind;
           PetscInt col_pf = i_ch + _n_channels * iz_ind;
           PetscScalar value_pf = -1.0 * pressure_factor;
           LibmeshPetscCall(
               MatSetValues(_cmc_pressure_force_mat, 1, &row_pf, 1, &col_pf, &value_pf, ADD_VALUES));
           col_pf = j_ch + _n_channels * iz_ind;
           value_pf = pressure_factor;
           LibmeshPetscCall(
               MatSetValues(_cmc_pressure_force_mat, 1, &row_pf, 1, &col_pf, &value_pf, ADD_VALUES));
         }
       }
     }
     LibmeshPetscCall(MatZeroEntries(_cmc_sys_Wij_mat));
     LibmeshPetscCall(VecZeroEntries(_cmc_sys_Wij_rhs));
     LibmeshPetscCall(MatAssemblyBegin(_cmc_time_derivative_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_cmc_time_derivative_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyBegin(_cmc_advective_derivative_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_cmc_advective_derivative_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyBegin(_cmc_friction_force_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_cmc_friction_force_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyBegin(_cmc_pressure_force_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_cmc_pressure_force_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyBegin(_cmc_sys_Wij_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_cmc_sys_Wij_mat, MAT_FINAL_ASSEMBLY));
     // Matrix
 #if !PETSC_VERSION_LESS_THAN(3, 15, 0)
     LibmeshPetscCall(
         MatAXPY(_cmc_sys_Wij_mat, 1.0, _cmc_time_derivative_mat, UNKNOWN_NONZERO_PATTERN));
     LibmeshPetscCall(MatAssemblyBegin(_cmc_sys_Wij_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_cmc_sys_Wij_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(
         MatAXPY(_cmc_sys_Wij_mat, 1.0, _cmc_advective_derivative_mat, UNKNOWN_NONZERO_PATTERN));
     LibmeshPetscCall(MatAssemblyBegin(_cmc_sys_Wij_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_cmc_sys_Wij_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(
         MatAXPY(_cmc_sys_Wij_mat, 1.0, _cmc_friction_force_mat, UNKNOWN_NONZERO_PATTERN));
 #else
     LibmeshPetscCall(
         MatAXPY(_cmc_sys_Wij_mat, 1.0, _cmc_time_derivative_mat, DIFFERENT_NONZERO_PATTERN));
     LibmeshPetscCall(MatAssemblyBegin(_cmc_sys_Wij_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_cmc_sys_Wij_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(
         MatAXPY(_cmc_sys_Wij_mat, 1.0, _cmc_advective_derivative_mat, DIFFERENT_NONZERO_PATTERN));
     LibmeshPetscCall(MatAssemblyBegin(_cmc_sys_Wij_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_cmc_sys_Wij_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(
         MatAXPY(_cmc_sys_Wij_mat, 1.0, _cmc_friction_force_mat, DIFFERENT_NONZERO_PATTERN));
 #endif
     LibmeshPetscCall(MatAssemblyBegin(_cmc_sys_Wij_mat, MAT_FINAL_ASSEMBLY));
     LibmeshPetscCall(MatAssemblyEnd(_cmc_sys_Wij_mat, MAT_FINAL_ASSEMBLY));
     // RHS
     LibmeshPetscCall(VecAXPY(_cmc_sys_Wij_rhs, 1.0, _cmc_time_derivative_rhs));
     LibmeshPetscCall(VecAXPY(_cmc_sys_Wij_rhs, 1.0, _cmc_advective_derivative_rhs));
     LibmeshPetscCall(VecAXPY(_cmc_sys_Wij_rhs, 1.0, _cmc_friction_force_rhs));
 
     if (_segregated_bool)
     {
       // Assembly the matrix system
       Vec sol_holder_P;
       LibmeshPetscCall(createPetscVector(sol_holder_P, _block_size * _n_gaps));
       Vec sol_holder_W;
       LibmeshPetscCall(createPetscVector(sol_holder_W, _block_size * _n_gaps));
       LibmeshPetscCall(populateVectorFromHandle<SolutionHandle>(
           _prodp, *_P_soln, first_node - 1, last_node - 1, _n_channels));
       LibmeshPetscCall(populateVectorFromDense<libMesh::DenseMatrix<Real>>(
           _Wij_vec, _Wij, first_node, last_node, _n_gaps));
       LibmeshPetscCall(MatMult(_cmc_sys_Wij_mat, _Wij_vec, sol_holder_W));
       LibmeshPetscCall(VecAXPY(sol_holder_W, -1.0, _cmc_sys_Wij_rhs));
       LibmeshPetscCall(MatMult(_cmc_pressure_force_mat, _prodp, sol_holder_P));
       LibmeshPetscCall(VecAXPY(sol_holder_P, -1.0, _cmc_pressure_force_rhs));
       LibmeshPetscCall(VecAXPY(sol_holder_W, 1.0, sol_holder_P));
       PetscScalar * xx;
       LibmeshPetscCall(VecGetArray(sol_holder_W, &xx));
       for (unsigned int iz = first_node; iz < last_node + 1; iz++)
       {
         auto iz_ind = iz - first_node;
         for (unsigned int i_gap = 0; i_gap < _n_gaps; i_gap++)
         {
           _Wij_residual_matrix(i_gap, iz - 1 - iblock * _block_size) = xx[iz_ind * _n_gaps + i_gap];
         }
       }
       LibmeshPetscCall(VecDestroy(&sol_holder_P));
       LibmeshPetscCall(VecDestroy(&sol_holder_W));
     }
   }
 }

◆ createPetscMatrix()

PetscErrorCode SubChannel1PhaseProblem::createPetscMatrix	(	Mat &	M,
		PetscInt	n,
		PetscInt	m
	)

inlineprotectedinherited

Definition at line 300 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::SubChannel1PhaseProblem(), and TriSubChannel1PhaseProblem().

   {
     PetscFunctionBegin;
     LibmeshPetscCall(MatCreate(PETSC_COMM_SELF, &M));
     LibmeshPetscCall(MatSetSizes(M, PETSC_DECIDE, PETSC_DECIDE, n, m));
     LibmeshPetscCall(MatSetFromOptions(M));
     LibmeshPetscCall(MatSetUp(M));
     PetscFunctionReturn(LIBMESH_PETSC_SUCCESS);
   }

◆ createPetscVector()

PetscErrorCode SubChannel1PhaseProblem::createPetscVector	(	Vec &	v,
		PetscInt	n
	)

inlineprotectedinherited

Petsc Functions.

Definition at line 289 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::computeWijResidual(), SubChannel1PhaseProblem::implicitPetscSolve(), SubChannel1PhaseProblem::SubChannel1PhaseProblem(), and TriSubChannel1PhaseProblem().

   {
     PetscFunctionBegin;
     LibmeshPetscCall(VecCreate(PETSC_COMM_SELF, &v));
     LibmeshPetscCall(PetscObjectSetName((PetscObject)v, "Solution"));
     LibmeshPetscCall(VecSetSizes(v, PETSC_DECIDE, n));
     LibmeshPetscCall(VecSetFromOptions(v));
     LibmeshPetscCall(VecZeroEntries(v));
     PetscFunctionReturn(LIBMESH_PETSC_SUCCESS);
   }

◆ detectDeformation()

void SubChannel1PhaseProblem::detectDeformation ( )

protectedinherited

Detects whether pin diameter or duct displacement fields require geometry recalculation.

Definition at line 336 of file SubChannel1PhaseProblem.C.

Referenced by QuadSubChannel1PhaseProblem::initializeSolution(), and initializeSolution().

 {
   const Real tol = libMesh::TOLERANCE;
   const auto pin_diameter = _subchannel_mesh.getPinDiameter();
 
   if (_pin_mesh_exist)
   {
     for (unsigned int iz = 0; iz < _n_cells + 1; iz++)
       for (unsigned int i_pin = 0; i_pin < _n_pins; i_pin++)
       {
         auto * node = _subchannel_mesh.getPinNode(i_pin, iz);
         const Real Dpin = (*_Dpin_soln)(node);
         if (std::abs(Dpin) <= tol)
           mooseError("Dpin is zero at node ",
                      node->id(),
                      ". You must initialize Dpin to a non-zero value.");
         if (std::abs(Dpin - pin_diameter) > tol)
           _deformation = true;
       }
   }
 
   for (unsigned int iz = 0; iz < _n_cells + 1 && !_deformation; iz++)
     for (unsigned int i_ch = 0; i_ch < _n_channels && !_deformation; i_ch++)
     {
       auto * node = _subchannel_mesh.getChannelNode(i_ch, iz);
       auto subch_type = _subchannel_mesh.getSubchannelType(i_ch);
 
       if ((subch_type == EChannelType::CORNER || subch_type == EChannelType::EDGE) &&
           std::abs((*_displacement_soln)(node)) > tol)
         _deformation = true;
     }
 }

◆ externalSolve()

void SubChannel1PhaseProblem::externalSolve ( )

overridevirtualinherited

Assigning temperatures to duct

Implements ExternalProblem.

Definition at line 2514 of file SubChannel1PhaseProblem.C.

 {
   _console << "Executing subchannel solver\n";
   _dt = (isTransient() ? dt() : _one);
   _TR = isTransient();
 
   // The subchannel solver hardcodes a first-order backward (implicit) Euler time discretization, so
   // any other time integrator a user selects is silently ignored. Warn once if one is requested.
   if (!_time_integrator_checked)
   {
     _time_integrator_checked = true;
     if (isTransient())
       if (auto * transient = dynamic_cast<TransientBase *>(_app.getExecutioner()))
         for (const auto * ti : transient->getTimeIntegrators())
           if (!dynamic_cast<const ImplicitEuler *>(ti))
             mooseWarning("The subchannel solver always uses implicit (backward) Euler time "
                          "integration; the requested '",
                          ti->type(),
                          "' time integrator is ignored.");
   }
 
   initializeSolution();
   // Small helper functions to reduce repetition
   // Verbose print helper (no-op unless _verbose_subchannel is true)
   auto V = [&](const std::string & s)
   {
     if (_verbose_subchannel)
       _console << s << std::endl;
   };
   V("Solution initialized");
   Real P_error = 1.0;
   unsigned int P_it = 0;
   unsigned int P_it_max;
 
   if (_segregated_bool)
     P_it_max = 20 * _n_blocks;
   else
     P_it_max = 100;
 
   if ((_n_blocks == 1) && (_segregated_bool))
     P_it_max = 5;
 
   while ((P_error > _P_tol && P_it < P_it_max))
   {
     P_it += 1;
     if (P_it == P_it_max && _n_blocks != 1)
     {
       _console << "Reached maximum number of axial pressure iterations" << std::endl;
       _converged = false;
     }
     _console << "Solving Outer Iteration : " << P_it << std::endl;
     auto P_L2norm_old_axial = _P_soln->L2norm();
     for (unsigned int iblock = 0; iblock < _n_blocks; iblock++)
     {
       int last_level = (iblock + 1) * _block_size;
       int first_level = iblock * _block_size + 1;
       Real T_block_error = 1.0;
       auto T_it = 0;
       _console << "Solving Block: " << iblock << " From first level: " << first_level
                << " to last level: " << last_level << std::endl;
       while (T_block_error > _T_tol && T_it < _T_maxit)
       {
         T_it += 1;
         if (T_it == _T_maxit)
         {
           _console << "Reached maximum number of temperature iterations for block: " << iblock
                    << std::endl;
           _converged = false;
         }
         auto T_L2norm_old_block = _T_soln->L2norm();
         // We are only computing quantities on rank 0
         if (processor_id() > 0)
           goto aux_close;
 
         if (_segregated_bool)
         {
           computeWijFromSolve(iblock);
           if (_compute_power)
           {
             computeh(iblock);
             computeT(iblock);
           }
         }
         else
         {
           LibmeshPetscCall(implicitPetscSolve(iblock));
           computeWijPrime(iblock);
           V("Done with main solve.");
           if (_compute_power)
           {
             computeh(iblock);
             computeT(iblock);
           }
           V("Done with thermal solve.");
         }
 
         V("Start updating thermophysical properties.");
         if (_compute_density)
           computeRho(iblock);
         if (_compute_viscosity)
           computeMu(iblock);
         V("Done updating thermophysical properties.");
 
         // We must do a global assembly to make sure data is parallel consistent before we do things
         // like compute L2 norms
       aux_close:
         _aux->solution().close();
 
         auto T_L2norm_new = _T_soln->L2norm();
         T_block_error =
             std::abs((T_L2norm_new - T_L2norm_old_block) / (T_L2norm_old_block + 1E-14));
         _console << "T_block_error: " << T_block_error << std::endl;
 
         // All processes must have the same iteration count
         comm().max(T_block_error);
       }
     }
     auto P_L2norm_new_axial = _P_soln->L2norm();
     P_error =
         std::abs((P_L2norm_new_axial - P_L2norm_old_axial) / (P_L2norm_old_axial + _P_out + 1E-14));
     _console << "P_error :" << P_error << std::endl;
     V("Iteration:  " + std::to_string(P_it));
     V("Maximum iterations: " + std::to_string(P_it_max));
   }
   // update old crossflow matrix
   _Wij_old = _Wij;
   _console << "Finished executing subchannel solver\n";
 
   // set SumWij at the inlet equal to the one on the first axial level  (for visualization purposes)
   for (unsigned int i_ch = 0; i_ch < _n_channels; i_ch++)
   {
     auto * node_in = _subchannel_mesh.getChannelNode(i_ch, 0);
     auto * node_out = _subchannel_mesh.getChannelNode(i_ch, 1);
     _SumWij_soln->set(node_in, (*_SumWij_soln)(node_out)); // kg/sec
   }
 
   if (_pin_mesh_exist)
   {
     // Assign average HTC to subchannels. This is exact if all pins have the same diameter
     for (unsigned int iz = 0; iz < _n_cells + 1; ++iz)
     {
       for (unsigned int i_ch = 0; i_ch < _n_channels; i_ch++)
       {
         const auto * node = _subchannel_mesh.getChannelNode(i_ch, iz);
         auto mu = (*_mu_soln)(node);
         auto S = (*_S_flow_soln)(node);
         auto w_perim = (*_w_perim_soln)(node);
         auto Dh_i = 4.0 * S / w_perim;
         auto Re = (((*_mdot_soln)(node) / S) * Dh_i / mu);
         auto k = _fp->k_from_p_T((*_P_soln)(node) + _P_out, (*_T_soln)(node));
         auto cp = _fp->cp_from_p_T((*_P_soln)(node) + _P_out, (*_T_soln)(node));
         auto Pr = (*_mu_soln)(node)*cp / k;
         // Create Friction structure
         _friction_args = FrictionStruct(i_ch, Re, S, w_perim);
 
         Real sumhw = 0.0;
         for (auto i_pin : _subchannel_mesh.getChannelPins(i_ch))
         {
           // Create nusselt number structure
           _nusselt_args = NusseltStruct(Re, Pr, i_pin, iz, i_ch);
 
           // Compute HTC
           sumhw += _pin_HTC_closure->computeHTC(_friction_args, _nusselt_args, k);
         }
 
         // Set HTC
         _HTC_soln->set(node, sumhw / _subchannel_mesh.getChannelPins(i_ch).size());
       }
     }
     _HTC_soln->close();
 
     _console << "Commencing calculation of Pin surface temperature \n";
     for (unsigned int i_pin = 0; i_pin < _n_pins; i_pin++)
     {
       for (unsigned int iz = 0; iz < _n_cells + 1; ++iz)
       {
         const auto * pin_node = _subchannel_mesh.getPinNode(i_pin, iz);
         Real sumTemp = 0.0;
         // Calculate sum of pin surface temperatures that the channels around the pin see
         for (auto i_ch : _subchannel_mesh.getPinChannels(i_pin))
         {
           const auto * node = _subchannel_mesh.getChannelNode(i_ch, iz);
           auto mu = (*_mu_soln)(node);
           auto S = (*_S_flow_soln)(node);
           auto w_perim = (*_w_perim_soln)(node);
           auto Dh_i = 4.0 * S / w_perim;
           auto Re = (((*_mdot_soln)(node) / S) * Dh_i / mu);
           auto k = _fp->k_from_p_T((*_P_soln)(node) + _P_out, (*_T_soln)(node));
           auto cp = _fp->cp_from_p_T((*_P_soln)(node) + _P_out, (*_T_soln)(node));
           auto Pr = (*_mu_soln)(node)*cp / k;
           // Create Friction structure
           _friction_args = FrictionStruct(i_ch, Re, S, w_perim);
           // Create nusselt number structure
           _nusselt_args = NusseltStruct(Re, Pr, i_pin, iz, i_ch);
           // Compute HTC
           auto hw = _pin_HTC_closure->computeHTC(_friction_args, _nusselt_args, k);
           // Compute surface temperature contribution from subchannel side
           sumTemp +=
               (*_q_prime_soln)(pin_node) / ((*_Dpin_soln)(pin_node)*M_PI * hw) + (*_T_soln)(node);
         }
         if (_subchannel_mesh.getPinChannels(i_pin).size() > 0)
           _Tpin_soln->set(pin_node, sumTemp / _subchannel_mesh.getPinChannels(i_pin).size());
         else
           mooseError("Pin was not found for pin index:  " + std::to_string(i_pin));
       }
     }
   }
 
   if (_duct_mesh_exist && processor_id() == 0)
   {
     _console << "Commencing calculation of duct surface temperature " << std::endl;
     auto duct_nodes = _subchannel_mesh.getDuctNodes();
     for (Node * dn : duct_nodes)
     {
       auto * node_chan = _subchannel_mesh.getChannelNodeFromDuct(dn);
       auto mu = (*_mu_soln)(node_chan);
       auto S = (*_S_flow_soln)(node_chan);
       auto w_perim = (*_w_perim_soln)(node_chan);
       auto Dh_i = 4.0 * S / w_perim;
       auto Re = (((*_mdot_soln)(node_chan) / S) * Dh_i / mu);
       auto k = _fp->k_from_p_T((*_P_soln)(node_chan) + _P_out, (*_T_soln)(node_chan));
       auto cp = _fp->cp_from_p_T((*_P_soln)(node_chan) + _P_out, (*_T_soln)(node_chan));
       auto Pr = (*_mu_soln)(node_chan)*cp / k;
 
       // Create nusselt number structure (consistent with pin case)
       const libMesh::Point & node_point = *_subchannel_mesh.getChannelNodeFromDuct(dn);
       const unsigned int iz = _subchannel_mesh.getZIndex(node_point);
       const unsigned int i_ch = _subchannel_mesh.channelIndex(node_point);
 
       // Create nusselt number structure
       _nusselt_args = NusseltStruct(Re, Pr, std::numeric_limits<unsigned int>::max(), iz, i_ch);
 
       // Create Friction structure
       _friction_args = FrictionStruct(i_ch, Re, S, w_perim);
 
       // Compute HTC
       auto hw = _duct_HTC_closure->computeHTC(_friction_args, _nusselt_args, k);
 
       // Compute Channel Temperature
       auto T_chan = (*_duct_heat_flux_soln)(dn) / hw + (*_T_soln)(node_chan);
       _Tduct_soln->set(dn, T_chan);
     }
   }
   _aux->solution().close();
   _aux->update();
 
   if (processor_id() != 0)
     return;
   Real power_in = 0.0;
   Real power_out = 0.0;
   Real viscosity_in = 0.0;
   Real mass_flow_in = 0.0;
   Real mass_flow_out = 0.0;
   for (unsigned int i_ch = 0; i_ch < _n_channels; i_ch++)
   {
     auto * node_in = _subchannel_mesh.getChannelNode(i_ch, 0);
     auto * node_out = _subchannel_mesh.getChannelNode(i_ch, _n_cells);
     const Real mdot_in = (*_mdot_soln)(node_in);
     power_in += mdot_in * (*_h_soln)(node_in);
     power_out += (*_mdot_soln)(node_out) * (*_h_soln)(node_out);
     viscosity_in += mdot_in * (*_mu_soln)(node_in);
     mass_flow_in += mdot_in;
     mass_flow_out += (*_mdot_soln)(node_out);
   }
   auto h_bulk_out = power_out / mass_flow_out;
   auto T_bulk_out = _fp->T_from_p_h(_P_out, h_bulk_out);
 
   Real bulk_Dh = _subchannel_mesh.getAssemblyHydraulicDiameter();
   Real inlet_mu = viscosity_in / mass_flow_in;
   Real bulk_Re = mass_flow_in * bulk_Dh / (inlet_mu * _subchannel_mesh.getAssemblyFlowArea());
   if (_verbose_subchannel)
   {
     _console << " ======================================= " << std::endl;
     _console << " ======== Subchannel Print Outs ======== " << std::endl;
     _console << " ======================================= " << std::endl;
     _console << "Total flow area :" << _subchannel_mesh.getAssemblyFlowArea() << " m^2"
              << std::endl;
     _console << "Assembly hydraulic diameter :" << bulk_Dh << " m" << std::endl;
     _console << "Assembly Re number :" << bulk_Re << " [-]" << std::endl;
     _console << "Bulk coolant temperature at outlet :" << T_bulk_out << " K" << std::endl;
     _console << "Power added to coolant is : " << power_out - power_in << " Watt" << std::endl;
     _console << "Mass flow rate in is : " << mass_flow_in << " kg/sec" << std::endl;
     _console << "Mass balance is : " << mass_flow_out - mass_flow_in << " kg/sec" << std::endl;
     _console << "User defined outlet pressure is : " << _P_out << " Pa" << std::endl;
     _console << " ======================================= " << std::endl;
   }
 
   if (MooseUtils::absoluteFuzzyLessEqual((power_out - power_in), -1.0))
     mooseWarning(
         "Energy conservation equation might not be solved correctly, Power added to coolant:  " +
         std::to_string(power_out - power_in) + " Watt ");
 }

◆ getAddedHeatDuct()

Real SubChannel1PhaseProblem::getAddedHeatDuct	(	unsigned int	i_ch,
		unsigned int	iz
	)		const

inlineinherited

Return the added heat coming from the duct.

Definition at line 86 of file SubChannel1PhaseProblem.h.

   {
     return computeAddedHeatDuct(i_ch, iz);
   }

◆ getAddedHeatPin()

Real SubChannel1PhaseProblem::getAddedHeatPin	(	unsigned int	i_ch,
		unsigned int	iz
	)		const

inlineinherited

Return the added heat coming from the fuel pins.

Definition at line 80 of file SubChannel1PhaseProblem.h.

   {
     return computeAddedHeatPin(i_ch, iz);
   }

◆ getDuctHTCClosure()

const SCMHTCClosureBase* SubChannel1PhaseProblem::getDuctHTCClosure ( ) const

inlineinherited

Definition at line 44 of file SubChannel1PhaseProblem.h.

Referenced by SCMHTCBorishanskii::SCMHTCBorishanskii(), SCMHTCGraberRieger::SCMHTCGraberRieger(), SCMHTCKazimiCarelli::SCMHTCKazimiCarelli(), and SCMHTCSchadModified::SCMHTCSchadModified().

44 { return _duct_HTC_closure; }

SubChannel1PhaseProblem::_duct_HTC_closure

const SCMHTCClosureBase * _duct_HTC_closure

Definition: SubChannel1PhaseProblem.h:266

◆ getFrictionClosure()

const SCMFrictionClosureBase* SubChannel1PhaseProblem::getFrictionClosure ( ) const

inlineinherited

Definition at line 46 of file SubChannel1PhaseProblem.h.

Referenced by SCMMixingKimAndChung::computeLatticeMixingParameter(), and SCMHTCGnielinski::computeNusseltNumber().

46 { return _friction_closure; }

SubChannel1PhaseProblem::_friction_closure

const SCMFrictionClosureBase * _friction_closure

Friction closure object.

Definition: SubChannel1PhaseProblem.h:261

◆ getOutletPressure()

const PostprocessorValue& SubChannel1PhaseProblem::getOutletPressure ( ) const

inlineinherited

Get outlet pressure.

Definition at line 95 of file SubChannel1PhaseProblem.h.

Referenced by SCMMixingKimAndChung::computeLatticeMixingParameter().

95 { return _P_out; }

SubChannel1PhaseProblem::_P_out

const PostprocessorValue & _P_out

Outlet pressure postprocessor value.

Definition: SubChannel1PhaseProblem.h:92

◆ getPinHTCClosure()

const SCMHTCClosureBase* SubChannel1PhaseProblem::getPinHTCClosure ( ) const

inlineinherited

Definition at line 45 of file SubChannel1PhaseProblem.h.

45 { return _pin_HTC_closure; } // optional

SubChannel1PhaseProblem::_pin_HTC_closure

const SCMHTCClosureBase * _pin_HTC_closure

HTC closure objects.

Definition: SubChannel1PhaseProblem.h:265

◆ getSinglePhaseFluidProperties()

const SinglePhaseFluidProperties* SubChannel1PhaseProblem::getSinglePhaseFluidProperties ( ) const

inlineinherited

Get fluid properties object.

Definition at line 101 of file SubChannel1PhaseProblem.h.

Referenced by SCMMixingKimAndChung::computeLatticeMixingParameter().

101 { return _fp; }

SubChannel1PhaseProblem::_fp

const SinglePhaseFluidProperties * _fp

Non-owning pointer to fluid properties user object.

Definition: SubChannel1PhaseProblem.h:98

◆ getSubChannelPeripheralDuctWidth()

Real TriSubChannel1PhaseProblem::getSubChannelPeripheralDuctWidth ( unsigned int i_ch ) const

overrideprotectedvirtual

Function that computes the width of the duct cell that the peripheral subchannel i_ch sees.

Implements SubChannel1PhaseProblem.

Definition at line 309 of file TriSubChannel1PhaseProblem.C.

 {
   auto subch_type = _subchannel_mesh.getSubchannelType(i_ch);
   if (subch_type == EChannelType::EDGE || subch_type == EChannelType::CORNER)
   {
     auto width = _subchannel_mesh.getPitch();
     if (subch_type == EChannelType::CORNER)
       width = 2.0 / std::sqrt(3.0) *
               (_subchannel_mesh.getPinDiameter() / 2.0 + _tri_sch_mesh.getDuctToPinGap());
     return width;
   }
   else
     mooseError("Channel is not a perimetric subchannel ");
 }

◆ implicitPetscSolve()

PetscErrorCode SubChannel1PhaseProblem::implicitPetscSolve ( int iblock )

protectedinherited

Computes implicit solve using PetSc.

Definition at line 2096 of file SubChannel1PhaseProblem.C.

Referenced by SubChannel1PhaseProblem::externalSolve().

 {
   PetscFunctionBegin;
   // ---------- helper functions -----------------------------
   auto V = [&](const std::string & s)
   {
     if (_verbose_subchannel)
       _console << s << std::endl;
   };
 
   auto DupMatAssembled = [&](Mat src, Mat * dst)
   {
     if (src)
     {
       LibmeshPetscCall(MatDuplicate(src, MAT_COPY_VALUES, dst));
       LibmeshPetscCall(MatAssemblyBegin(*dst, MAT_FINAL_ASSEMBLY));
       LibmeshPetscCall(MatAssemblyEnd(*dst, MAT_FINAL_ASSEMBLY));
     }
     else
       *dst = NULL;
   };
 
   auto DupVecCopy = [&](Vec src, Vec * dst)
   {
     LibmeshPetscCall(VecDuplicate(src, dst));
     LibmeshPetscCall(VecCopy(src, *dst));
   };
 
   const PetscInt Q = 3; // [mass conservation, axial momentum, cross momentum]
 
   // small indexer
   auto Idx = [&](PetscInt r, PetscInt c) { return Q * r + c; };
 
   // arrays that MUST be declared before lambdas use them
   std::vector<Mat> mat_array(Q * Q, NULL);
   std::vector<Vec> vec_array(Q, NULL);
 
   // generic assembler for one governing equation row in the nested matrix
   auto AssembleEquation = [&](PetscInt f,
                               Mat A0,
                               Mat A1,
                               Mat A2,             // three blocks in row f (can be nullptr)
                               Vec rhs,            // base RHS for equation f
                               Vec rhs_add,        // optional extra RHS to add (can be nullptr)
                               const char * label) // e.g. "Mass", "Lin mom", "Cross mom"
   {
     DupMatAssembled(A0, &mat_array[Idx(f, 0)]);
     DupMatAssembled(A1, &mat_array[Idx(f, 1)]);
     DupMatAssembled(A2, &mat_array[Idx(f, 2)]);
     DupVecCopy(rhs, &vec_array[f]);
     if (rhs_add)
       LibmeshPetscCall(VecAXPY(vec_array[f], 1.0, rhs_add));
     V(std::string(label) + " system assembled");
   };
 
   // -----------------------------------------------------------------------------
   // Helper lambda that applies per-equation under-relaxation by modifying BOTH the
   // matrix block and the RHS for that equation.
   //
   // Specifically, with A_ff for the equation and D = diag(A_ff):
   //   1) Matrix diagonal scaling: D <- D / alpha, then A_ff's diagonal is replaced
   //      with D. For alpha < 1 this increases diagonal dominance (more damping).
   //   2) RHS blending with the previous solution x_old:
   //        rhs_f <- rhs_f + (1 - alpha) * (D / alpha) * x_old
   //      where x_old is provided by the caller via `populate(work)`.
   //
   // Net effect: the solved x satisfies
   //        A_ff x = rhs_f_original + ((1 - alpha)/alpha) * D * (x_old - x),
   // which damps updates toward x_old without changing the converged solution.
   // -----------------------------------------------------------------------------
   auto RelaxEquation =
       [&](Mat A_ff, Vec rhs_f, Vec like_vec, Vec work, PetscScalar alpha, auto && populate)
   {
     Vec d = nullptr;
     LibmeshPetscCall(VecDuplicate(like_vec, &d));
 
     // 1) A_ff: diag <- diag / alpha
     LibmeshPetscCall(MatGetDiagonal(A_ff, d));
     LibmeshPetscCall(VecScale(d, 1.0 / alpha));
     LibmeshPetscCall(MatDiagonalSet(A_ff, d, INSERT_VALUES));
 
     // 2) work <- x_old (caller-provided populator)
     LibmeshPetscCall(populate(work));
 
     // 3) rhs_f += (1 - alpha) * (diag .* work)
     LibmeshPetscCall(VecScale(d, (1.0 - alpha)));
     LibmeshPetscCall(VecPointwiseMult(work, work, d));
     LibmeshPetscCall(VecAXPY(rhs_f, 1.0, work));
 
     LibmeshPetscCall(VecDestroy(&d));
   };
 
   // indices
   const unsigned int first_node = iblock * _block_size + 1;
   const unsigned int last_node = (iblock + 1) * _block_size;
 
   // ---------- assemble per-block operators -----------------
   computeSumWij(iblock);
   computeMdot(iblock);
   computeWijPrime(iblock);
   computeDP(iblock);
   computeP(iblock);
   computeWijResidual(iblock);
 
   V("Starting nested system.");
 
   // Populate nested matrix with the individual physics
   // equation 0: Mass conservation
   AssembleEquation(/*f=*/0,
                    /*A0=*/_mc_axial_convection_mat,
                    /*A1=*/nullptr,
                    /*A2=*/_mc_sumWij_mat,
                    /*rhs=*/_mc_axial_convection_rhs,
                    /*rhs_add=*/nullptr,
                    /*label=*/"Mass");
 
   // equation 1: Axial momentum conservation
   AssembleEquation(/*f=*/1,
                    /*A0=*/_amc_sys_mdot_mat,
                    /*A1=*/_amc_pressure_force_mat,
                    /*A2=*/nullptr,
                    /*rhs=*/_amc_pressure_force_rhs,
                    /*rhs_add=*/_amc_sys_mdot_rhs,
                    /*label=*/"Lin mom");
 
   // equation 2: Cross momentum conservation
   AssembleEquation(/*f=*/2,
                    /*A0=*/nullptr,
                    /*A1=*/_cmc_pressure_force_mat,
                    /*A2=*/_cmc_sys_Wij_mat,
                    /*rhs=*/_cmc_sys_Wij_rhs,
                    /*rhs_add=*/_cmc_pressure_force_rhs,
                    /*label=*/"Cross mom");
 
   // ========================== Relaxation  ====================
   if (true)
   {
     LibmeshPetscCall(populateVectorFromHandle<SolutionHandle>(
         _prod, *_mdot_soln, first_node, last_node, _n_channels));
 
     Vec mdot_estimate;
     LibmeshPetscCall(createPetscVector(mdot_estimate, _block_size * _n_channels));
     Vec pmat_diag;
     LibmeshPetscCall(createPetscVector(pmat_diag, _block_size * _n_channels));
     Vec p_estimate;
     LibmeshPetscCall(createPetscVector(p_estimate, _block_size * _n_channels));
     Vec unity_vec;
     LibmeshPetscCall(createPetscVector(unity_vec, _block_size * _n_channels));
     LibmeshPetscCall(VecSet(unity_vec, 1.0));
     Vec sol_holder_P;
     LibmeshPetscCall(createPetscVector(sol_holder_P, _block_size * _n_gaps));
     Vec unity_vec_Wij;
     LibmeshPetscCall(createPetscVector(unity_vec_Wij, _block_size * _n_gaps));
     LibmeshPetscCall(VecSet(unity_vec_Wij, 1.0));
     Vec _Wij_loc_vec;
     LibmeshPetscCall(createPetscVector(_Wij_loc_vec, _block_size * _n_gaps));
     Vec _Wij_old_loc_vec;
     LibmeshPetscCall(createPetscVector(_Wij_old_loc_vec, _block_size * _n_gaps));
 
     // ---- scale estimates ----
     // mdot_estimate = A(1,0) * mdot
     LibmeshPetscCall(MatMult(mat_array[Q /* (1,0) */], _prod, mdot_estimate));
 
     // p_estimate = mdot_est / (diag(A(1,1)) + eps)
     LibmeshPetscCall(MatGetDiagonal(mat_array[Q + 1], pmat_diag));
     LibmeshPetscCall(VecAXPY(pmat_diag, 1e-10, unity_vec));
     LibmeshPetscCall(VecPointwiseDivide(p_estimate, mdot_estimate, pmat_diag));
 
     // sol_holder_P = A(2,1) * p_estimate - rhs_cmc_pressure
     LibmeshPetscCall(MatMult(mat_array[2 * Q + 1], p_estimate, sol_holder_P));
     LibmeshPetscCall(VecAXPY(sol_holder_P, -1.0, _cmc_pressure_force_rhs));
 
     // sumWij_loc from sol_holder_P (accumulate)
     Vec sumWij_loc;
     LibmeshPetscCall(createPetscVector(sumWij_loc, _block_size * _n_channels));
     for (unsigned int iz = first_node; iz <= last_node; ++iz)
     {
       const auto iz_ind = iz - first_node;
       for (unsigned int i_ch = 0; i_ch < _n_channels; ++i_ch)
       {
         PetscScalar sumWij = 0.0;
         unsigned int counter = 0;
         for (auto i_gap : _subchannel_mesh.getChannelGaps(i_ch))
         {
           auto chans = _subchannel_mesh.getGapChannels(i_gap);
           unsigned int i_ch_loc = chans.first;
           PetscInt row_vec = i_ch_loc + _n_channels * iz_ind;
           PetscScalar loc_Wij_value;
           LibmeshPetscCall(VecGetValues(sol_holder_P, 1, &row_vec, &loc_Wij_value));
           sumWij += _subchannel_mesh.getCrossflowSign(i_ch, counter) * loc_Wij_value;
           counter++;
         }
         PetscInt row_vec = i_ch + _n_channels * iz_ind;
         LibmeshPetscCall(VecSetValues(sumWij_loc, 1, &row_vec, &sumWij, INSERT_VALUES));
       }
     }
     LibmeshPetscCall(VecAssemblyBegin(sumWij_loc));
     LibmeshPetscCall(VecAssemblyEnd(sumWij_loc));
 
     // ---- robust scale measurements ----
     PetscScalar min_mdot;
     LibmeshPetscCall(VecAbs(_prod));
     LibmeshPetscCall(VecMin(_prod, NULL, &min_mdot));
     V("Minimum estimated mdot: " + std::to_string(min_mdot));
 
     LibmeshPetscCall(VecAbs(sumWij_loc));
     LibmeshPetscCall(VecMax(sumWij_loc, NULL, &_max_sumWij));
     _max_sumWij = std::max(1e-10, _max_sumWij);
     V("Maximum estimated Wij: " + std::to_string(_max_sumWij));
 
     LibmeshPetscCall(populateVectorFromDense<libMesh::DenseMatrix<Real>>(
         _Wij_loc_vec, _Wij, first_node, last_node, _n_gaps));
     LibmeshPetscCall(VecAbs(_Wij_loc_vec));
     LibmeshPetscCall(populateVectorFromDense<libMesh::DenseMatrix<Real>>(
         _Wij_old_loc_vec, _Wij_old, first_node, last_node, _n_gaps));
     LibmeshPetscCall(VecAbs(_Wij_old_loc_vec));
     LibmeshPetscCall(VecAXPY(_Wij_loc_vec, -1.0, _Wij_old_loc_vec));
 
     PetscScalar relax_factor;
     LibmeshPetscCall(VecAbs(_Wij_loc_vec));
 #if !PETSC_VERSION_LESS_THAN(3, 16, 0)
     LibmeshPetscCall(VecMean(_Wij_loc_vec, &relax_factor));
 #else
     VecSum(_Wij_loc_vec, &relax_factor);
     relax_factor /= _block_size * _n_gaps;
 #endif
     relax_factor = relax_factor / _max_sumWij + 0.5;
     V("Relax base value: " + std::to_string(relax_factor));
 
     // ---- crossflow resistance inflation ----
     const PetscScalar resistance_relaxation = 0.9;
     _added_K = _max_sumWij / min_mdot;
     V("New cross resistance: " + std::to_string(_added_K));
     _added_K = (_added_K * resistance_relaxation + (1.0 - resistance_relaxation) * _added_K_old) *
                relax_factor;
     V("Relaxed cross resistance: " + std::to_string(_added_K));
 
     // Snap-up lower-bounding
     if (_added_K < 10 && _added_K >= 1.0)
       _added_K = 1.0;
     if (_added_K < 1.0 && _added_K >= 0.1)
       _added_K = 0.5;
     if (_added_K < 0.1 && _added_K >= 0.01)
       _added_K = 1. / 3.;
     if (_added_K < 1e-2 && _added_K >= 1e-3)
       _added_K = 0.1;
     V("Actual added cross resistance: " + std::to_string(_added_K));
     LibmeshPetscCall(VecScale(unity_vec_Wij, _added_K));
     _added_K_old = _added_K;
 
     LibmeshPetscCall(MatDiagonalSet(mat_array[2 * Q + 2], unity_vec_Wij, ADD_VALUES));
 
     // ---- cleanup temp vectors used above ----
     LibmeshPetscCall(VecDestroy(&mdot_estimate));
     LibmeshPetscCall(VecDestroy(&pmat_diag));
     LibmeshPetscCall(VecDestroy(&unity_vec));
     LibmeshPetscCall(VecDestroy(&p_estimate));
     LibmeshPetscCall(VecDestroy(&sol_holder_P));
     LibmeshPetscCall(VecDestroy(&unity_vec_Wij));
     LibmeshPetscCall(VecDestroy(&sumWij_loc));
     LibmeshPetscCall(VecDestroy(&_Wij_loc_vec));
     LibmeshPetscCall(VecDestroy(&_Wij_old_loc_vec));
 
     // ---- per-equation under-relaxation ----
     const PetscScalar relaxation_factor_mdot = 1.0;
     const PetscScalar relaxation_factor_P = 1.0;
     const PetscScalar relaxation_factor_Wij = 0.1;
 
     V("Relax mdot: " + std::to_string(relaxation_factor_mdot));
     V("Relax P: " + std::to_string(relaxation_factor_P));
     V("Relax Wij: " + std::to_string(relaxation_factor_Wij));
 
     // mdot
     RelaxEquation(mat_array[Idx(0, 0)],
                   vec_array[0],
                   vec_array[0],
                   _prod,
                   relaxation_factor_mdot,
                   [&](Vec dst)
                   {
                     return populateVectorFromHandle<SolutionHandle>(
                         dst, *_mdot_soln, first_node, last_node, _n_channels);
                   });
     V("mdot relaxed");
 
     // pressure
     RelaxEquation(mat_array[Idx(1, 1)],
                   vec_array[1],
                   vec_array[1],
                   _prod,
                   relaxation_factor_P,
                   [&](Vec dst)
                   {
                     return populateVectorFromHandle<SolutionHandle>(
                         dst, *_P_soln, first_node, last_node, _n_channels);
                   });
     V("P relaxed");
 
     // crossflow
     RelaxEquation(mat_array[Idx(2, 2)],
                   vec_array[2],
                   vec_array[2],
                   _Wij_vec,
                   relaxation_factor_Wij,
                   [&](Vec dst)
                   {
                     return populateVectorFromDense<libMesh::DenseMatrix<Real>>(
                         dst, _Wij, first_node, last_node, _n_gaps);
                   });
     V("Wij relaxed");
   }
   V("Linear solver relaxed");
 
   // ======================== Create and configure KSP =========================
   Mat A_nest;
   Vec b_nest;
   Vec x_nest;
   LibmeshPetscCall(MatCreateNest(PETSC_COMM_SELF, Q, NULL, Q, NULL, mat_array.data(), &A_nest));
   LibmeshPetscCall(VecCreateNest(PETSC_COMM_SELF, Q, NULL, vec_array.data(), &b_nest));
   V("Nested system created");
 
   KSP ksp;
   PC pc;
   LibmeshPetscCall(KSPCreate(PETSC_COMM_SELF, &ksp));
   LibmeshPetscCall(KSPSetType(ksp, KSPFGMRES));
   LibmeshPetscCall(KSPSetOperators(ksp, A_nest, A_nest));
   LibmeshPetscCall(KSPGetPC(ksp, &pc));
   LibmeshPetscCall(PCSetType(pc, PCFIELDSPLIT));
   LibmeshPetscCall(KSPSetTolerances(ksp, _rtol, _atol, _dtol, _maxit));
 
   // split equations
   std::vector<IS> rows(Q);
   LibmeshPetscCall(MatNestGetISs(A_nest, rows.data(), NULL));
   for (PetscInt j = 0; j < Q; ++j)
   {
     IS part;
     LibmeshPetscCall(ISDuplicate(rows[j], &part));
     LibmeshPetscCall(PCFieldSplitSetIS(pc, NULL, part));
     LibmeshPetscCall(ISDestroy(&part));
   }
   V("Linear solver assembled");
 
   // ============================== Solve =====================================
   LibmeshPetscCall(VecDuplicate(b_nest, &x_nest));
   LibmeshPetscCall(VecSet(x_nest, 0.0));
   LibmeshPetscCall(KSPSolve(ksp, b_nest, x_nest));
 
   // destroy solver containers first
   LibmeshPetscCall(VecDestroy(&b_nest));
   LibmeshPetscCall(MatDestroy(&A_nest));
   LibmeshPetscCall(KSPDestroy(&ksp));
   for (PetscInt i = 0; i < Q * Q; i++)
     LibmeshPetscCall(MatDestroy(&mat_array[i]));
   for (PetscInt i = 0; i < Q; i++)
     LibmeshPetscCall(VecDestroy(&vec_array[i]));
   V("Solver elements destroyed");
 
   // ====================== Extract & scatter the solution =====================
   Vec sol_mdot, sol_p, sol_Wij;
   V("Vectors to hold solution created");
   PetscInt num_vecs;
   Vec * loc_vecs;
   LibmeshPetscCall(VecNestGetSubVecs(x_nest, &num_vecs, &loc_vecs));
   LibmeshPetscCall(VecDuplicate(_mc_axial_convection_rhs, &sol_mdot));
   LibmeshPetscCall(VecCopy(loc_vecs[0], sol_mdot));
   LibmeshPetscCall(VecDuplicate(_amc_sys_mdot_rhs, &sol_p));
   LibmeshPetscCall(VecCopy(loc_vecs[1], sol_p));
   LibmeshPetscCall(VecDuplicate(_cmc_sys_Wij_rhs, &sol_Wij));
   LibmeshPetscCall(VecCopy(loc_vecs[2], sol_Wij));
   V("Solution from coupled solver copied to solution vectors");
 
   // mass flow
   LibmeshPetscCall(populateSolutionChan<SolutionHandle>(
       sol_mdot, *_mdot_soln, first_node, last_node, _n_channels));
 
   // pressure
   {
     PetscScalar * sol_p_array;
     LibmeshPetscCall(VecGetArray(sol_p, &sol_p_array));
     for (unsigned int iz = last_node; iz > first_node - 1; iz--)
     {
       const auto iz_ind = iz - first_node;
       for (unsigned int i_ch = 0; i_ch < _n_channels; i_ch++)
       {
         auto * node_in = _subchannel_mesh.getChannelNode(i_ch, iz - 1);
         PetscScalar value = sol_p_array[iz_ind * _n_channels + i_ch];
         _P_soln->set(node_in, value);
       }
     }
     LibmeshPetscCall(VecRestoreArray(sol_p, &sol_p_array));
   }
 
   // crossflow dense + sumWij + correction factor
   LibmeshPetscCall(populateDenseFromVector<libMesh::DenseMatrix<Real>>(
       sol_Wij, _Wij, first_node, last_node, _n_gaps));
 
   LibmeshPetscCall(MatMult(_mc_sumWij_mat, sol_Wij, _prod));
   LibmeshPetscCall(populateSolutionChan<SolutionHandle>(
       _prod, *_SumWij_soln, first_node, last_node, _n_channels));
 
   LibmeshPetscCall(VecAbs(_prod));
   LibmeshPetscCall(VecMax(_prod, NULL, &_max_sumWij_new));
   V("Maximum estimated Wij new: " + std::to_string(_max_sumWij_new));
   _correction_factor = _max_sumWij_new / _max_sumWij;
   V("Correction factor: " + std::to_string(_correction_factor));
   V("Solutions assigned to MOOSE variables.");
 
   // cleanup solution objects
   LibmeshPetscCall(VecDestroy(&x_nest));
   LibmeshPetscCall(VecDestroy(&sol_mdot));
   LibmeshPetscCall(VecDestroy(&sol_p));
   LibmeshPetscCall(VecDestroy(&sol_Wij));
   V("Solutions destroyed.");
 
   PetscFunctionReturn(LIBMESH_PETSC_SUCCESS);
 }

◆ initializeSolution()

void TriSubChannel1PhaseProblem::initializeSolution ( )

overrideprotectedvirtual

Function to initialize the solution & geometry fields.

Implements SubChannel1PhaseProblem.

Definition at line 69 of file TriSubChannel1PhaseProblem.C.

 {
   detectDeformation();
 
   if (_deformation)
   {
     // update surface area, wetted perimeter based on: Dpin, displacement
     Real standard_area, wire_area, additional_area, wetted_perimeter, displaced_area;
     auto flat_to_flat = _tri_sch_mesh.getFlatToFlat();
     auto n_rings = _tri_sch_mesh.getNumOfRings();
     auto pitch = _subchannel_mesh.getPitch();
     auto pin_diameter = _subchannel_mesh.getPinDiameter();
     auto wire_diameter = _tri_sch_mesh.getWireDiameter();
     auto wire_lead_length = _tri_sch_mesh.getWireLeadLength();
     auto gap = _tri_sch_mesh.getDuctToPinGap();
     auto z_blockage = _subchannel_mesh.getZBlockage();
     auto index_blockage = _subchannel_mesh.getIndexBlockage();
     auto reduction_blockage = _subchannel_mesh.getReductionBlockage();
     auto theta =
         std::acos(wire_lead_length /
                   std::sqrt(Utility::pow<2>(wire_lead_length) +
                             Utility::pow<2>(libMesh::pi * (pin_diameter + wire_diameter))));
     for (unsigned int iz = 0; iz < _n_cells + 1; iz++)
     {
       for (unsigned int i_ch = 0; i_ch < _n_channels; i_ch++)
       {
         auto subch_type = _subchannel_mesh.getSubchannelType(i_ch);
         auto * node = _subchannel_mesh.getChannelNode(i_ch, iz);
         auto Z = _z_grid[iz];
         Real rod_area = 0.0;
         Real rod_perimeter = 0.0;
         for (auto i_pin : _subchannel_mesh.getChannelPins(i_ch))
         {
           auto * pin_node = _subchannel_mesh.getPinNode(i_pin, iz);
           if (subch_type == EChannelType::CENTER || subch_type == EChannelType::CORNER)
           {
             rod_area +=
                 (1.0 / 6.0) * 0.25 * M_PI * (*_Dpin_soln)(pin_node) * (*_Dpin_soln)(pin_node);
             rod_perimeter += (1.0 / 6.0) * M_PI * (*_Dpin_soln)(pin_node);
           }
           else
           {
             rod_area +=
                 (1.0 / 4.0) * 0.25 * M_PI * (*_Dpin_soln)(pin_node) * (*_Dpin_soln)(pin_node);
             rod_perimeter += (1.0 / 4.0) * M_PI * (*_Dpin_soln)(pin_node);
           }
         }
 
         if (subch_type == EChannelType::CENTER)
         {
           standard_area = Utility::pow<2>(pitch) * std::sqrt(3.0) / 4.0;
           additional_area = 0.0;
           displaced_area = 0.0;
           wire_area = libMesh::pi * Utility::pow<2>(wire_diameter) / 8.0 / std::cos(theta);
           wetted_perimeter = rod_perimeter + 0.5 * libMesh::pi * wire_diameter / std::cos(theta);
         }
         else if (subch_type == EChannelType::EDGE)
         {
           standard_area = pitch * (pin_diameter / 2.0 + gap);
           additional_area = 0.0;
           displaced_area = (*_displacement_soln)(node)*pitch;
           wire_area = libMesh::pi * Utility::pow<2>(wire_diameter) / 8.0 / std::cos(theta);
           wetted_perimeter =
               rod_perimeter + 0.5 * libMesh::pi * wire_diameter / std::cos(theta) + pitch;
         }
         else
         {
           standard_area = 1.0 / std::sqrt(3.0) * Utility::pow<2>(pin_diameter / 2.0 + gap);
           additional_area = 0.0;
           displaced_area = 1.0 / std::sqrt(3.0) *
                            (pin_diameter + 2.0 * gap + (*_displacement_soln)(node)) *
                            (*_displacement_soln)(node);
           wire_area = libMesh::pi / 24.0 * Utility::pow<2>(wire_diameter) / std::cos(theta);
           wetted_perimeter =
               rod_perimeter + libMesh::pi * wire_diameter / std::cos(theta) / 6.0 +
               2.0 / std::sqrt(3.0) * (pin_diameter / 2.0 + gap + (*_displacement_soln)(node));
         }
 
         // Calculate subchannel area
         auto subchannel_area =
             standard_area + additional_area + displaced_area - rod_area - wire_area;
 
         // Correct subchannel area and wetted perimeter in case of overlapping pins
         auto overlapping_pin_area = 0.0;
         auto overlapping_wetted_perimeter = 0.0;
         for (auto i_gap : _subchannel_mesh.getChannelGaps(i_ch))
         {
           auto gap_pins = _subchannel_mesh.getGapPins(i_gap);
           auto pin_1 = gap_pins.first;
           auto pin_2 = gap_pins.second;
           auto * pin_node_1 = _subchannel_mesh.getPinNode(pin_1, iz);
           auto * pin_node_2 = _subchannel_mesh.getPinNode(pin_2, iz);
           auto Diameter1 = (*_Dpin_soln)(pin_node_1);
           auto Radius1 = Diameter1 / 2.0;
           auto Diameter2 = (*_Dpin_soln)(pin_node_2);
           auto Radius2 = Diameter2 / 2.0;
           auto pitch = _subchannel_mesh.getPitch();
 
           if (pitch < (Radius1 + Radius2)) // overlapping pins
           {
             mooseWarning(" The gap of index : '", i_gap, " at axial cell ", iz, " ' is blocked.");
             auto cos1 =
                 (pitch * pitch + Radius1 * Radius1 - Radius2 * Radius2) / (2 * pitch * Radius1);
             auto cos2 =
                 (pitch * pitch + Radius2 * Radius2 - Radius1 * Radius1) / (2 * pitch * Radius2);
             auto angle1 = 2.0 * acos(cos1);
             auto angle2 = 2.0 * acos(cos2);
             // half of the intersecting arc-length
             overlapping_wetted_perimeter += 0.5 * angle1 * Radius1 + 0.5 * angle2 * Radius2;
             // Half of the overlapping area
             overlapping_pin_area +=
                 0.5 * Radius1 * Radius1 * acos(cos1) + 0.5 * Radius2 * Radius2 * acos(cos2) -
                 0.25 * sqrt((-pitch + Radius1 + Radius2) * (pitch + Radius1 - Radius2) *
                             (pitch - Radius1 + Radius2) * (pitch + Radius1 + Radius2));
           }
         }
         subchannel_area += overlapping_pin_area;           // correct surface area
         wetted_perimeter += -overlapping_wetted_perimeter; // correct wetted perimeter
 
         // Apply area reduction on subchannels affected by blockage
         auto index = 0;
         for (const auto & i_blockage : index_blockage)
         {
           if (i_ch == i_blockage && (Z >= z_blockage.front() && Z <= z_blockage.back()))
           {
             subchannel_area *= reduction_blockage[index];
           }
           index++;
         }
         _S_flow_soln->set(node, subchannel_area);
         _w_perim_soln->set(node, wetted_perimeter);
       }
     }
     // update map of gap between pins (gij) based on: Dpin, displacement
     for (unsigned int iz = 0; iz < _n_cells + 1; iz++)
     {
       for (unsigned int i_gap = 0; i_gap < _n_gaps; i_gap++)
       {
         auto gap_pins = _subchannel_mesh.getGapPins(i_gap);
         auto pin_1 = gap_pins.first;
         auto pin_2 = gap_pins.second;
         auto * pin_node_1 = _subchannel_mesh.getPinNode(pin_1, iz);
         auto * pin_node_2 = _subchannel_mesh.getPinNode(pin_2, iz);
 
         if (pin_1 == pin_2) // Corner or edge gap
         {
           auto displacement = 0.0;
           auto counter = 0.0;
           for (auto i_ch : _subchannel_mesh.getPinChannels(pin_1))
           {
             auto subch_type = _subchannel_mesh.getSubchannelType(i_ch);
             auto * node = _subchannel_mesh.getChannelNode(i_ch, iz);
             if (subch_type == EChannelType::EDGE || subch_type == EChannelType::CORNER)
             {
               displacement += (*_displacement_soln)(node);
               counter += 1.0;
             }
           }
           displacement = displacement / counter;
           _tri_sch_mesh.setGapWidth(iz,
                                     i_gap,
                                     0.5 * (flat_to_flat - (n_rings - 1) * pitch * std::sqrt(3.0) -
                                            (*_Dpin_soln)(pin_node_1)) +
                                         displacement);
         }
         else // center gap
         {
           _tri_sch_mesh.setGapWidth(
               iz, i_gap, pitch - (*_Dpin_soln)(pin_node_1) / 2.0 - (*_Dpin_soln)(pin_node_2) / 2.0);
         }
         // if pins come in contact, the gap is zero
         if (_tri_sch_mesh.getGapWidth(iz, i_gap) <= 0.0)
           _tri_sch_mesh.setGapWidth(iz, i_gap, 0.0);
       }
     }
   }
 
   for (unsigned int iz = 1; iz < _n_cells + 1; iz++)
   {
     for (unsigned int i_ch = 0; i_ch < _n_channels; i_ch++)
     {
       auto * node_out = _subchannel_mesh.getChannelNode(i_ch, iz);
       auto * node_in = _subchannel_mesh.getChannelNode(i_ch, iz - 1);
       _mdot_soln->set(node_out, (*_mdot_soln)(node_in));
     }
   }
 
   // We must do a global assembly to make sure data is parallel consistent before we do things
   // like compute L2 norms
   _aux->solution().close();
 }

◆ initialSetup()

void SubChannel1PhaseProblem::initialSetup ( )

overridevirtualinherited

Set value for turbulent momentum modeling parameter CT

Reimplemented from ExternalProblem.

Definition at line 285 of file SubChannel1PhaseProblem.C.

 {
   ExternalProblem::initialSetup();
 
   _fp = &getUserObject<SinglePhaseFluidProperties>(getParam<UserObjectName>("fp"));
   _friction_closure =
       &getUserObject<SCMFrictionClosureBase>(getParam<UserObjectName>("friction_closure"));
   _mixing_closure =
       &getUserObject<SCMMixingClosureBase>(getParam<UserObjectName>("mixing_closure"));
 
   _CT = _mixing_closure->getCT();
 
   // Create variables for output and storage
   _mdot_soln = std::make_unique<SolutionHandle>(getVariable(0, SubChannelApp::MASS_FLOW_RATE));
   _SumWij_soln = std::make_unique<SolutionHandle>(getVariable(0, SubChannelApp::SUM_CROSSFLOW));
   _P_soln = std::make_unique<SolutionHandle>(getVariable(0, SubChannelApp::PRESSURE));
   if (getParam<bool>("full_output"))
   {
     _DP_soln = std::make_unique<SolutionHandle>(getVariable(0, SubChannelApp::PRESSURE_DROP));
     _ff_soln = std::make_unique<SolutionHandle>(getVariable(0, SubChannelApp::FRICTION_FACTOR));
   }
   _h_soln = std::make_unique<SolutionHandle>(getVariable(0, SubChannelApp::ENTHALPY));
   _T_soln = std::make_unique<SolutionHandle>(getVariable(0, SubChannelApp::TEMPERATURE));
   if (_pin_mesh_exist)
   {
     _Tpin_soln = std::make_unique<SolutionHandle>(getVariable(0, SubChannelApp::PIN_TEMPERATURE));
     _Dpin_soln = std::make_unique<SolutionHandle>(getVariable(0, SubChannelApp::PIN_DIAMETER));
     _HTC_soln =
         std::make_unique<SolutionHandle>(getVariable(0, SubChannelApp::HEAT_TRANSFER_COEFFICIENT));
     _pin_HTC_closure =
         &getUserObject<SCMHTCClosureBase>(getParam<UserObjectName>("pin_HTC_closure"));
   }
   _rho_soln = std::make_unique<SolutionHandle>(getVariable(0, SubChannelApp::DENSITY));
   _mu_soln = std::make_unique<SolutionHandle>(getVariable(0, SubChannelApp::VISCOSITY));
   _S_flow_soln = std::make_unique<SolutionHandle>(getVariable(0, SubChannelApp::SURFACE_AREA));
   _w_perim_soln = std::make_unique<SolutionHandle>(getVariable(0, SubChannelApp::WETTED_PERIMETER));
   _q_prime_soln = std::make_unique<SolutionHandle>(getVariable(0, SubChannelApp::LINEAR_HEAT_RATE));
   _displacement_soln =
       std::make_unique<SolutionHandle>(getVariable(0, SubChannelApp::DISPLACEMENT));
   if (_duct_mesh_exist)
   {
     _duct_heat_flux_soln =
         std::make_unique<SolutionHandle>(getVariable(0, SubChannelApp::DUCT_HEAT_FLUX));
     _Tduct_soln = std::make_unique<SolutionHandle>(getVariable(0, SubChannelApp::DUCT_TEMPERATURE));
     _duct_HTC_closure =
         &getUserObject<SCMHTCClosureBase>(getParam<UserObjectName>("duct_HTC_closure"));
   }
 }

◆ petscSnesSolver()

PetscErrorCode SubChannel1PhaseProblem::petscSnesSolver	(	int	iblock,
		const libMesh::DenseVector< Real > &	solution,
		libMesh::DenseVector< Real > &	root
	)

protectedinherited

Computes solution of nonlinear equation using snes and provided a residual in a formFunction.

Definition at line 1965 of file SubChannel1PhaseProblem.C.

Referenced by SubChannel1PhaseProblem::computeWijFromSolve().

 {
   SNES snes;
   KSP ksp;
   PC pc;
   Vec x, r;
   PetscScalar * xx;
 
   PetscFunctionBegin;
   LibmeshPetscCall(SNESCreate(PETSC_COMM_SELF, &snes));
   LibmeshPetscCall(VecCreate(PETSC_COMM_SELF, &x));
   LibmeshPetscCall(VecSetSizes(x, PETSC_DECIDE, _block_size * _n_gaps));
   LibmeshPetscCall(VecSetFromOptions(x));
   LibmeshPetscCall(VecDuplicate(x, &r));
 
 #if PETSC_VERSION_LESS_THAN(3, 13, 0)
   LibmeshPetscCall(PetscOptionsSetValue(PETSC_NULL, "-snes_mf", PETSC_NULL));
 #else
   LibmeshPetscCall(SNESSetUseMatrixFree(snes, PETSC_FALSE, PETSC_TRUE));
 #endif
   Ctx ctx;
   ctx.iblock = iblock;
   ctx.schp = this;
   LibmeshPetscCall(SNESSetFunction(snes, r, formFunction, &ctx));
   LibmeshPetscCall(SNESGetKSP(snes, &ksp));
   LibmeshPetscCall(KSPGetPC(ksp, &pc));
   LibmeshPetscCall(PCSetType(pc, PCNONE));
   LibmeshPetscCall(KSPSetTolerances(ksp, _rtol, _atol, _dtol, _maxit));
   LibmeshPetscCall(SNESSetFromOptions(snes));
   LibmeshPetscCall(VecGetArray(x, &xx));
   for (unsigned int i = 0; i < _block_size * _n_gaps; i++)
   {
     xx[i] = solution(i);
   }
   LibmeshPetscCall(VecRestoreArray(x, &xx));
 
   LibmeshPetscCall(SNESSolve(snes, NULL, x));
   LibmeshPetscCall(VecGetArray(x, &xx));
   for (unsigned int i = 0; i < _block_size * _n_gaps; i++)
     root(i) = xx[i];
 
   LibmeshPetscCall(VecRestoreArray(x, &xx));
   LibmeshPetscCall(VecDestroy(&x));
   LibmeshPetscCall(VecDestroy(&r));
   LibmeshPetscCall(SNESDestroy(&snes));
   PetscFunctionReturn(LIBMESH_PETSC_SUCCESS);
 }

◆ populateDenseFromVector()

template<class T >

PetscErrorCode SubChannel1PhaseProblem::populateDenseFromVector	(	const Vec &	x,
		T &	solution,
		const unsigned int	first_axial_level,
		const unsigned int	last_axial_level,
		const unsigned int	cross_dimension
	)

protectedinherited

Definition at line 420 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::computeWijPrime(), and SubChannel1PhaseProblem::implicitPetscSolve().

 {
   PetscScalar * xx;
 
   PetscFunctionBegin;
   LibmeshPetscCall(VecGetArray(x, &xx));
   for (unsigned int iz = first_axial_level; iz < last_axial_level + 1; iz++)
   {
     unsigned int iz_ind = iz - first_axial_level;
     for (unsigned int i_l = 0; i_l < cross_dimension; i_l++)
     {
       loc_solution(i_l, iz) = xx[iz_ind * cross_dimension + i_l];
     }
   }
   LibmeshPetscCall(VecRestoreArray(x, &xx));
 
   PetscFunctionReturn(LIBMESH_PETSC_SUCCESS);
 }

◆ populateSolutionChan()

template<class T >

PetscErrorCode SubChannel1PhaseProblem::populateSolutionChan	(	const Vec &	x,
		T &	solution,
		const unsigned int	first_axial_level,
		const unsigned int	last_axial_level,
		const unsigned int	cross_dimension
	)

protectedinherited

Definition at line 494 of file SubChannel1PhaseProblem.h.

 {
   PetscScalar * xx;
   PetscFunctionBegin;
   LibmeshPetscCall(VecGetArray(x, &xx));
   Node * loc_node;
   for (unsigned int iz = first_axial_level; iz < last_axial_level + 1; iz++)
   {
     unsigned int iz_ind = iz - first_axial_level;
     for (unsigned int i_l = 0; i_l < cross_dimension; i_l++)
     {
       loc_node = _subchannel_mesh.getChannelNode(i_l, iz);
       loc_solution.set(loc_node, xx[iz_ind * cross_dimension + i_l]);
     }
   }
   PetscFunctionReturn(LIBMESH_PETSC_SUCCESS);
 }

◆ populateVectorFromDense()

template<class T >

PetscErrorCode SubChannel1PhaseProblem::populateVectorFromDense	(	Vec &	x,
		const T &	solution,
		const unsigned int	first_axial_level,
		const unsigned int	last_axial_level,
		const unsigned int	cross_dimension
	)

protectedinherited

Definition at line 471 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::computeSumWij(), SubChannel1PhaseProblem::computeWijResidual(), and SubChannel1PhaseProblem::implicitPetscSolve().

 {
   PetscScalar * xx;
   PetscFunctionBegin;
   LibmeshPetscCall(VecGetArray(x, &xx));
   for (unsigned int iz = first_axial_level; iz < last_axial_level + 1; iz++)
   {
     unsigned int iz_ind = iz - first_axial_level;
     for (unsigned int i_l = 0; i_l < cross_dimension; i_l++)
     {
       xx[iz_ind * cross_dimension + i_l] = loc_solution(i_l, iz);
     }
   }
   LibmeshPetscCall(VecRestoreArray(x, &xx));
   PetscFunctionReturn(LIBMESH_PETSC_SUCCESS);
 }

◆ populateVectorFromHandle()

template<class T >

PetscErrorCode SubChannel1PhaseProblem::populateVectorFromHandle	(	Vec &	x,
		const T &	solution,
		const unsigned int	first_axial_level,
		const unsigned int	last_axial_level,
		const unsigned int	cross_dimension
	)

protectedinherited

Definition at line 445 of file SubChannel1PhaseProblem.h.

 {
   PetscScalar * xx;
 
   PetscFunctionBegin;
   LibmeshPetscCall(VecGetArray(x, &xx));
   for (unsigned int iz = first_axial_level; iz < last_axial_level + 1; iz++)
   {
     unsigned int iz_ind = iz - first_axial_level;
     for (unsigned int i_l = 0; i_l < cross_dimension; i_l++)
     {
       auto * loc_node = _subchannel_mesh.getChannelNode(i_l, iz);
       xx[iz_ind * cross_dimension + i_l] = loc_solution(loc_node);
     }
   }
   LibmeshPetscCall(VecRestoreArray(x, &xx));
 
   PetscFunctionReturn(LIBMESH_PETSC_SUCCESS);
 }

◆ residualFunction()

libMesh::DenseVector< Real > SubChannel1PhaseProblem::residualFunction	(	int	iblock,
		libMesh::DenseVector< Real >	solution
	)

protectedinherited

Computes Residual Vector based on the lateral momentum conservation equation for block iblock & updates flow variables based on current crossflow solution.

Definition at line 1923 of file SubChannel1PhaseProblem.C.

Referenced by formFunction().

 {
   const unsigned int last_node = (iblock + 1) * _block_size;
   const unsigned int first_node = iblock * _block_size + 1;
   libMesh::DenseVector<Real> Wij_residual_vector(_n_gaps * _block_size, 0.0);
   // Assign the solution to the cross-flow matrix
   int i = 0;
   for (unsigned int iz = first_node; iz < last_node + 1; iz++)
   {
     for (unsigned int i_gap = 0; i_gap < _n_gaps; i_gap++)
     {
       _Wij(i_gap, iz) = solution(i);
       i++;
     }
   }
 
   // Calculating sum of crossflows
   computeSumWij(iblock);
   // Solving axial flux
   computeMdot(iblock);
   // Calculation of turbulent Crossflow
   computeWijPrime(iblock);
   // Solving for Pressure Drop
   computeDP(iblock);
   // Solving for pressure
   computeP(iblock);
   // Populating lateral crossflow residual matrix
   computeWijResidual(iblock);
 
   // Turn the residual matrix into a residual vector
   for (unsigned int iz = 0; iz < _block_size; iz++)
   {
     for (unsigned int i_gap = 0; i_gap < _n_gaps; i_gap++)
     {
       int i = _n_gaps * iz + i_gap; // column wise transfer
       Wij_residual_vector(i) = _Wij_residual_matrix(i_gap, iz);
     }
   }
   return Wij_residual_vector;
 }

◆ solveAndPopulateEnthalpy()

PetscErrorCode SubChannel1PhaseProblem::solveAndPopulateEnthalpy	(	Mat	A,
		Vec	rhs,
		unsigned int	first_node,
		unsigned int	last_node,
		const char *	ksp_prefix
	)

protectedinherited

Solve a linear system (A * x = rhs) with a simple PCJACOBI KSP and populate the enthalpy solution into _h_soln for nodes [first_node, last_node].

Uses member tolerances (_rtol, _atol, _dtol, _maxit), mesh (_subchannel_mesh), channel count (_n_channels), and error/solution handles (mooseError, _h_soln).

Parameters

A	PETSc matrix (operators)
rhs	PETSc vector (right-hand side)
first_node	inclusive start axial node index
last_node	inclusive end axial node index
ksp_prefix	options prefix for KSP (e.g. "h_sys_"), may be nullptr

Definition at line 2016 of file SubChannel1PhaseProblem.C.

Referenced by QuadSubChannel1PhaseProblem::computeh(), and computeh().

 {
   PetscFunctionBegin;
 
   // Create solution vector with rhs layout
   Vec x = nullptr;
   LibmeshPetscCall(VecDuplicate(rhs, &x));
 
   // KSP setup
   KSP ksp = nullptr;
   PC pc = nullptr;
   LibmeshPetscCall(KSPCreate(PETSC_COMM_SELF, &ksp));
   LibmeshPetscCall(KSPSetOperators(ksp, A, A));
   LibmeshPetscCall(KSPGetPC(ksp, &pc));
   LibmeshPetscCall(PCSetType(pc, PCJACOBI));
   LibmeshPetscCall(KSPSetTolerances(ksp, _rtol, _atol, _dtol, _maxit));
   if (ksp_prefix && *ksp_prefix)
     LibmeshPetscCall(KSPSetOptionsPrefix(ksp, ksp_prefix));
   LibmeshPetscCall(KSPSetFromOptions(ksp));
 
   // Solve
   LibmeshPetscCall(KSPSolve(ksp, rhs, x));
 
   // Scatter to _h_soln with sanity checks
   PetscScalar * xx = nullptr;
   LibmeshPetscCall(VecGetArray(x, &xx));
   for (unsigned int iz = first_node; iz <= last_node; ++iz)
   {
     const unsigned int iz_ind = iz - first_node;
     for (unsigned int i_ch = 0; i_ch < _n_channels; ++i_ch)
     {
       auto * node_out = _subchannel_mesh.getChannelNode(i_ch, iz);
       const PetscScalar h_out = xx[iz_ind * _n_channels + i_ch];
       if (h_out < 0.0)
         mooseError(
             name(), " : Calculation of negative Enthalpy h_out = ", h_out, " Axial Level = ", iz);
       _h_soln->set(node_out, h_out);
     }
   }
   LibmeshPetscCall(VecRestoreArray(x, &xx));
 
   // Cleanup
   LibmeshPetscCall(KSPDestroy(&ksp));
   LibmeshPetscCall(VecDestroy(&x));
 
   PetscFunctionReturn(LIBMESH_PETSC_SUCCESS);
 }

◆ solverSystemConverged()

bool SubChannel1PhaseProblem::solverSystemConverged ( const unsigned int )

overridevirtualinherited

Reimplemented from ExternalProblem.

Definition at line 433 of file SubChannel1PhaseProblem.C.

 {
   return _converged;
 }

◆ syncSolutions()

void SubChannel1PhaseProblem::syncSolutions ( Direction direction )

overridevirtualinherited

Implements ExternalProblem.

Definition at line 2809 of file SubChannel1PhaseProblem.C.

2810 {

2811 }

◆ validParams()

InputParameters TriSubChannel1PhaseProblem::validParams ( )

static

Definition at line 23 of file TriSubChannel1PhaseProblem.C.

 {
   InputParameters params = SubChannel1PhaseProblem::validParams();
   params.addClassDescription("Solver class for subchannels in a triangular lattice assembly and "
                              "bare/wire-wrapped fuel pins");
   return params;
 }

Member Data Documentation

◆ _added_K

PetscScalar SubChannel1PhaseProblem::_added_K = 0.0

protectedinherited

Added resistances for monolithic convergence.

Definition at line 408 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::implicitPetscSolve().

◆ _added_K_old

PetscScalar SubChannel1PhaseProblem::_added_K_old = 1000.0

protectedinherited

Definition at line 409 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::implicitPetscSolve().

◆ _amc_advective_derivative_mat

Mat SubChannel1PhaseProblem::_amc_advective_derivative_mat

protectedinherited

Axial momentum conservation - advective (Eulerian) derivative.

Definition at line 356 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), SubChannel1PhaseProblem::computeDP(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _amc_advective_derivative_rhs

Vec SubChannel1PhaseProblem::_amc_advective_derivative_rhs

protectedinherited

Definition at line 357 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), SubChannel1PhaseProblem::computeDP(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _amc_cross_derivative_mat

Mat SubChannel1PhaseProblem::_amc_cross_derivative_mat

protectedinherited

Axial momentum conservation - cross flux derivative.

Definition at line 359 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), SubChannel1PhaseProblem::computeDP(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _amc_cross_derivative_rhs

Vec SubChannel1PhaseProblem::_amc_cross_derivative_rhs

protectedinherited

Definition at line 360 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), SubChannel1PhaseProblem::computeDP(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _amc_friction_force_mat

Mat SubChannel1PhaseProblem::_amc_friction_force_mat

protectedinherited

Axial momentum conservation - friction force.

Definition at line 362 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), SubChannel1PhaseProblem::computeDP(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _amc_friction_force_rhs

Vec SubChannel1PhaseProblem::_amc_friction_force_rhs

protectedinherited

Definition at line 363 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), SubChannel1PhaseProblem::computeDP(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _amc_gravity_rhs

Vec SubChannel1PhaseProblem::_amc_gravity_rhs

protectedinherited

Axial momentum conservation - buoyancy force No implicit matrix.

Definition at line 366 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), SubChannel1PhaseProblem::computeDP(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _amc_pressure_force_mat

Mat SubChannel1PhaseProblem::_amc_pressure_force_mat

protectedinherited

Axial momentum conservation - pressure force.

Definition at line 368 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), SubChannel1PhaseProblem::computeP(), SubChannel1PhaseProblem::implicitPetscSolve(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _amc_pressure_force_rhs

Vec SubChannel1PhaseProblem::_amc_pressure_force_rhs

protectedinherited

Definition at line 369 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), SubChannel1PhaseProblem::computeP(), SubChannel1PhaseProblem::implicitPetscSolve(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _amc_sys_mdot_mat

Mat SubChannel1PhaseProblem::_amc_sys_mdot_mat

protectedinherited

Axial momentum system matrix.

Definition at line 371 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), SubChannel1PhaseProblem::computeDP(), SubChannel1PhaseProblem::implicitPetscSolve(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _amc_sys_mdot_rhs

Vec SubChannel1PhaseProblem::_amc_sys_mdot_rhs

protectedinherited

Definition at line 372 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), SubChannel1PhaseProblem::computeDP(), SubChannel1PhaseProblem::computeSumWij(), SubChannel1PhaseProblem::computeWijPrime(), SubChannel1PhaseProblem::implicitPetscSolve(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _amc_time_derivative_mat

Mat SubChannel1PhaseProblem::_amc_time_derivative_mat

protectedinherited

Axial momentum conservation - time derivative.

Definition at line 353 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), SubChannel1PhaseProblem::computeDP(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _amc_time_derivative_rhs

Vec SubChannel1PhaseProblem::_amc_time_derivative_rhs

protectedinherited

Definition at line 354 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), SubChannel1PhaseProblem::computeDP(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _amc_turbulent_cross_flows_mat

Mat SubChannel1PhaseProblem::_amc_turbulent_cross_flows_mat

protectedinherited

Mass conservation - density time derivative No implicit matrix.

Axial momentum Axial momentum conservation - compute turbulent cross fluxes

Definition at line 350 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), SubChannel1PhaseProblem::computeWijPrime(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _amc_turbulent_cross_flows_rhs

Vec SubChannel1PhaseProblem::_amc_turbulent_cross_flows_rhs

protectedinherited

Definition at line 351 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), SubChannel1PhaseProblem::computeWijPrime(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _atol

const PetscReal& SubChannel1PhaseProblem::_atol

protectedinherited

The absolute convergence tolerance for the ksp linear solver.

Definition at line 240 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::computeMdot(), SubChannel1PhaseProblem::computeP(), SubChannel1PhaseProblem::implicitPetscSolve(), SubChannel1PhaseProblem::petscSnesSolver(), and SubChannel1PhaseProblem::solveAndPopulateEnthalpy().

◆ _block_size

unsigned int SubChannel1PhaseProblem::_block_size

protectedinherited

Definition at line 207 of file SubChannel1PhaseProblem.h.

◆ _cmc_advective_derivative_mat

Mat SubChannel1PhaseProblem::_cmc_advective_derivative_mat

protectedinherited

Cross momentum conservation - advective (Eulerian) derivative.

Definition at line 379 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), SubChannel1PhaseProblem::computeWijResidual(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _cmc_advective_derivative_rhs

Vec SubChannel1PhaseProblem::_cmc_advective_derivative_rhs

protectedinherited

Definition at line 380 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), SubChannel1PhaseProblem::computeWijResidual(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _cmc_friction_force_mat

Mat SubChannel1PhaseProblem::_cmc_friction_force_mat

protectedinherited

Cross momentum conservation - friction force.

Definition at line 382 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), SubChannel1PhaseProblem::computeWijResidual(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _cmc_friction_force_rhs

Vec SubChannel1PhaseProblem::_cmc_friction_force_rhs

protectedinherited

Definition at line 383 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), SubChannel1PhaseProblem::computeWijResidual(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _cmc_pressure_force_mat

Mat SubChannel1PhaseProblem::_cmc_pressure_force_mat

protectedinherited

Cross momentum conservation - pressure force.

Definition at line 385 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), SubChannel1PhaseProblem::computeWijResidual(), SubChannel1PhaseProblem::implicitPetscSolve(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _cmc_pressure_force_rhs

Vec SubChannel1PhaseProblem::_cmc_pressure_force_rhs

protectedinherited

Definition at line 386 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), SubChannel1PhaseProblem::computeWijResidual(), SubChannel1PhaseProblem::implicitPetscSolve(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _cmc_sys_Wij_mat

Mat SubChannel1PhaseProblem::_cmc_sys_Wij_mat

protectedinherited

Lateral momentum system matrix.

Definition at line 388 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), SubChannel1PhaseProblem::computeWijResidual(), SubChannel1PhaseProblem::implicitPetscSolve(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _cmc_sys_Wij_rhs

Vec SubChannel1PhaseProblem::_cmc_sys_Wij_rhs

protectedinherited

Definition at line 389 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), SubChannel1PhaseProblem::computeWijResidual(), SubChannel1PhaseProblem::implicitPetscSolve(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _cmc_time_derivative_mat

Mat SubChannel1PhaseProblem::_cmc_time_derivative_mat

protectedinherited

Cross momentum Cross momentum conservation - time derivative.

Definition at line 376 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), SubChannel1PhaseProblem::computeWijResidual(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _cmc_time_derivative_rhs

Vec SubChannel1PhaseProblem::_cmc_time_derivative_rhs

protectedinherited

Definition at line 377 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), SubChannel1PhaseProblem::computeWijResidual(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _compute_density

const bool SubChannel1PhaseProblem::_compute_density

protectedinherited

Flag that activates or deactivates the calculation of density.

Definition at line 214 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::externalSolve().

◆ _compute_power

const bool SubChannel1PhaseProblem::_compute_power

protectedinherited

Flag that informs if we need to solve the Enthalpy/Temperature equations or not.

Definition at line 218 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::externalSolve().

◆ _compute_viscosity

const bool SubChannel1PhaseProblem::_compute_viscosity

protectedinherited

Flag that activates or deactivates the calculation of viscosity.

Definition at line 216 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::externalSolve().

◆ _converged

bool SubChannel1PhaseProblem::_converged

protectedinherited

Variable that informs whether we exited external solve with a converged solution or not.

Definition at line 224 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::externalSolve(), SubChannel1PhaseProblem::solverSystemConverged(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _correction_factor

PetscScalar SubChannel1PhaseProblem::_correction_factor = 1.0

protectedinherited

Definition at line 412 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::implicitPetscSolve().

◆ _CT

Real SubChannel1PhaseProblem::_CT

protectedinherited

Turbulent modeling parameter used in axial momentum equation.

Definition at line 230 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::computeDP(), and SubChannel1PhaseProblem::initialSetup().

◆ _deformation

bool SubChannel1PhaseProblem::_deformation = false

protectedinherited

Flag that activates the effect of deformation (pin/duct) based on the auxvalues for displacement, Dpin.

Definition at line 259 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::detectDeformation(), QuadSubChannel1PhaseProblem::initializeSolution(), and initializeSolution().

◆ _dir_grav

const Real SubChannel1PhaseProblem::_dir_grav

protectedinherited

Definition at line 249 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::computeDP().

◆ _displacement_soln

std::unique_ptr<SolutionHandle> SubChannel1PhaseProblem::_displacement_soln

protectedinherited

Definition at line 284 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::detectDeformation(), QuadSubChannel1PhaseProblem::initializeSolution(), and SubChannel1PhaseProblem::initialSetup().

◆ _DP

libMesh::DenseMatrix<Real> SubChannel1PhaseProblem::_DP

protectedinherited

Definition at line 196 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::computeDP(), SubChannel1PhaseProblem::computeP(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _DP_soln

std::unique_ptr<SolutionHandle> SubChannel1PhaseProblem::_DP_soln

protectedinherited

Definition at line 272 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::computeDP(), and SubChannel1PhaseProblem::initialSetup().

◆ _Dpin_soln

std::unique_ptr<SolutionHandle> SubChannel1PhaseProblem::_Dpin_soln

protectedinherited

Definition at line 276 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::externalSolve(), QuadSubChannel1PhaseProblem::initializeSolution(), initializeSolution(), and SubChannel1PhaseProblem::initialSetup().

◆ _dt

Real SubChannel1PhaseProblem::_dt

protectedinherited

Time step.

Definition at line 228 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::computeDP(), QuadSubChannel1PhaseProblem::computeh(), computeh(), SubChannel1PhaseProblem::computeMdot(), SubChannel1PhaseProblem::computeWijResidual(), and SubChannel1PhaseProblem::externalSolve().

◆ _dtol

const PetscReal& SubChannel1PhaseProblem::_dtol

protectedinherited

The divergence tolerance for the ksp linear solver.

Definition at line 242 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::computeMdot(), SubChannel1PhaseProblem::computeP(), SubChannel1PhaseProblem::implicitPetscSolve(), SubChannel1PhaseProblem::petscSnesSolver(), and SubChannel1PhaseProblem::solveAndPopulateEnthalpy().

◆ _duct_heat_flux_soln

std::unique_ptr<SolutionHandle> SubChannel1PhaseProblem::_duct_heat_flux_soln

protectedinherited

Definition at line 282 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::initialSetup().

◆ _duct_HTC_closure

const SCMHTCClosureBase* SubChannel1PhaseProblem::_duct_HTC_closure

protectedinherited

Definition at line 266 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::externalSolve(), SubChannel1PhaseProblem::getDuctHTCClosure(), and SubChannel1PhaseProblem::initialSetup().

◆ _duct_mesh_exist

const bool SubChannel1PhaseProblem::_duct_mesh_exist

protectedinherited

Flag that informs if there is a duct mesh or not.

Definition at line 222 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::computeAddedHeatDuct(), SubChannel1PhaseProblem::externalSolve(), SubChannel1PhaseProblem::initialSetup(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _ff_soln

std::unique_ptr<SolutionHandle> SubChannel1PhaseProblem::_ff_soln

protectedinherited

Definition at line 285 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::computeDP(), and SubChannel1PhaseProblem::initialSetup().

◆ _fp

const SinglePhaseFluidProperties* SubChannel1PhaseProblem::_fp

inherited

Non-owning pointer to fluid properties user object.

Definition at line 98 of file SubChannel1PhaseProblem.h.

Referenced by QuadSubChannel1PhaseProblem::computeh(), computeh(), SubChannel1PhaseProblem::computeMu(), SubChannel1PhaseProblem::computeRho(), SubChannel1PhaseProblem::computeT(), SubChannel1PhaseProblem::externalSolve(), SubChannel1PhaseProblem::getSinglePhaseFluidProperties(), and SubChannel1PhaseProblem::initialSetup().

◆ _friction_args

struct SubChannel1PhaseProblem::FrictionStruct SubChannel1PhaseProblem::_friction_args

inherited

Referenced by SubChannel1PhaseProblem::computeDP(), and SubChannel1PhaseProblem::externalSolve().

◆ _friction_closure

const SCMFrictionClosureBase* SubChannel1PhaseProblem::_friction_closure

protectedinherited

Friction closure object.

Definition at line 261 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::computeDP(), SubChannel1PhaseProblem::getFrictionClosure(), and SubChannel1PhaseProblem::initialSetup().

◆ _g_grav

const Real SubChannel1PhaseProblem::_g_grav

protectedinherited

Definition at line 201 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::computeDP().

◆ _gravity_direction

const MooseEnum SubChannel1PhaseProblem::_gravity_direction

protectedinherited

The direction of gravity.

Definition at line 248 of file SubChannel1PhaseProblem.h.

◆ _h_soln

std::unique_ptr<SolutionHandle> SubChannel1PhaseProblem::_h_soln

protectedinherited

Definition at line 273 of file SubChannel1PhaseProblem.h.

Referenced by QuadSubChannel1PhaseProblem::computeh(), computeh(), SubChannel1PhaseProblem::computeT(), SubChannel1PhaseProblem::externalSolve(), SubChannel1PhaseProblem::initialSetup(), and SubChannel1PhaseProblem::solveAndPopulateEnthalpy().

◆ _hc_added_heat_rhs

Vec SubChannel1PhaseProblem::_hc_added_heat_rhs

protectedinherited

Enthalpy conservation - source and sink.

Definition at line 402 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), QuadSubChannel1PhaseProblem::computeh(), computeh(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _hc_advective_derivative_mat

Mat SubChannel1PhaseProblem::_hc_advective_derivative_mat

protectedinherited

Enthalpy conservation - advective (Eulerian) derivative;.

Definition at line 396 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), QuadSubChannel1PhaseProblem::computeh(), computeh(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _hc_advective_derivative_rhs

Vec SubChannel1PhaseProblem::_hc_advective_derivative_rhs

protectedinherited

Definition at line 397 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), QuadSubChannel1PhaseProblem::computeh(), computeh(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _hc_axial_heat_conduction_mat

Mat TriSubChannel1PhaseProblem::_hc_axial_heat_conduction_mat

protected

Definition at line 34 of file TriSubChannel1PhaseProblem.h.

Referenced by cleanUp(), computeh(), and TriSubChannel1PhaseProblem().

◆ _hc_axial_heat_conduction_rhs

Vec TriSubChannel1PhaseProblem::_hc_axial_heat_conduction_rhs

protected

Definition at line 35 of file TriSubChannel1PhaseProblem.h.

Referenced by cleanUp(), computeh(), and TriSubChannel1PhaseProblem().

◆ _hc_cross_derivative_mat

Mat SubChannel1PhaseProblem::_hc_cross_derivative_mat

protectedinherited

Enthalpy conservation - cross flux derivative.

Definition at line 399 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), QuadSubChannel1PhaseProblem::computeh(), computeh(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _hc_cross_derivative_rhs

Vec SubChannel1PhaseProblem::_hc_cross_derivative_rhs

protectedinherited

Definition at line 400 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), QuadSubChannel1PhaseProblem::computeh(), computeh(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _hc_radial_heat_conduction_mat

Mat TriSubChannel1PhaseProblem::_hc_radial_heat_conduction_mat

protected

Definition at line 36 of file TriSubChannel1PhaseProblem.h.

Referenced by cleanUp(), computeh(), and TriSubChannel1PhaseProblem().

◆ _hc_radial_heat_conduction_rhs

Vec TriSubChannel1PhaseProblem::_hc_radial_heat_conduction_rhs

protected

Definition at line 37 of file TriSubChannel1PhaseProblem.h.

Referenced by cleanUp(), computeh(), and TriSubChannel1PhaseProblem().

◆ _hc_sweep_enthalpy_mat

Mat TriSubChannel1PhaseProblem::_hc_sweep_enthalpy_mat

protected

Definition at line 38 of file TriSubChannel1PhaseProblem.h.

Referenced by cleanUp(), computeh(), and TriSubChannel1PhaseProblem().

◆ _hc_sweep_enthalpy_rhs

Vec TriSubChannel1PhaseProblem::_hc_sweep_enthalpy_rhs

protected

Definition at line 39 of file TriSubChannel1PhaseProblem.h.

Referenced by cleanUp(), computeh(), and TriSubChannel1PhaseProblem().

◆ _hc_sys_h_mat

Mat SubChannel1PhaseProblem::_hc_sys_h_mat

protectedinherited

System matrices.

Definition at line 404 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), QuadSubChannel1PhaseProblem::computeh(), computeh(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _hc_sys_h_rhs

Vec SubChannel1PhaseProblem::_hc_sys_h_rhs

protectedinherited

Definition at line 405 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), QuadSubChannel1PhaseProblem::computeh(), computeh(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _hc_time_derivative_mat

Mat SubChannel1PhaseProblem::_hc_time_derivative_mat

protectedinherited

Enthalpy Enthalpy conservation - time derivative.

Definition at line 393 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), QuadSubChannel1PhaseProblem::computeh(), computeh(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _hc_time_derivative_rhs

Vec SubChannel1PhaseProblem::_hc_time_derivative_rhs

protectedinherited

Definition at line 394 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), QuadSubChannel1PhaseProblem::computeh(), computeh(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _HTC_soln

std::unique_ptr<SolutionHandle> SubChannel1PhaseProblem::_HTC_soln

protectedinherited

Definition at line 286 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::externalSolve(), and SubChannel1PhaseProblem::initialSetup().

◆ _implicit_bool

const bool SubChannel1PhaseProblem::_implicit_bool

protectedinherited

Flag to define the usage of a implicit or explicit solution.

Definition at line 251 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::computeDP(), QuadSubChannel1PhaseProblem::computeh(), computeh(), SubChannel1PhaseProblem::computeMdot(), SubChannel1PhaseProblem::computeP(), SubChannel1PhaseProblem::computeSumWij(), SubChannel1PhaseProblem::computeWijPrime(), SubChannel1PhaseProblem::computeWijResidual(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _interpolation_scheme

const MooseEnum SubChannel1PhaseProblem::_interpolation_scheme

protectedinherited

The interpolation method used in constructing the systems.

Definition at line 246 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::computeDP(), computeh(), and SubChannel1PhaseProblem::computeInterpolationCoefficients().

◆ _kij

const Real& SubChannel1PhaseProblem::_kij

protectedinherited

Definition at line 202 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::computeWijResidual().

◆ _max_sumWij

PetscScalar SubChannel1PhaseProblem::_max_sumWij

protectedinherited

Definition at line 410 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::implicitPetscSolve().

◆ _max_sumWij_new

PetscScalar SubChannel1PhaseProblem::_max_sumWij_new

protectedinherited

Definition at line 411 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::implicitPetscSolve().

◆ _maxit

const PetscInt& SubChannel1PhaseProblem::_maxit

protectedinherited

The maximum number of iterations to use for the ksp linear solver.

Definition at line 244 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::computeMdot(), SubChannel1PhaseProblem::computeP(), SubChannel1PhaseProblem::implicitPetscSolve(), SubChannel1PhaseProblem::petscSnesSolver(), and SubChannel1PhaseProblem::solveAndPopulateEnthalpy().

◆ _mc_axial_convection_mat

Mat SubChannel1PhaseProblem::_mc_axial_convection_mat

protectedinherited

Mass conservation - axial convection.

Definition at line 343 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), SubChannel1PhaseProblem::computeMdot(), SubChannel1PhaseProblem::implicitPetscSolve(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _mc_axial_convection_rhs

Vec SubChannel1PhaseProblem::_mc_axial_convection_rhs

protectedinherited

Definition at line 344 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), SubChannel1PhaseProblem::computeMdot(), SubChannel1PhaseProblem::implicitPetscSolve(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _mc_sumWij_mat

Mat SubChannel1PhaseProblem::_mc_sumWij_mat

protectedinherited

Matrices and vectors to be used in implicit assembly Mass conservation Mass conservation - sum of cross fluxes.

Definition at line 338 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), SubChannel1PhaseProblem::computeSumWij(), SubChannel1PhaseProblem::implicitPetscSolve(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _mdot_soln

std::unique_ptr<SolutionHandle> SubChannel1PhaseProblem::_mdot_soln

protectedinherited

Solutions handles and link to TH tables properties.

Definition at line 269 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::computeDP(), computeh(), SubChannel1PhaseProblem::computeMdot(), SubChannel1PhaseProblem::computeWijPrime(), SubChannel1PhaseProblem::computeWijResidual(), SubChannel1PhaseProblem::implicitPetscSolve(), QuadSubChannel1PhaseProblem::initializeSolution(), initializeSolution(), and SubChannel1PhaseProblem::initialSetup().

◆ _mixing_closure

const SCMMixingClosureBase* SubChannel1PhaseProblem::_mixing_closure

protectedinherited

Turbulent Mixing closure object.

Definition at line 263 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::computeMixingParameter(), SubChannel1PhaseProblem::computeSweepFlowMixingParameter(), and SubChannel1PhaseProblem::initialSetup().

◆ _mu_soln

std::unique_ptr<SolutionHandle> SubChannel1PhaseProblem::_mu_soln

protectedinherited

Definition at line 278 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::computeMu(), and SubChannel1PhaseProblem::initialSetup().

◆ _n_blocks

unsigned int SubChannel1PhaseProblem::_n_blocks

protectedinherited

number of axial blocks

Definition at line 195 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::externalSolve(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _n_cells

unsigned int SubChannel1PhaseProblem::_n_cells

protectedinherited

Definition at line 203 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::detectDeformation(), SubChannel1PhaseProblem::externalSolve(), QuadSubChannel1PhaseProblem::initializeSolution(), initializeSolution(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _n_channels

unsigned int SubChannel1PhaseProblem::_n_channels

protectedinherited

◆ _n_gaps

unsigned int SubChannel1PhaseProblem::_n_gaps

protectedinherited

Definition at line 204 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::computeSumWij(), SubChannel1PhaseProblem::computeWijFromSolve(), SubChannel1PhaseProblem::computeWijPrime(), SubChannel1PhaseProblem::computeWijResidual(), SubChannel1PhaseProblem::implicitPetscSolve(), QuadSubChannel1PhaseProblem::initializeSolution(), initializeSolution(), SubChannel1PhaseProblem::petscSnesSolver(), SubChannel1PhaseProblem::residualFunction(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _n_pins

unsigned int SubChannel1PhaseProblem::_n_pins

protectedinherited

Definition at line 205 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::detectDeformation(), SubChannel1PhaseProblem::externalSolve(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _nusselt_args

struct SubChannel1PhaseProblem::NusseltStruct SubChannel1PhaseProblem::_nusselt_args

inherited

Referenced by SubChannel1PhaseProblem::externalSolve().

◆ _one

Real SubChannel1PhaseProblem::_one

protectedinherited

Definition at line 210 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::externalSolve().

◆ _P_out

const PostprocessorValue& SubChannel1PhaseProblem::_P_out

inherited

Outlet pressure postprocessor value.

Definition at line 92 of file SubChannel1PhaseProblem.h.

Referenced by QuadSubChannel1PhaseProblem::computeh(), computeh(), SubChannel1PhaseProblem::computeMu(), SubChannel1PhaseProblem::computeRho(), SubChannel1PhaseProblem::computeT(), SubChannel1PhaseProblem::externalSolve(), and SubChannel1PhaseProblem::getOutletPressure().

◆ _P_soln

std::unique_ptr<SolutionHandle> SubChannel1PhaseProblem::_P_soln

protectedinherited

Definition at line 271 of file SubChannel1PhaseProblem.h.

Referenced by QuadSubChannel1PhaseProblem::computeh(), computeh(), SubChannel1PhaseProblem::computeMu(), SubChannel1PhaseProblem::computeP(), SubChannel1PhaseProblem::computeRho(), SubChannel1PhaseProblem::computeT(), SubChannel1PhaseProblem::computeWijResidual(), SubChannel1PhaseProblem::externalSolve(), SubChannel1PhaseProblem::implicitPetscSolve(), and SubChannel1PhaseProblem::initialSetup().

◆ _P_tol

const Real& SubChannel1PhaseProblem::_P_tol

protectedinherited

Convergence tolerance for the pressure loop in external solve.

Definition at line 232 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::externalSolve().

◆ _pin_HTC_closure

const SCMHTCClosureBase* SubChannel1PhaseProblem::_pin_HTC_closure

protectedinherited

HTC closure objects.

Definition at line 265 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::externalSolve(), SubChannel1PhaseProblem::getPinHTCClosure(), and SubChannel1PhaseProblem::initialSetup().

◆ _pin_mesh_exist

const bool SubChannel1PhaseProblem::_pin_mesh_exist

protectedinherited

Flag that informs if there is a pin mesh or not.

Definition at line 220 of file SubChannel1PhaseProblem.h.

Referenced by QuadSubChannel1PhaseProblem::computeAddedHeatPin(), computeAddedHeatPin(), SubChannel1PhaseProblem::detectDeformation(), SubChannel1PhaseProblem::externalSolve(), SubChannel1PhaseProblem::initialSetup(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _prod

Vec SubChannel1PhaseProblem::_prod

protectedinherited

Definition at line 340 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), SubChannel1PhaseProblem::computeDP(), SubChannel1PhaseProblem::implicitPetscSolve(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _prodp

Vec SubChannel1PhaseProblem::_prodp

protectedinherited

Definition at line 341 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), SubChannel1PhaseProblem::computeWijResidual(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _q_prime_soln

std::unique_ptr<SolutionHandle> SubChannel1PhaseProblem::_q_prime_soln

protectedinherited

Definition at line 281 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::initialSetup().

◆ _rho_soln

std::unique_ptr<SolutionHandle> SubChannel1PhaseProblem::_rho_soln

protectedinherited

Definition at line 277 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::computeDP(), QuadSubChannel1PhaseProblem::computeh(), computeh(), SubChannel1PhaseProblem::computeMdot(), SubChannel1PhaseProblem::computeRho(), SubChannel1PhaseProblem::computeWijResidual(), and SubChannel1PhaseProblem::initialSetup().

◆ _rtol

const PetscReal& SubChannel1PhaseProblem::_rtol

protectedinherited

The relative convergence tolerance, (relative decrease) for the ksp linear solver.

Definition at line 238 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::computeMdot(), SubChannel1PhaseProblem::computeP(), SubChannel1PhaseProblem::implicitPetscSolve(), SubChannel1PhaseProblem::petscSnesSolver(), and SubChannel1PhaseProblem::solveAndPopulateEnthalpy().

◆ _S_flow_soln

std::unique_ptr<SolutionHandle> SubChannel1PhaseProblem::_S_flow_soln

protectedinherited

Definition at line 279 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::computeDP(), computeh(), SubChannel1PhaseProblem::computeWijResidual(), QuadSubChannel1PhaseProblem::initializeSolution(), initializeSolution(), and SubChannel1PhaseProblem::initialSetup().

◆ _segregated_bool

const bool SubChannel1PhaseProblem::_segregated_bool

protectedinherited

Segregated solve.

Definition at line 255 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::computeDP(), SubChannel1PhaseProblem::computeMdot(), SubChannel1PhaseProblem::computeP(), SubChannel1PhaseProblem::computeSumWij(), SubChannel1PhaseProblem::computeWijResidual(), and SubChannel1PhaseProblem::externalSolve().

◆ _staggered_pressure_bool

const bool SubChannel1PhaseProblem::_staggered_pressure_bool

protectedinherited

Flag to define the usage of staggered or collocated pressure.

Definition at line 253 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::computeP(), and SubChannel1PhaseProblem::computeWijResidual().

◆ _subchannel_mesh

SubChannelMesh& SubChannel1PhaseProblem::_subchannel_mesh

protectedinherited

Definition at line 193 of file SubChannel1PhaseProblem.h.

◆ _SumWij_soln

std::unique_ptr<SolutionHandle> SubChannel1PhaseProblem::_SumWij_soln

protectedinherited

Definition at line 270 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::computeDP(), SubChannel1PhaseProblem::computeMdot(), SubChannel1PhaseProblem::computeSumWij(), SubChannel1PhaseProblem::externalSolve(), SubChannel1PhaseProblem::implicitPetscSolve(), and SubChannel1PhaseProblem::initialSetup().

◆ _T_maxit

const int& SubChannel1PhaseProblem::_T_maxit

protectedinherited

Maximum iterations for the inner temperature loop.

Definition at line 236 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::externalSolve().

◆ _T_soln

std::unique_ptr<SolutionHandle> SubChannel1PhaseProblem::_T_soln

protectedinherited

Definition at line 274 of file SubChannel1PhaseProblem.h.

Referenced by QuadSubChannel1PhaseProblem::computeh(), computeh(), SubChannel1PhaseProblem::computeMu(), SubChannel1PhaseProblem::computeRho(), SubChannel1PhaseProblem::computeT(), SubChannel1PhaseProblem::externalSolve(), and SubChannel1PhaseProblem::initialSetup().

◆ _T_tol

const Real& SubChannel1PhaseProblem::_T_tol

protectedinherited

Convergence tolerance for the temperature loop in internal solve.

Definition at line 234 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::externalSolve().

◆ _Tduct_soln

std::unique_ptr<SolutionHandle> SubChannel1PhaseProblem::_Tduct_soln

protectedinherited

Definition at line 283 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::externalSolve(), and SubChannel1PhaseProblem::initialSetup().

◆ _time_integrator_checked

bool SubChannel1PhaseProblem::_time_integrator_checked = false

protectedinherited

Whether the time integrator has been checked for consistency with the implementation.

Definition at line 226 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::externalSolve().

◆ _Tpin_soln

std::unique_ptr<SolutionHandle> SubChannel1PhaseProblem::_Tpin_soln

protectedinherited

Definition at line 275 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::externalSolve(), and SubChannel1PhaseProblem::initialSetup().

◆ _TR

Real SubChannel1PhaseProblem::_TR

protectedinherited

Flag that activates or deactivates the transient parts of the equations we solve by multiplication.

Definition at line 212 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::computeDP(), QuadSubChannel1PhaseProblem::computeh(), computeh(), SubChannel1PhaseProblem::computeMdot(), SubChannel1PhaseProblem::computeWijResidual(), and SubChannel1PhaseProblem::externalSolve().

◆ _tri_sch_mesh

TriSubChannelMesh& TriSubChannel1PhaseProblem::_tri_sch_mesh

protected

Definition at line 32 of file TriSubChannel1PhaseProblem.h.

Referenced by computeh(), getSubChannelPeripheralDuctWidth(), and initializeSolution().

◆ _verbose_subchannel

const bool SubChannel1PhaseProblem::_verbose_subchannel

protectedinherited

Boolean to printout information related to subchannel solve.

Definition at line 257 of file SubChannel1PhaseProblem.h.

Referenced by QuadSubChannel1PhaseProblem::computeh(), computeh(), SubChannel1PhaseProblem::computeP(), SubChannel1PhaseProblem::externalSolve(), and SubChannel1PhaseProblem::implicitPetscSolve().

◆ _w_perim_soln

std::unique_ptr<SolutionHandle> SubChannel1PhaseProblem::_w_perim_soln

protectedinherited

Definition at line 280 of file SubChannel1PhaseProblem.h.

Referenced by QuadSubChannel1PhaseProblem::initializeSolution(), initializeSolution(), and SubChannel1PhaseProblem::initialSetup().

◆ _Wij

libMesh::DenseMatrix<Real>& SubChannel1PhaseProblem::_Wij

protectedinherited

Definition at line 197 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::computeDP(), QuadSubChannel1PhaseProblem::computeh(), computeh(), SubChannel1PhaseProblem::computeMdot(), SubChannel1PhaseProblem::computeSumWij(), SubChannel1PhaseProblem::computeWijFromSolve(), SubChannel1PhaseProblem::computeWijResidual(), SubChannel1PhaseProblem::externalSolve(), SubChannel1PhaseProblem::implicitPetscSolve(), SubChannel1PhaseProblem::residualFunction(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _Wij_old

libMesh::DenseMatrix<Real> SubChannel1PhaseProblem::_Wij_old

protectedinherited

Definition at line 198 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::computeWijResidual(), SubChannel1PhaseProblem::externalSolve(), SubChannel1PhaseProblem::implicitPetscSolve(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _Wij_residual_matrix

libMesh::DenseMatrix<Real> SubChannel1PhaseProblem::_Wij_residual_matrix

protectedinherited

Definition at line 200 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::computeWijResidual(), SubChannel1PhaseProblem::residualFunction(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _Wij_vec

Vec SubChannel1PhaseProblem::_Wij_vec

protectedinherited

Definition at line 339 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::cleanUp(), SubChannel1PhaseProblem::computeSumWij(), SubChannel1PhaseProblem::computeWijPrime(), SubChannel1PhaseProblem::computeWijResidual(), SubChannel1PhaseProblem::implicitPetscSolve(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _WijPrime

libMesh::DenseMatrix<Real> SubChannel1PhaseProblem::_WijPrime

protectedinherited

Definition at line 199 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::computeDP(), QuadSubChannel1PhaseProblem::computeh(), computeh(), SubChannel1PhaseProblem::computeWijPrime(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

◆ _z_grid

std::vector<Real> SubChannel1PhaseProblem::_z_grid

protectedinherited

axial location of nodes

Definition at line 209 of file SubChannel1PhaseProblem.h.

Referenced by SubChannel1PhaseProblem::computeAddedHeatDuct(), QuadSubChannel1PhaseProblem::computeAddedHeatPin(), computeAddedHeatPin(), SubChannel1PhaseProblem::computeDP(), QuadSubChannel1PhaseProblem::computeh(), computeh(), SubChannel1PhaseProblem::computeMdot(), SubChannel1PhaseProblem::computeWijPrime(), SubChannel1PhaseProblem::computeWijResidual(), QuadSubChannel1PhaseProblem::initializeSolution(), initializeSolution(), and SubChannel1PhaseProblem::SubChannel1PhaseProblem().

The documentation for this class was generated from the following files:

subchannel/include/problems/TriSubChannel1PhaseProblem.h
subchannel/src/problems/TriSubChannel1PhaseProblem.C

Public Types

Public Member Functions

Static Public Member Functions

Public Attributes

Static Public Attributes

Protected Member Functions

Protected Attributes

Detailed Description

Constructor & Destructor Documentation

◆ TriSubChannel1PhaseProblem()

◆ ~TriSubChannel1PhaseProblem()

Member Function Documentation

◆ cleanUp()

◆ computeAddedHeatDuct()

◆ computeAddedHeatPin()

◆ computeDP()

◆ computeGravityDir()

◆ computeh()

◆ computeInterpolatedValue()

◆ computeInterpolationCoefficients()

◆ computeMdot()

◆ computeMixingParameter()

◆ computeMu()

◆ computeP()

◆ computeRho()

◆ computeSumWij()

◆ computeSweepFlowMixingParameter()

◆ computeT()

◆ computeWijFromSolve()

◆ computeWijPrime()

◆ computeWijResidual()

◆ createPetscMatrix()

◆ createPetscVector()

◆ detectDeformation()

◆ externalSolve()

◆ getAddedHeatDuct()

◆ getAddedHeatPin()

◆ getDuctHTCClosure()

◆ getFrictionClosure()

◆ getOutletPressure()

◆ getPinHTCClosure()

◆ getSinglePhaseFluidProperties()

◆ getSubChannelPeripheralDuctWidth()

◆ implicitPetscSolve()

◆ initializeSolution()

◆ initialSetup()

◆ petscSnesSolver()

◆ populateDenseFromVector()

◆ populateSolutionChan()

◆ populateVectorFromDense()

◆ populateVectorFromHandle()

◆ residualFunction()

◆ solveAndPopulateEnthalpy()

◆ solverSystemConverged()

◆ syncSolutions()

◆ validParams()

Member Data Documentation

◆ _added_K

◆ _added_K_old

◆ _amc_advective_derivative_mat

◆ _amc_advective_derivative_rhs

◆ _amc_cross_derivative_mat

◆ _amc_cross_derivative_rhs

◆ _amc_friction_force_mat

◆ _amc_friction_force_rhs

◆ _amc_gravity_rhs

◆ _amc_pressure_force_mat

◆ _amc_pressure_force_rhs

◆ _amc_sys_mdot_mat

◆ _amc_sys_mdot_rhs

◆ _amc_time_derivative_mat

◆ _amc_time_derivative_rhs

◆ _amc_turbulent_cross_flows_mat

◆ _amc_turbulent_cross_flows_rhs

◆ _atol

◆ _block_size

◆ _cmc_advective_derivative_mat

◆ _cmc_advective_derivative_rhs

◆ _cmc_friction_force_mat

◆ _cmc_friction_force_rhs