[occt.git] / tests / bugs / heal / bug26644

puts "========"
puts "OCC26644"
puts "========"
puts ""
#######################################################################
# ShapeUpgrade_UnifySameDomain - strange behavior
#######################################################################

restore [locate_data_file bug26644_input.brep] a

# 1
checkarea a 158.466 1e-1 0.01

vinit
vsetdispmode 1
vclear
vdisplay a
vfit
vdump ${imagedir}/${casename}_1.png

# 2
unifysamedom r a +f +e -b

checkshape r f

checkarea a 158.466 1e-1 0.01

set nbshapes_expected "
Number of shapes in shape
 VERTEX    : 32
 EDGE      : 50
 WIRE      : 23
 FACE      : 23
 SHELL     : 3
 SOLID     : 3
 COMPSOLID : 0
 COMPOUND  : 1
 SHAPE     : 135
"
checknbshapes r -ref ${nbshapes_expected} -t -m "Shape Upgrade"

vclear
vdisplay r
vdump ${imagedir}/${casename}_2.png
Commit	Line	Data
598f4391	1	puts "========"
	2	puts "OCC26644"
	3	puts "========"
	4	puts ""
	5	#######################################################################
	6	# ShapeUpgrade_UnifySameDomain - strange behavior
	7	#######################################################################
	8
	9	restore [locate_data_file bug26644_input.brep] a
	10
	11	# 1
	12	checkarea a 158.466 1e-1 0.01
	13
598f4391	14	vinit
	15	vsetdispmode 1
	16	vclear
	17	vdisplay a
	18	vfit
	19	vdump ${imagedir}/${casename}_1.png
	20
	21	# 2
	22	unifysamedom r a +f +e -b
	23
	24	checkshape r f
	25
	26	checkarea a 158.466 1e-1 0.01
	27
	28	set nbshapes_expected "
	29	Number of shapes in shape
	30	VERTEX : 32
	31	EDGE : 50
	32	WIRE : 23
	33	FACE : 23
	34	SHELL : 3
	35	SOLID : 3
	36	COMPSOLID : 0
	37	COMPOUND : 1
	38	SHAPE : 135
	39	"
	40	checknbshapes r -ref ${nbshapes_expected} -t -m "Shape Upgrade"
	41
	42	vclear
	43	vdisplay r
	44	vdump ${imagedir}/${casename}_2.png