[occt.git] / tests / geometry / bsplinecurve / A2

top
bsplinecurve bscurv  3 2  -1.0 4   1.0 4  0 0 0 1   1 0 0 1   2 0 0 1   3 0 0 1
incdeg bscurv 10
translate bscurv 0 -4 0
set i 1
repeat 100 {cmovepoint bscurv 0.3 0. 0.05 0.0e0 ; incr i 1; repaint}
set i 1
repeat 100 {cmovepoint bscurv 0.3 0. -0.05 0.0e0 ; incr i 1;repaint}
renamevar bscurv result
set length 2.9999999999999996
Commit	Line	Data
18e25fc9	1	top
	2	bsplinecurve bscurv 3 2 -1.0 4 1.0 4 0 0 0 1 1 0 0 1 2 0 0 1 3 0 0 1
	3	incdeg bscurv 10
	4	translate bscurv 0 -4 0
	5	set i 1
	6	repeat 100 {cmovepoint bscurv 0.3 0. 0.05 0.0e0 ; incr i 1; repaint}
	7	set i 1
	8	repeat 100 {cmovepoint bscurv 0.3 0. -0.05 0.0e0 ; incr i 1;repaint}
	9	renamevar bscurv result
	10	set length 2.9999999999999996
	11