mirror of
https://github.com/Open-Cascade-SAS/OCCT.git
synced 2026-05-10 17:40:24 +08:00
24 lines
484 B
Plaintext
Executable File
24 lines
484 B
Plaintext
Executable File
# Original bug : 23377
|
|
# Date : 12 Aug 2012
|
|
|
|
set check_nb 7
|
|
igesbrep [locate_data_file OCC23377-Input.igs] result *
|
|
regexp {Number of Rational BSpline surfaces +([-0-9.+eE]+)} [expshape result 1 1] full nb
|
|
if { ${nb} != ${check_nb} } {
|
|
puts "Error : The Number of Rational BSpline surfaces is wrong!"
|
|
puts "Error : It's $nb indtead of $check_nb!"
|
|
}
|
|
puts "Number of Rational BSpline surfaces is $nb"
|
|
checkview -display result -2d -path ${imagedir}/${test_image}.png
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|