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

puts "========"
puts "OCC23386"
puts "========"
puts ""
################################################################################################
##  BRepAlgoAPI_Fuse on two disjoint shapes sometimes loses all geometry from one of the shapes
################################################################################################

restore [locate_data_file bug23386_a.brep] a
restore [locate_data_file bug23386_b.brep] b

bfuse result a b

set nbshapes_a "
Number of shapes in shape
 VERTEX    : 383
 EDGE      : 686
 WIRE      : 297
 FACE      : 297
 SHELL     : 2
 SOLID     : 1
 COMPSOLID : 0
 COMPOUND  : 0
 SHAPE     : 1666
"
checknbshapes a -ref ${nbshapes_a} -t -m "First initial shape"

set nbshapes_b "
Number of shapes in shape
 VERTEX    : 6
 EDGE      : 9
 WIRE      : 5
 FACE      : 5
 SHELL     : 1
 SOLID     : 1
 COMPSOLID : 0
 COMPOUND  : 0
 SHAPE     : 27
"
checknbshapes b -ref ${nbshapes_b} -t -m "Second initial shape"

set nbshapes_expected "
Number of shapes in shape
 VERTEX    : 388
 EDGE      : 695
 WIRE      : 302
 FACE      : 302
 SHELL     : 3
 SOLID     : 2
 COMPSOLID : 0
 COMPOUND  : 1
 SHAPE     : 1693
"
checknbshapes result -ref ${nbshapes_expected} -t -m "result of fuse operation"
Commit	Line	Data
2508ca8e	1	puts "========"
	2	puts "OCC23386"
	3	puts "========"
	4	puts ""
	5	################################################################################################
	6	## BRepAlgoAPI_Fuse on two disjoint shapes sometimes loses all geometry from one of the shapes
	7	################################################################################################
	8
	9	restore [locate_data_file bug23386_a.brep] a
	10	restore [locate_data_file bug23386_b.brep] b
	11
	12	bfuse result a b
	13
	14	set nbshapes_a "
	15	Number of shapes in shape
	16	VERTEX : 383
	17	EDGE : 686
	18	WIRE : 297
	19	FACE : 297
	20	SHELL : 2
	21	SOLID : 1
	22	COMPSOLID : 0
	23	COMPOUND : 0
	24	SHAPE : 1666
	25	"
	26	checknbshapes a -ref ${nbshapes_a} -t -m "First initial shape"
	27
	28	set nbshapes_b "
	29	Number of shapes in shape
	30	VERTEX : 6
	31	EDGE : 9
	32	WIRE : 5
	33	FACE : 5
	34	SHELL : 1
	35	SOLID : 1
	36	COMPSOLID : 0
	37	COMPOUND : 0
	38	SHAPE : 27
	39	"
	40	checknbshapes b -ref ${nbshapes_b} -t -m "Second initial shape"
	41
	42	set nbshapes_expected "
	43	Number of shapes in shape
	44	VERTEX : 388
	45	EDGE : 695
	46	WIRE : 302
	47	FACE : 302
	48	SHELL : 3
	49	SOLID : 2
	50	COMPSOLID : 0
	51	COMPOUND : 1
	52	SHAPE : 1693
	53	"
	54	checknbshapes result -ref ${nbshapes_expected} -t -m "result of fuse operation"