This routines does setup indices for given source within a field or global. Index are stored for points which source term is active
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(mus_source_type), | intent(inout) | :: | source | Source term to fill in |
||
type(tem_varSys_type), | intent(in) | :: | varSys | global variable system |
||
integer, | intent(in) | :: | nSolve | Number of elements to apply source term on this level |
||
real(kind=rk), | intent(in) | :: | bary(:,:) | Space coordinates to apply source terms |
||
integer, | intent(in) | :: | iLevel | Current level |
||
type(treelmesh_type), | intent(in) | :: | tree | global treelm mesh |
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
integer, | private | :: | iVar | ||||
integer, | private | :: | iElem | ||||
integer, | private | :: | counter | ||||
integer, | private | :: | src_nElems | ||||
integer, | private | :: | nComps | ||||
integer, | private | :: | data_varPos | ||||
integer, | private, | allocatable | :: | idx(:) | |||
integer(kind=long_k), | private | :: | nElems_var(source%varDict%nVals) |