[occt.git] / tests / bugs / modalg_6 / bug26098

puts "============"
puts "OCC26098"
puts "============"
puts ""
###############################
## The result of General Fuse operation is self-interfered shape
###############################

restore [locate_data_file bug26098_c.brep ] c

explode c

bclearobjects
bcleartools
baddobjects c_1
baddtools c_2 c_3 c_4 c_5

bfillds
bbuild result

set info [bopcheck result]

if { [regexp "This shape seems to be OK" ${info}] != 1 } {
    puts "Error : The result of General Fuse operation is self-interfered shape"
}

checkprops result -s 173.444 
checkshape result

set nbshapes_expected "
Number of shapes in shape
 VERTEX    : 230
 EDGE      : 400
 WIRE      : 196
 FACE      : 185
 SHELL     : 20
 SOLID     : 20
 COMPSOLID : 0
 COMPOUND  : 1
 SHAPE     : 1052
"

checknbshapes result -ref ${nbshapes_expected} -t -m "Result obtained by General Fuse operator"
checkview -display result -3d -path ${imagedir}/${test_image}.png
Commit	Line	Data
681cfe76	1	puts "============"
	2	puts "OCC26098"
	3	puts "============"
	4	puts ""
	5	###############################
	6	## The result of General Fuse operation is self-interfered shape
	7	###############################
	8
	9	restore [locate_data_file bug26098_c.brep ] c
	10
	11	explode c
	12
	13	bclearobjects
	14	bcleartools
	15	baddobjects c_1
	16	baddtools c_2 c_3 c_4 c_5
	17
	18	bfillds
	19	bbuild result
	20
	21	set info [bopcheck result]
	22
	23	if { [regexp "This shape seems to be OK" ${info}] != 1 } {
	24	puts "Error : The result of General Fuse operation is self-interfered shape"
	25	}
	26
58cf74e0	27	checkprops result -s 173.444
58cf74e0	28	checkshape result
681cfe76	29
	30	set nbshapes_expected "
	31	Number of shapes in shape
	32	VERTEX : 230
	33	EDGE : 400
	34	WIRE : 196
	35	FACE : 185
	36	SHELL : 20
	37	SOLID : 20
	38	COMPSOLID : 0
	39	COMPOUND : 1
	40	SHAPE : 1052
	41	"
	42
	43	checknbshapes result -ref ${nbshapes_expected} -t -m "Result obtained by General Fuse operator"
5747059b	44	checkview -display result -3d -path ${imagedir}/${test_image}.png