set2 Subroutine

private pure subroutine set2(this, Xth_dir1, Xth_dir2, degree, continuity1, continuity2, Xc, Wc)

Set NURBS surface using nodes of parameter space, degree, continuity, control points and weights

Type Bound

nurbs_surface

Arguments

Type IntentOptional Attributes Name
class(nurbs_surface), intent(inout) :: this
real(kind=rk), intent(in), contiguous :: Xth_dir1(:)
real(kind=rk), intent(in), contiguous :: Xth_dir2(:)
integer, intent(in), contiguous :: degree(:)
integer, intent(in), contiguous :: continuity1(:)
integer, intent(in), contiguous :: continuity2(:)
real(kind=rk), intent(in), contiguous :: Xc(:,:)
real(kind=rk), intent(in), optional, contiguous :: Wc(:)

Calls

proc~~set2~3~~CallsGraph proc~set2~3 nurbs_surface%set2 proc~cmp_nc~3 nurbs_surface%cmp_nc proc~set2~3->proc~cmp_nc~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector interface~compute_multiplicity compute_multiplicity proc~cmp_nc~3->interface~compute_multiplicity proc~repelem repelem proc~compute_knot_vector->proc~repelem proc~compute_multiplicity1 compute_multiplicity1 interface~compute_multiplicity->proc~compute_multiplicity1 proc~compute_multiplicity2 compute_multiplicity2 interface~compute_multiplicity->proc~compute_multiplicity2

Called by

proc~~set2~3~~CalledByGraph proc~set2~3 nurbs_surface%set2 none~set~3 nurbs_surface%set none~set~3->proc~set2~3 proc~ansatz~3 nurbs_surface%ansatz proc~ansatz~3->none~set~3 proc~elevate_degree~3 nurbs_surface%elevate_degree proc~elevate_degree~3->none~set~3 proc~insert_knots~3 nurbs_surface%insert_knots proc~insert_knots~3->none~set~3 proc~modify_wc~3 nurbs_surface%modify_Wc proc~modify_wc~3->none~set~3 proc~modify_xc~3 nurbs_surface%modify_Xc proc~modify_xc~3->none~set~3 proc~remove_knots~3 nurbs_surface%remove_knots proc~remove_knots~3->none~set~3 proc~set_c~3 nurbs_surface%set_C proc~set_c~3->none~set~3 proc~set_half_ring~2 nurbs_surface%set_half_ring proc~set_half_ring~2->none~set~3 proc~set_ring~2 nurbs_surface%set_ring proc~set_ring~2->none~set~3 proc~set_tetragon nurbs_surface%set_tetragon proc~set_tetragon->none~set~3 program~compute_area compute_area program~compute_area->none~set~3 proc~cmp_area nurbs_surface%cmp_area program~compute_area->proc~cmp_area program~example3_surface example3_surface program~example3_surface->none~set~3 program~example3_surface->proc~elevate_degree~3 program~example3_surface->proc~insert_knots~3 program~example3_surface->proc~remove_knots~3 program~example_nurbs_surface example_nurbs_surface program~example_nurbs_surface->none~set~3 program~nearest_point_2d nearest_point_2d program~nearest_point_2d->none~set~3 proc~cmp_area->proc~ansatz~3 program~example_ppm1 example_ppm1 program~example_ppm1->proc~set_ring~2 program~example_ppm1->proc~set_tetragon program~example_ppm2 example_ppm2 program~example_ppm2->proc~set_half_ring~2 program~example_ppm2->proc~set_tetragon program~example_ppm3 example_ppm3 program~example_ppm3->proc~modify_xc~3 program~example_ppm3->proc~set_tetragon program~nearest_point_2d_bench nearest_point_2d_bench program~nearest_point_2d_bench->proc~set_tetragon program~shape_c_2d shape_C_2d program~shape_c_2d->proc~set_c~3 program~shape_half_ring_2d shape_half_ring_2d program~shape_half_ring_2d->proc~set_half_ring~2 program~shape_ring_2d shape_ring_2d program~shape_ring_2d->proc~set_ring~2 program~shape_tetragon shape_tetragon program~shape_tetragon->proc~set_tetragon