2dbsplinecurve result  3 2  -1.0 4   1.0 4  0 0  1   1 0  1   2 0  1   3 0 1
incdeg result 11
2dtranslate result 0 -4
set i 1
repeat 100 {cmovepoint result 0 0. 0.05; incr i 1;repaint}
set i 1
repeat 100 {cmovepoint result 0 0. -0.05; incr i 1;repaint}
checklength result -l 3.0000000000000004