mus_init_pdf Subroutine

private subroutine mus_init_pdf(me, tree, fac, scaling, field, iField, state, neigh, nElems, nSize, iLevel)

Initialize the flow from pressure, velocity and strain rate.\n First equilibirium pdf (fEq) is calculated from pressure and velocity. Then non-equilibirium (fnEq) is calculated from strain rate. At last set the pdf of each element by sum up these two parts (fEq+fnEq).

Arguments

Type IntentOptional Attributes Name
type(mus_scheme_type), intent(in) :: me

Scheme type
type(treelmesh_type), intent(in) :: tree

tree type
type(mus_convertFac_type), intent(in) :: fac

Global parameters
character(len=*), intent(in) :: scaling

scaling
type(mus_field_type), intent(inout) :: field

Field type
integer, intent(in) :: iField

Field index
real(kind=rk), intent(inout) :: state(:)

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

Connectivity array
integer, intent(in) :: nElems

Number of local elements
integer, intent(in) :: nSize

number of elements as size
integer, intent(in) :: iLevel

Level index

Calls

proc~~mus_init_pdf~~CallsGraph proc~mus_init_pdf mus_init_pdf ini_state ini_state proc~mus_init_pdf->ini_state proc~getneq_acoustic getNEq_acoustic proc~mus_init_pdf->proc~getneq_acoustic proc~getneq_diffusive getNEq_diffusive proc~mus_init_pdf->proc~getneq_diffusive tem_BaryOfId tem_BaryOfId proc~mus_init_pdf->tem_BaryOfId tem_spatial_for tem_spatial_for proc~mus_init_pdf->tem_spatial_for total total proc~mus_init_pdf->total cxdirrk cxdirrk proc~getneq_acoustic->cxdirrk proc~convprepost convPrePost proc~getneq_acoustic->proc~convprepost proc~getneq_diffusive->cxdirrk proc~getneq_diffusive->proc~convprepost

Called by

proc~~mus_init_pdf~~CalledByGraph proc~mus_init_pdf mus_init_pdf proc~mus_init_byic mus_init_byIC proc~mus_init_byic->proc~mus_init_pdf 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