This function calculates the sigma for the planar viscosity spongelayer and multiply with targetState 'viscosity'. This function is currectly used to define viscosity sponge in musubi.

Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|

type(tem_spongeLayer_plane_type) | :: | me | Spacetime function 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) | :: | n | Number of arrays to return |

return value

Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|

integer, | private | :: | i | ||||

real(kind=rk), | private | :: | sigma | ||||

real(kind=rk), | private | :: | origin(3) | ||||

real(kind=rk), | private | :: | normal(3) | ||||

real(kind=rk), | private | :: | vec(3) | ||||

real(kind=rk), | private | :: | proj_len |