This function calculates the sigma for the spongelayer radial from coord 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 |
|||
real(kind=rk), | intent(in) | :: | coord(n,3) | barycentric Ids of an elements. 1st index goes over number of elements and 2nd index goes over x,y,z coordinates |
||
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 | :: | const_fac |