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

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 torus cylinder} catch_result] } {
    puts "Faulty OCC2172"
}

set square 28603.8
set 3dviewer 1
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 torus cylinder} catch_result] } {
	19	puts "Faulty OCC2172"
	20	}
	21
	22	set square 28603.8
	23	set 3dviewer 1
	24