|
ENTITY rational_b_spline_curve;
|
|
|
self_intersect
|
:
|
LOGICAL;
|
|
|
upper_index_on_control_points
|
:
|
INTEGER := (SIZEOF(control_points_list) - 1);
|
control_points
|
:
|
ARRAY [0:100] OF cartesian_point :=
list_to_array(control_points_list, 0, upper_index_on_control_points);
|
|
|
weights_data
|
:
|
LIST [2:?] OF REAL;
|
|
|
weights
|
:
|
ARRAY [0:100] OF REAL := list_to_array
(weights_data, 0, upper_index_on_control_points);
|
|
|
|