mirror of
https://github.com/Open-Cascade-SAS/OCCT.git
synced 2026-06-16 05:04:11 +08:00
30 lines
742 B
Plaintext
Executable File
30 lines
742 B
Plaintext
Executable File
puts "============"
|
|
puts "OCC23182"
|
|
puts "============"
|
|
puts ""
|
|
#######################################################################
|
|
# During STEP translation isn't checked for validity flag IsClosed
|
|
#######################################################################
|
|
|
|
set BugNumber OCC23182
|
|
|
|
testreadstep [locate_data_file OCC23182-Layout1.stp] result
|
|
|
|
set CheckShape_status 0
|
|
|
|
set square 1.24252
|
|
|
|
checknbshapes result -vertex 98 -edge 98 -wire 1 -face 1 -shell 1 -solid 0 -compsolid 0 -compound 0 -shape 199
|
|
set aClosed [lindex [whatis result] end]
|
|
if { ${aClosed} != "Orientable" } {
|
|
set CheckShape_status 1
|
|
}
|
|
|
|
if { ${CheckShape_status} != 0 } {
|
|
puts "Faulty ${BugNumber}"
|
|
} else {
|
|
puts "OK ${BugNumber}"
|
|
}
|
|
|
|
set 3dviewer 0
|