mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-07-20 12:45:50 +03:00
27 lines
446 B
Plaintext
Executable File
27 lines
446 B
Plaintext
Executable File
puts "============"
|
|
puts "OCC6652"
|
|
puts "============"
|
|
puts ""
|
|
######################################################
|
|
# Problem of mesh selection
|
|
######################################################
|
|
|
|
pload XDE
|
|
set BugNumber OCC6652
|
|
|
|
meshfromstl result [locate_data_file OCC6652.stl]
|
|
|
|
meshdispmode result 3
|
|
meshselmode result 8
|
|
|
|
QASelectRectangle 5 5 400 400
|
|
|
|
if {[QANbSelected] != 26966} {
|
|
puts "Faulty ${BugNumber}"
|
|
}
|
|
|
|
set only_screen 1
|
|
|
|
|
|
|