[occt.git] / tests / bugs / modalg_2 / bug2172_4

puts "============"
puts "OCC2172"
puts "============"
puts ""
######################################################
# Fuse operation produces invalid shape
######################################################
## (old topology)
## (fuse)
######################################################

restore [locate_data_file OCC2172-torus.brep] torus 
restore [locate_data_file OCC2172-cylinder.brep] cylinder 

checkshape torus
checkshape cylinder

if { [catch {bfuse result cylinder torus} catch_result] } {
    puts "Faulty OCC2172"
}

checkprops result -s 28603.8 
checkshape result
checkview -display result -3d -path ${imagedir}/${test_image}.png
Commit	Line	Data
61c421bf	1	puts "============"
	2	puts "OCC2172"
	3	puts "============"
	4	puts ""
	5	######################################################
	6	# Fuse operation produces invalid shape
	7	######################################################
	8	## (old topology)
	9	## (fuse)
	10	######################################################
	11
	12	restore [locate_data_file OCC2172-torus.brep] torus
	13	restore [locate_data_file OCC2172-cylinder.brep] cylinder
	14
	15	checkshape torus
	16	checkshape cylinder
	17
	18	if { [catch {bfuse result cylinder torus} catch_result] } {
	19	puts "Faulty OCC2172"
	20	}
	21
58cf74e0	22	checkprops result -s 28603.8
58cf74e0	23	checkshape result
5747059b	24	checkview -display result -3d -path ${imagedir}/${test_image}.png