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

puts "============"
puts "OCC27315"
puts "============"
puts ""
###############################
## UnifySameDomain leaves unmerged edges
###############################

restore [locate_data_file bug27315_fused.brep] a
unifysamedom result a

checkshape result
checknbshapes result -m "unifysamedom" -edge 141

subshape a e 85
don a_85
smallview; fit
repeat 20 md; repeat 3 pr
don result
explode result v

checkview -screenshot -2d -path ${imagedir}/${test_image}.png
Commit	Line	Data
f98965d2	1	puts "============"
	2	puts "OCC27315"
	3	puts "============"
	4	puts ""
	5	###############################
	6	## UnifySameDomain leaves unmerged edges
	7	###############################
	8
	9	restore [locate_data_file bug27315_fused.brep] a
	10	unifysamedom result a
	11
	12	checkshape result
	13	checknbshapes result -m "unifysamedom" -edge 141
	14
	15	subshape a e 85
	16	don a_85
	17	smallview; fit
	18	repeat 20 md; repeat 3 pr
	19	don result
	20	explode result v
	21
	22	checkview -screenshot -2d -path ${imagedir}/${test_image}.png