cmp_channel_init_m Module


Uses

  • module~~cmp_channel_init_m~~UsesGraph module~cmp_channel_init_m cmp_channel_init_m module~krn_interface_m krn_interface_m module~cmp_channel_init_m->module~krn_interface_m module~krn_simulation_m krn_simulation_m module~cmp_channel_init_m->module~krn_simulation_m module~lib_friction_correlations_m lib_friction_correlations_m module~cmp_channel_init_m->module~lib_friction_correlations_m module~lib_hdf_write_m lib_hdf_write_m module~cmp_channel_init_m->module~lib_hdf_write_m module~lib_he_thermo_m lib_He_thermo_m module~cmp_channel_init_m->module~lib_he_thermo_m module~lib_input_m lib_input_m module~cmp_channel_init_m->module~lib_input_m module~lib_nusselt_correlations_m lib_nusselt_correlations_m module~cmp_channel_init_m->module~lib_nusselt_correlations_m module~krn_global_tools_m krn_global_tools_m module~krn_interface_m->module~krn_global_tools_m module~mkl_pardiso mkl_pardiso module~krn_interface_m->module~mkl_pardiso module~krn_simulation_m->module~lib_hdf_write_m module~krn_simulation_m->module~lib_input_m fortran_yaml_c fortran_yaml_c module~krn_simulation_m->fortran_yaml_c module~krn_simulation_m->module~krn_global_tools_m module~lib_friction_correlations_m->module~lib_input_m module~lib_friction_correlations_m->fortran_yaml_c iso_c_binding iso_c_binding module~lib_friction_correlations_m->iso_c_binding module~lib_friction_correlations_m->module~krn_global_tools_m module~lib_hdf_write_m->module~lib_input_m h5ds h5ds module~lib_hdf_write_m->h5ds h5lt h5lt module~lib_hdf_write_m->h5lt hdf5 hdf5 module~lib_hdf_write_m->hdf5 module~lib_hdf_write_m->iso_c_binding module~lib_hdf_write_m->module~krn_global_tools_m module~lib_he_thermo_m->module~krn_simulation_m ieee_arithmetic ieee_arithmetic module~lib_he_thermo_m->ieee_arithmetic module~lib_he_thermo_m->module~krn_global_tools_m module~lib_ext_math_m lib_ext_math_m module~lib_he_thermo_m->module~lib_ext_math_m module~lib_input_m->fortran_yaml_c module~lib_input_m->h5lt module~lib_input_m->hdf5 module~lib_input_m->module~krn_global_tools_m module~lib_nusselt_correlations_m->module~lib_input_m module~lib_nusselt_correlations_m->fortran_yaml_c module~lib_nusselt_correlations_m->iso_c_binding module~lib_nusselt_correlations_m->module~krn_global_tools_m module~krn_global_tools_m->ieee_arithmetic module~krn_global_tools_m->iso_c_binding iso_fortran_env iso_fortran_env module~krn_global_tools_m->iso_fortran_env module~lib_ext_math_m->module~krn_global_tools_m

Used by

  • module~~cmp_channel_init_m~~UsedByGraph module~cmp_channel_init_m cmp_channel_init_m module~cmp_channel_calc_m cmp_channel_calc_m module~cmp_channel_calc_m->module~cmp_channel_init_m module~cmp_channel_source_terms_m cmp_channel_source_terms_m module~cmp_channel_calc_m->module~cmp_channel_source_terms_m module~cmp_channel_flux_m cmp_channel_flux_m module~cmp_channel_flux_m->module~cmp_channel_init_m module~cmp_channel_source_terms_m->module~cmp_channel_init_m program~reims_p reims_p program~reims_p->module~cmp_channel_calc_m program~reims_p->module~cmp_channel_flux_m

Derived Types

type, public ::  source_terms_channels_t

Components

Type Visibility Attributes Name Initial
real(kind=dp), public :: Se
real(kind=dp), public :: DerSe(Nb_VarC)
real(kind=dp), public, allocatable :: Su(:)
real(kind=dp), public, allocatable :: Sr(:)
real(kind=dp), public, allocatable :: DerSu(:,:)
real(kind=dp), public, allocatable :: DerSr(:,:)

type, public ::  He_prop_t

Components

Type Visibility Attributes Name Initial
integer, public :: NbCells
real(kind=dp), public, allocatable :: dxLoc(:)
real(kind=dp), public :: Length

channel length

real(kind=dp), public :: Diam

channel diameter

real(kind=dp), public :: Area

channel cross section area

logical, public :: FFsrcLink

Fluid connexion with another channel

character(len=:), public, allocatable :: ExtHeating

Heat exchange activation - T or Q imposed

type(signal_t), public :: Temp_or_Q_Wall

Temperature of the wall OR Flux

real(kind=dp), public :: Ht

Heat transfer coefficient in case of imposed value

type(FF_flux_port_t), public, pointer :: in

inlet fluid port

type(FF_flux_port_t), public, pointer :: out

outlet fluid port

type(FS_port_pointer_t), public, allocatable :: thermP(:)
type(FF_src_port_pointer_t), public, allocatable :: thermF(:)
character(len=:), public, allocatable :: name

channel name

type, public ::  StateVariable_channel_t

Components

Type Visibility Attributes Name Initial
real(kind=dp), public, allocatable :: He_pr(:,:)

He primitive variables

real(kind=dp), public, allocatable :: He_cs(:,:)

He conservative variables

type, public ::  big_arrays_channel_t

Components

Type Visibility Attributes Name Initial
real(kind=dp), public, allocatable :: amx(:,:,:)

lower diagonal subMatrix

real(kind=dp), public, allocatable :: bmx(:,:,:)

main diagonal subMatrix

real(kind=dp), public, allocatable :: cmx(:,:,:)

upper diagonal subMatrix

real(kind=dp), public, pointer :: bvx(:,:)
real(kind=dp), public, allocatable :: Jacob(:,:,:)

Jacobian matrix of fluid model

type, public ::  arrays_linear_system_channel_t

Components

Type Visibility Attributes Name Initial
type(dbl_pointer_t), public, allocatable :: ValExp(:)

Non zero values in COO format for 1 channel

type(dbl_pointer_t), public, allocatable :: ValImp(:)

Non zero values in COO format for 1 channel

integer, public, allocatable :: RowExp(:)

row index array in COO format for 1 channel

integer, public, allocatable :: RowImp(:)

row index array in COO format for 1 channel

integer, public, allocatable :: ColExp(:)

col index array in COO format for 1 channel

integer, public, allocatable :: ColImp(:)

col index array in COO format for 1 channel

type, public ::  flux_He_channel_t

Components

Type Visibility Attributes Name Initial
real(kind=dp), public, allocatable :: Cons(:,:)

He flux (Conservative terms)

real(kind=dp), public, allocatable :: VitTNC(:)

He flux (Velocity - Non Conservative Term)

real(kind=dp), public, allocatable :: Cons_DerdUL(:,:,:)
real(kind=dp), public, allocatable :: Cons_DerdUR(:,:,:)
real(kind=dp), public, allocatable :: VitTNC_DerdUL(:,:)
real(kind=dp), public, allocatable :: VitTNC_DerdUR(:,:)

type, public ::  channel_t

Components

Type Visibility Attributes Name Initial
type(hdf_desc_t), public :: hdf
type(StateVariable_channel_t), public :: StVar

StateVariable updated by BDF 2 scheme -> time n+1

type(StateVariable_channel_t), public :: StVarOld

StateVariable -> time n

type(StateVariable_channel_t), public :: StVarOld2

StateVariable -> time n-1

type(StateVariable_channel_t), public :: StVarOld3

StateVariable -> time n-2

type(StateVariable_channel_t), public :: StVarOld4

StateVariable -> time n-3

type(StateVariable_channel_t), public :: StVarOld5

StateVariable -> time n-4

type(StateVariable_channel_t), public :: StVarOld6

StateVariable -> time n-5

type(He_prop_t), public :: HeProp

Variables relative to Helium channel global properties

type(flux_He_channel_t), public :: flxHe

Fluxes - He flow

type(big_arrays_channel_t), public :: big

Big arrays

type(arrays_linear_system_channel_t), public :: bigLS

Big arrays for Linear system

type(source_terms_channels_t), public :: srcPP
real(kind=dp), public :: wave_time

Minimum time for wave propagation

real(kind=dp), public :: err
real(kind=dp), public :: err_den
class(friction_t), public, pointer :: fct

Friction correlation

class(nusselt_t), public, pointer :: nuss

Nusselt correlation


Subroutines

public subroutine all_channel_allocation_nb(me)

Arguments

Type IntentOptional Attributes Name
type(channel_t), intent(inout) :: me

public subroutine v_prim_to_v_Conss(i, Prim, Cons)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: i
real(kind=dp), intent(in) :: Prim(:,:)
real(kind=dp), intent(inout) :: Cons(:,:)

public subroutine channel_init_part1(me, krn, cfg, h5, sim)

Arguments

Type IntentOptional Attributes Name
type(channel_t), intent(out) :: me
type(krn_t), intent(inout) :: krn
class(input_t), intent(in), pointer :: cfg
class(hdf5_t), intent(inout) :: h5
type(simulation_t), intent(inout) :: sim

public subroutine channel_init_part2(me, krn, cfg)

Fluid port initialistion for channels

Arguments

Type IntentOptional Attributes Name
type(channel_t), intent(inout), target :: me
type(krn_t), intent(inout) :: krn
class(input_t), intent(in), pointer :: cfg

public subroutine consistency_ports(PP)

Arguments

Type IntentOptional Attributes Name
type(channel_t), intent(in) :: PP(:)