ply_nodes_surface_coords Subroutine

private subroutine ply_nodes_surface_coords(num_intp_per_direction, ndims, nodeset, left, right, dir)

Create the integration points on the surface of (cubical) elements.

Arguments

TypeIntentOptionalAttributesName
integer, intent(in) :: num_intp_per_direction

Number of integration points in each direction

integer, intent(in) :: ndims

Number of dimensions in the element.

procedure(ply_nodeset_coords) :: nodeset

Set of node coordinates to use in the element for which the surface points are to be defined.

real(kind=rk), intent(out), allocatable:: left(:,:)

The points on the left surface.

real(kind=rk), intent(out), allocatable:: right(:,:)

The points on the right surface.

integer :: dir

The spatial direction of the face. \n 1 -> x direction \n 2 -> y direction \n 3 -> z direction


Calls

proc~~ply_nodes_surface_coords~~CallsGraph proc~ply_nodes_surface_coords ply_nodes_surface_coords proc~ply_point_tensor ply_point_tensor proc~ply_nodes_surface_coords->proc~ply_point_tensor

Called by

proc~~ply_nodes_surface_coords~~CalledByGraph proc~ply_nodes_surface_coords ply_nodes_surface_coords proc~ply_nodes_create ply_nodes_create proc~ply_nodes_create->proc~ply_nodes_surface_coords proc~ply_poly_project_fillbody ply_poly_project_fillbody proc~ply_poly_project_fillbody->proc~ply_nodes_create proc~ply_fill_project_list ply_fill_project_list proc~ply_fill_project_list->proc~ply_poly_project_fillbody proc~sdr_proto2treelm sdr_proto2treelm proc~sdr_proto2treelm->proc~ply_poly_project_fillbody program~seeder seeder program~seeder->proc~sdr_proto2treelm

Contents


Variables

TypeVisibilityAttributesNameInitial
real(kind=rk), private, allocatable:: surface(:,:)
integer, private :: nquadPoints
integer, private :: n1d
integer, private :: tangents(2,3)