This function calculates the sigma for the spongeLayer from treeid for the polynomial order n6. Sponge profile: where, \sigma_A - sponge strength, L - thickness, x0 - start of sponge.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(tem_spongeLayer_radial_type) | :: | me | Spatial sponge layer to evaluate  | 
|||
| integer(kind=long_k), | intent(in) | :: | treeIds(n) | treeIds of elements in given level  | 
||
| type(treelmesh_type), | intent(in) | :: | tree | global treelm mesh  | 
||
| integer, | intent(in) | :: | nDim | Dimension  | 
||
| integer, | intent(in) | :: | n | Number of arrays to return  | 
return value
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| integer, | private | :: | i | ||||
| real(kind=rk), | private | :: | rad | ||||
| real(kind=rk), | private | :: | outer_radius | ||||
| real(kind=rk), | private | :: | sigma | ||||
| real(kind=rk), | private | :: | vec(3) | ||||
| real(kind=rk), | private | :: | coord(3) | ||||
| real(kind=rk), | private | :: | const_fac |