[occt.git] / tests / bugs / vis / bug6652

puts "============"
puts "OCC6652"
puts "============"
puts ""
######################################################
# Problem of mesh selection
######################################################

pload XDE
set BugNumber OCC6652

vinit

meshfromstl result [locate_data_file OCC6652.stl]

vsetdispmode result 3
vselmode result 8 1

vselect 5 5 400 400

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

set only_screen 1
Commit	Line	Data
e54706ed	1	puts "============"
	2	puts "OCC6652"
	3	puts "============"
	4	puts ""
	5	######################################################
	6	# Problem of mesh selection
	7	######################################################
	8
	9	pload XDE
	10	set BugNumber OCC6652
	11
709e97a0	12	vinit
709e97a0	13
e54706ed	14	meshfromstl result [locate_data_file OCC6652.stl]
e54706ed	15
709e97a0	16	vsetdispmode result 3
709e97a0	17	vselmode result 8 1
e54706ed	18
4754e164	19	vselect 5 5 400 400
e54706ed	20
4754e164	21	if {[vnbselected] != 26966} {
e54706ed	22	puts "Faulty ${BugNumber}"
	23	}
	24
	25	set only_screen 1
	26
	27
	28