mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
12 lines
362 B
Plaintext
12 lines
362 B
Plaintext
puts "=================================================="
|
|
puts "Check count of segments in approximating polyline."
|
|
puts "=================================================="
|
|
puts ""
|
|
|
|
restore [locate_data_file bug24474_2.draw] c
|
|
discrCurve p c nbPnts 3 uniform 1
|
|
regexp {Poles\, +([0-9]+)} [dump p] full n
|
|
if {$n != 3} {
|
|
puts "Error: invalid discretization."
|
|
}
|