ply_nodes_volume_coords Subroutine

private subroutine ply_nodes_volume_coords(num_intp_per_direction, nDims, nodeset, points)

Create multidimensional points from given 1D set of nodes in the cubic reference element.

The points will be created by a tensor product of the provided 1d nodeset for the given number of dimensions.

Arguments

TypeIntentOptionalAttributesName
integer, intent(in) :: num_intp_per_direction

Number auf integration points in each direction.

integer, intent(in) :: nDims

Number of dimensions to create the points for.

procedure(ply_nodeset_coords) :: nodeset

Set of node coordinates to use in the element.

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

Resulting list of points. First index runs over all points, second indicates the coordinate dimension (x=1,y=2,z=3).

For ndims smaller than 3, the higher dimensions will be set to 0.


Calls

proc~~ply_nodes_volume_coords~~CallsGraph proc~ply_nodes_volume_coords ply_nodes_volume_coords proc~ply_point_tensor ply_point_tensor proc~ply_nodes_volume_coords->proc~ply_point_tensor

Called by

proc~~ply_nodes_volume_coords~~CalledByGraph proc~ply_nodes_volume_coords ply_nodes_volume_coords proc~ply_nodes_create ply_nodes_create proc~ply_nodes_create->proc~ply_nodes_volume_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
integer, private :: n1d
integer, private :: numQuadPoints