mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-04 18:06:22 +03:00
11 lines
344 B
Plaintext
11 lines
344 B
Plaintext
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
|
|
checklength result -l 2.9999999999999996
|