init_transformation_matrix_fluid Subroutine

private subroutine init_transformation_matrix_fluid(QQ, cxDir, label, me, toMoment, toPdf)

Initialize Moments transformation matrix for LBM compressible and incompressible fluid model. This matrix must be consistent with the relaxation matrix used in compute kernel and interpolation routines

Arguments

TypeIntentOptionalAttributesName
integer, intent(in) :: QQ
integer, intent(in) :: cxDir(3,QQ)
character(len=labelLen) :: label
type(mus_moment_type), intent(inout) :: me
real(kind=rk), intent(inout) :: toMoment(me%toMoments%nEntries(1),me%toMoments%nEntries(2))
real(kind=rk), intent(inout) :: toPdf(me%toPDF%nEntries(1),me%toPDF%nEntries(2))

Calls

proc~~init_transformation_matrix_fluid~~CallsGraph proc~init_transformation_matrix_fluid init_transformation_matrix_fluid proc~invert_matrix invert_matrix proc~init_transformation_matrix_fluid->proc~invert_matrix proc~get_momentvector get_momentVector proc~init_transformation_matrix_fluid->proc~get_momentvector proc~mus_imomvector mus_iMomVector proc~get_momentvector->proc~mus_imomvector

Called by

proc~~init_transformation_matrix_fluid~~CalledByGraph proc~init_transformation_matrix_fluid init_transformation_matrix_fluid proc~mus_init_moments mus_init_moments proc~mus_init_moments->proc~init_transformation_matrix_fluid proc~mus_init_scheme mus_init_scheme proc~mus_init_scheme->proc~mus_init_moments proc~mus_initialize mus_initialize proc~mus_initialize->proc~mus_init_scheme proc~mus_perform_dynloadbal mus_perform_dynLoadBal proc~mus_perform_dynloadbal->proc~mus_init_scheme program~mus_harvesting mus_harvesting program~mus_harvesting->proc~mus_init_scheme program~musubi musubi program~musubi->proc~mus_initialize none~do_balance do_balance none~do_balance->proc~mus_perform_dynloadbal

Contents


Variables

TypeVisibilityAttributesNameInitial
logical, private :: requireMom
real(kind=rk), private, dimension(QQ):: uV
real(kind=rk), private, dimension(QQ):: cx
real(kind=rk), private, dimension(QQ):: cy
real(kind=rk), private, dimension(QQ):: cz
real(kind=rk), private, dimension(QQ):: cxsqr
real(kind=rk), private, dimension(QQ):: cysqr
real(kind=rk), private, dimension(QQ):: czsqr
real(kind=rk), private, dimension(QQ):: csqr
real(kind=rk), private :: invMat(me%toPDF%nEntries(1),me%toPDF%nEntries(2))
real(kind=rk), private :: transMat(me%toPDF%nEntries(1),me%toPDF%nEntries(2))