getNormal Function

private function getNormal(geometry, elemBary, node, node_pos, bcid) result(normal)

Obtain the surface normal of the chosen boundary if the boundary has store_normal set. Otherwise a null vector is returned.

Arguments

Type IntentOptional Attributes Name
type(sdr_geometry_type), intent(in) :: geometry
real(kind=rk), intent(in) :: elemBary(3)
type(sdr_node_type), intent(in) :: node
integer, intent(in) :: node_pos
integer, intent(in) :: bcid

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