This routine compute auxFields density and velocity for incompressible model for fluid and nGhostFromCoarser elements
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=rk), | intent(inout) | :: | auxField(:) | output auxField array |
||
real(kind=rk), | intent(in) | :: | state(:) | input state array |
||
integer, | intent(in) | :: | neigh(:) | connectivity array |
||
integer, | intent(in) | :: | nSize | number of elements in the state array |
||
integer, | intent(in) | :: | nSolve | number of elements excluding halos |
||
integer, | intent(in) | :: | iLevel | current level |
||
type(tem_stencilHeader_type), | intent(in) | :: | stencil | stencil header |
||
type(tem_varSys_type), | intent(in) | :: | varSys | variable system definition |
||
type(mus_derVarPos_type), | intent(in) | :: | derVarPos(:) | position of derived quantities in varsys |
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
integer, | private | :: | dens_pos | ||||
integer, | private | :: | vel_pos(3) | ||||
integer, | private | :: | elemOff | ||||
real(kind=rk), | private | :: | pdf(stencil%QQ) | ||||
integer, | private | :: | iElem | ||||
integer, | private | :: | iDir | ||||
integer, | private | :: | |||||
integer, | private | :: | nScalars |