cmp_circulator_calc_m Module

Uses

- cmp_circulator_init_m
Help

Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses.

Used by

Help

Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses.

Derived Types

type, public :: flux_and_derivatives_for_cold_circulator_t

Components

Type	Visibility	Attributes		Name		Initial
real(kind=dp),	public,	dimension(Nb_VarC)	::	flx
real(kind=dp),	public,	dimension(Nb_VarC)	::	DerVitdBr_a
real(kind=dp),	public,	dimension(Nb_VarC)	::	DerVitdBr_b
real(kind=dp),	public,	dimension(Nb_VarC,Nb_VarC)	::	DerFlxdBr_a
real(kind=dp),	public,	dimension(Nb_VarC,Nb_VarC)	::	DerFlxdBr_b
real(kind=dp),	public		::	vit

type, public :: derivatives_involving_both_branches_t

Components

Type	Visibility	Attributes		Name		Initial
real(kind=dp),	public,	dimension(Nb_VarC)	::	DerVarIndUin
real(kind=dp),	public,	dimension(Nb_VarC)	::	DerVarIndUout
real(kind=dp),	public,	dimension(Nb_VarC)	::	DerMdotDerUin
real(kind=dp),	public,	dimension(Nb_VarC)	::	DerMdotDerUout
real(kind=dp),	public,	dimension(Nb_VarC)	::	DerHHHdUin
real(kind=dp),	public,	dimension(Nb_VarC)	::	DerHHHdUout

Functions

public function imposed_mass_flow_rate(me, dPres, mdot0, dp0)

Arguments

Type	Intent	Optional	Attributes		Name
type(circulator_t),	intent(inout)			::	me
real(kind=dp),	intent(in)			::	dPres
real(kind=dp),	intent(in)			::	mdot0
real(kind=dp),	intent(in),	optional		::	dp0

Return Value real(kind=dp)

public function imposed_compression_energy(me, rostar, g, dPres, dp0)

Arguments

Type	Intent	Optional	Attributes		Name
type(circulator_t),	intent(inout)			::	me
real(kind=dp),	intent(in)			::	rostar
real(kind=dp),	intent(in)			::	g
real(kind=dp),	intent(in)			::	dPres
real(kind=dp),	intent(in)			::	dp0

Return Value real(kind=dp)

Subroutines

public subroutine mdot_derivatives(me, deriv_wr_both_br)

Arguments

Type	Intent	Optional	Attributes		Name
type(circulator_t),	intent(inout)			::	me
type(derivatives_involving_both_branches_t),	intent(out)			::	deriv_wr_both_br

public subroutine HHH_derivatives(me, rostarIn, g, dRostardUin, deriv_wr_both_br)

Arguments

Type	Intent	Optional	Attributes		Name
type(circulator_t),	intent(inout)			::	me
real(kind=dp),	intent(in)			::	rostarIn
real(kind=dp),	intent(in)			::	g
real(kind=dp),	intent(in),		dimension(:)	::	dRostardUin
type(derivatives_involving_both_branches_t),	intent(inout)			::	deriv_wr_both_br

public subroutine incoming_branch_cold_circulator(me, mdot, dPres, VarIn, deriv_wr_both_br, ssIn, FluxIn)

Arguments

Type	Intent	Optional	Attributes		Name
type(circulator_t),	intent(inout)			::	me
real(kind=dp),	intent(in)			::	mdot
real(kind=dp),	intent(in)			::	dPres
real(kind=dp),	intent(out)			::	VarIn
type(derivatives_involving_both_branches_t),	intent(inout)			::	deriv_wr_both_br
real(kind=dp),	intent(out)			::	ssIn
type(flux_and_derivatives_for_cold_circulator_t),	intent(out)			::	FluxIn

public subroutine jacobian_star(Cons_star, Jacob_star)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in),		dimension(:)	::	Cons_star
real(kind=dp),	intent(out),		dimension(:,:)	::	Jacob_star

public subroutine jacobian_star_Req_rem(PrimStar, Jacob_star)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in),		dimension(:)	::	PrimStar
real(kind=dp),	intent(out),		dimension(:,:)	::	Jacob_star

public subroutine outgoing_branch_cold_circulator(me, mdot, VarIn, deriv_wr_both_br, ssOut, FluxOut)

Arguments

Type	Intent	Optional	Attributes		Name
type(circulator_t),	intent(inout)			::	me
real(kind=dp),	intent(in)			::	mdot
real(kind=dp),	intent(in)			::	VarIn
type(derivatives_involving_both_branches_t),	intent(in)			::	deriv_wr_both_br
real(kind=dp),	intent(out)			::	ssOut
type(flux_and_derivatives_for_cold_circulator_t),	intent(out)			::	FluxOut

public subroutine circulator_resolution_from_and_to_ports(me)

Arguments

Type	Intent	Optional	Attributes		Name
type(circulator_t),	intent(inout)			::	me

public subroutine links_circulator_update(me, dt)

Arguments

Type	Intent	Optional	Attributes		Name
type(circulator_t),	intent(inout)			::	me
real(kind=dp),	intent(in)			::	dt