[occt.git] / tests / bugs / modalg_7 / bug29322_1

puts "========"
puts "OCC29322"
puts "========"
puts ""
#################################################
# Unify faces classification procedures in Boolean Operations
#################################################

binrestore [locate_data_file bug29322_ZF6.bin] cs

explode cs

bclearobjects
bcleartools
baddobjects cs_1
baddtools cs_2
bfillds
bbop result 1

checkshape result
checknbshapes result -vertex 10 -edge 17 -wire 9 -face 9 -shell 1 -solid 1
checkprops result -s 11.4557 -v 0.541187
if {![regexp "OK" [bopcheck result]]} {
  puts "Error: the result is self-interfered"
}

checkview -display result -2d -path ${imagedir}/${test_image}.png
Commit	Line	Data
b7cd7c2b	1	puts "========"
	2	puts "OCC29322"
	3	puts "========"
	4	puts ""
	5	#################################################
	6	# Unify faces classification procedures in Boolean Operations
	7	#################################################
	8
	9	binrestore [locate_data_file bug29322_ZF6.bin] cs
	10
	11	explode cs
	12
	13	bclearobjects
	14	bcleartools
	15	baddobjects cs_1
	16	baddtools cs_2
	17	bfillds
	18	bbop result 1
	19
	20	checkshape result
	21	checknbshapes result -vertex 10 -edge 17 -wire 9 -face 9 -shell 1 -solid 1
	22	checkprops result -s 11.4557 -v 0.541187
	23	if {![regexp "OK" [bopcheck result]]} {
	24	puts "Error: the result is self-interfered"
	25	}
	26
	27	checkview -display result -2d -path ${imagedir}/${test_image}.png