[occt.git] / tests / bugs / moddata_2 / bug6862_6

puts "============"
puts "OCC6862"
puts "============"
puts ""

#######################################################################
# Tool for checking arguments of Boolean Operations
#######################################################################

set BugNumber OCC6862

# test small edges
restore [locate_data_file OCC726.brep] a 
explode a

set resstr [bopargcheck a_1 a_2 -O /FTVEI]

if {$resstr=="Faulties, that can not be treated by BOP, are detected.\n"} {
    puts "OK ${BugNumber}"
} else {
    puts "Faulty ${BugNumber}"
}

checkview -display result -2d -path ${imagedir}/${test_image}.png
Commit	Line	Data
61c421bf	1	puts "============"
	2	puts "OCC6862"
	3	puts "============"
	4	puts ""
61c421bf	5
	6	#######################################################################
	7	# Tool for checking arguments of Boolean Operations
	8	#######################################################################
	9
	10	set BugNumber OCC6862
	11
	12	# test small edges
	13	restore [locate_data_file OCC726.brep] a
	14	explode a
	15
61c421bf	16	set resstr [bopargcheck a_1 a_2 -O /FTVEI]
61c421bf	17
	18	if {$resstr=="Faulties, that can not be treated by BOP, are detected.\n"} {
	19	puts "OK ${BugNumber}"
	20	} else {
	21	puts "Faulty ${BugNumber}"
	22	}
	23
5747059b	24	checkview -display result -2d -path ${imagedir}/${test_image}.png