set2 Subroutine

private pure subroutine set2(this, Xth_dir, degree, continuity, Xc, Wc)

Set NURBS curve using nodes of parameter space (Xth), degree, continuity, control points and weights.

Type Bound

nurbs_curve

Arguments

Type IntentOptional Attributes Name
class(nurbs_curve), intent(inout) :: this
real(kind=rk), intent(in), contiguous :: Xth_dir(:)
integer, intent(in) :: degree
integer, intent(in), contiguous :: continuity(:)
real(kind=rk), intent(in), optional, contiguous :: Xc(:,:)
real(kind=rk), intent(in), optional, contiguous :: Wc(:)

Calls

proc~~set2~3~~CallsGraph proc~set2~3 nurbs_curve%set2 proc~cmp_nc~3 nurbs_curve%cmp_nc proc~set2~3->proc~cmp_nc~3 proc~compute_knot_vector compute_knot_vector proc~set2~3->proc~compute_knot_vector set set proc~set2~3->set 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_curve%set2 none~set~3 nurbs_curve%set none~set~3->proc~set2~3 proc~ansatz~3 nurbs_curve%ansatz proc~ansatz~3->none~set~3 proc~elevate_degree~3 nurbs_curve%elevate_degree proc~elevate_degree~3->none~set~3 proc~insert_knots~3 nurbs_curve%insert_knots proc~insert_knots~3->none~set~3 proc~modify_wc~3 nurbs_curve%modify_Wc proc~modify_wc~3->none~set~3 proc~modify_xc~3 nurbs_curve%modify_Xc proc~modify_xc~3->none~set~3 proc~remove_knots~3 nurbs_curve%remove_knots proc~remove_knots~3->none~set~3 proc~set_circle nurbs_curve%set_circle proc~set_circle->none~set~3 proc~set_c~3 nurbs_curve%set_C proc~set_c~3->none~set~3 proc~set_half_circle nurbs_curve%set_half_circle proc~set_half_circle->none~set~3 program~compute_length compute_length program~compute_length->none~set~3 proc~cmp_length nurbs_curve%cmp_length program~compute_length->proc~cmp_length program~example1_curve example1_curve program~example1_curve->none~set~3 program~example1_curve->proc~elevate_degree~3 program~example1_curve->proc~insert_knots~3 program~example1_curve->proc~remove_knots~3 program~example_nurbs_curve example_nurbs_curve program~example_nurbs_curve->none~set~3 program~fdm_elevate_and_insert_1d fdm_elevate_and_insert_1d program~fdm_elevate_and_insert_1d->none~set~3 program~fdm_elevate_and_insert_1d->proc~elevate_degree~3 program~fdm_elevate_and_insert_1d->proc~insert_knots~3 program~fdm_test_curve fdm_test_curve program~fdm_test_curve->none~set~3 program~lsq_fit_bspline_1d lsq_fit_bspline_1d program~lsq_fit_bspline_1d->none~set~3 program~lsq_fit_nurbs_1d lsq_fit_nurbs_1d program~lsq_fit_nurbs_1d->none~set~3 program~nearest_point_1d nearest_point_1d program~nearest_point_1d->none~set~3 program~test_nurbs_curve test_nurbs_curve program~test_nurbs_curve->none~set~3 program~test_nurbs_curve->proc~elevate_degree~3 program~test_nurbs_curve->proc~insert_knots~3 program~test_nurbs_curve->proc~modify_wc~3 program~test_nurbs_curve->proc~modify_xc~3 program~test_nurbs_curve->proc~remove_knots~3 program~test_nurbs_curve->proc~set_circle program~test_nurbs_curve->proc~set_half_circle program~test_nurbs_curve->proc~cmp_length proc~cmp_length->proc~ansatz~3 program~shape_c_1d shape_C_1d program~shape_c_1d->proc~set_c~3 program~shape_circle shape_circle program~shape_circle->proc~set_circle program~shape_half_circle shape_half_circle program~shape_half_circle->proc~set_half_circle