tem_viscSpongeLayer_box2d_for Interface

public interface tem_viscSpongeLayer_box2d_for

Interface for viscous sponge layer box


Module Procedures

private function viscSpongelayer_box2d_for_coord(me, coord, n) result(res)

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

Arguments

Type IntentOptional Attributes Name
type(tem_spongeLayer_box_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 real(kind=rk), (n)

return value

private function viscSpongelayer_box2d_for_treeIDs(me, treeIds, tree, n) result(res)

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

Arguments

Type IntentOptional Attributes Name
type(tem_spongeLayer_box_type) :: me

Spacetime function 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) :: n

Number of arrays to return

Return Value real(kind=rk), (n)

return value