Commit | Line | Data |
---|---|---|
bb0e6b9b | 1 | puts "==================================================" |
2 | puts "Check count of segments in approximating polyline." | |
3 | puts "==================================================" | |
4 | puts "" | |
5 | ||
9278cd60 | 6 | restore [locate_data_file bug24474.draw] c |
bb0e6b9b | 7 | discrCurve p c nbPnts 3 uniform 1 |
8 | regexp {Poles\, +([0-9]+)} [dump p] full n | |
9 | if {$n != 3} { | |
10 | puts "Error: invalid discretization." | |
11 | } |