Copy_poly_project_body Subroutine

private subroutine Copy_poly_project_body(left, right)

Arguments

Type	Intent	Optional	Attributes		Name
type(ply_prj_body_type),	intent(out)			::	left
type(ply_prj_body_type),	intent(in)			::	right