mus_init_MSLiquid Subroutine

private subroutine mus_init_MSLiquid(me, tree, fac, state, neigh, field, mixture, nElems, nSize, iLevel)

Initialize the flow from calculated quantitites like density, velocity etc. for multispecies lbm

Arguments

TypeIntentOptionalAttributesName
type(mus_scheme_type), intent(inout) :: me
type(treelmesh_type), intent(in) :: tree
type(mus_convertFac_type), intent(in) :: fac
real(kind=rk), intent(inout) :: state(:)

PDF

integer, intent(in) :: neigh(:)

Connectivity array

type(mus_field_type), intent(inout) :: field(:)
type(mus_mixture_type), intent(inout) :: mixture
integer, intent(in) :: nElems
integer, intent(in) :: nSize
integer, intent(in) :: iLevel

Calls

proc~~mus_init_msliquid~~CallsGraph proc~mus_init_msliquid mus_init_MSLiquid interface~tem_spatial_for tem_spatial_for proc~mus_init_msliquid->interface~tem_spatial_for proc~tem_baryofid tem_BaryOfId proc~mus_init_msliquid->proc~tem_baryofid proc~tem_abort tem_abort proc~mus_init_msliquid->proc~tem_abort proc~invert_matrix invert_matrix proc~mus_init_msliquid->proc~invert_matrix interface~mus_calc_thermfactor mus_calc_thermFactor proc~mus_init_msliquid->interface~mus_calc_thermfactor interface~mus_calc_ms_diffmatrix mus_calc_MS_DiffMatrix proc~mus_init_msliquid->interface~mus_calc_ms_diffmatrix proc~mus_calc_thermfactor_single mus_calc_thermFactor_single interface~mus_calc_thermfactor->proc~mus_calc_thermfactor_single proc~mus_calc_ms_diffmatrix_single mus_calc_MS_DiffMatrix_single interface~mus_calc_ms_diffmatrix->proc~mus_calc_ms_diffmatrix_single interface~calc_ms_diff_matrix_from_moledens calc_ms_diff_matrix_from_moledens proc~mus_calc_ms_diffmatrix_single->interface~calc_ms_diff_matrix_from_moledens interface~calc_therm_factor_loc calc_therm_factor_loc proc~mus_calc_thermfactor_single->interface~calc_therm_factor_loc

Called by

proc~~mus_init_msliquid~~CalledByGraph proc~mus_init_msliquid mus_init_MSLiquid proc~mus_init_byic mus_init_byIC proc~mus_init_byic->proc~mus_init_msliquid proc~mus_init_flow mus_init_flow proc~mus_init_flow->proc~mus_init_byic proc~mus_initialize mus_initialize proc~mus_initialize->proc~mus_init_flow program~musubi musubi program~musubi->proc~mus_initialize

Contents


Variables

TypeVisibilityAttributesNameInitial
integer, private :: iDir
integer, private :: iElem
integer, private :: iField
integer, private :: nFields
integer, private :: QQ
real(kind=rk), private, allocatable:: fEqStar(:)
real(kind=rk), private, allocatable:: fEq(:)
real(kind=rk), private, allocatable:: press(:)
real(kind=rk), private, allocatable:: xc(:,:)
real(kind=rk), private, allocatable:: ux(:,:)
real(kind=rk), private, allocatable:: uy(:,:)
real(kind=rk), private, allocatable:: uz(:,:)
real(kind=rk), private, allocatable:: rho(:,:)
real(kind=rk), private, allocatable:: moleFrac(:,:)
real(kind=rk), private :: phi(me%nFields)
real(kind=rk), private :: tot_massDens
integer, private :: iChunk
integer, private :: nChunks
integer, private :: chunkSize
integer, private :: nChunkElems
integer, private :: elemPos
integer, private :: elemOff
real(kind=rk), private, dimension(3):: eqVel
real(kind=rk), private, dimension(3):: velAvg
real(kind=rk), private, dimension(3):: velQuadStar
real(kind=rk), private, dimension(3):: velQuad
real(kind=rk), private :: vel(3,me%nFields)
integer, private :: iField_2
integer, private :: iField_3
real(kind=rk), private :: resi_coeff(me%nFields,me%nFields)
real(kind=rk), private :: diff_coeff(me%nFields,me%nFields)
real(kind=rk), private :: ucx
real(kind=rk), private :: ucxStar
real(kind=rk), private :: usq
real(kind=rk), private :: usqStar
real(kind=rk), private :: ucxQuad
real(kind=rk), private :: ucxQuadStar
real(kind=rk), private, dimension(me%nFields, me%nFields):: thermodynamic_fac
real(kind=rk), private, dimension(me%nFields, me%nFields):: inv_thermodyn_fac
integer, private :: restPosition
integer, private :: nScalars