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 |