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

vselect 5 5 400 400

if {[vnbselected] != 26966} {
   puts "Faulty ${BugNumber}"
}

set only_screen 1



