Check the total density for a selected scheme and write to unit
The output might be delayed by using arrays which are then dumped to keep disc access more restricted
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(mus_scheme_type), | intent(in) | :: | scheme | scheme type |
||
integer, | intent(in) | :: | minLevel | global scheme independent information |
||
integer, | intent(in) | :: | maxLevel | global scheme independent information |
||
type(tem_general_type), | intent(inout) | :: | general | |||
real(kind=rk), | intent(out), | optional | :: | total_density |
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
real(kind=rk), | private, | allocatable | :: | dens(:) | |||
real(kind=rk), | private, | allocatable | :: | total_dens(:) | |||
real(kind=rk), | private | :: | dens_field | ||||
integer, | private | :: | iLevel | ||||
integer, | private | :: | ierror | ||||
integer, | private | :: | iElem | ||||
integer, | private | :: | iField | ||||
integer, | private | :: | elemOff | ||||
integer, | private | :: | dens_pos(scheme%nFields) |