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 |