[occt.git] / tests / bugs / modalg / bug697_2

puts "============"
puts "OCC697"
puts "============"
puts ""
######################################################
# Fuse operation does not work
######################################################
## (old topology)
## (fuse)
######################################################

puts "#"
puts "Non stable test case on Linux. MKV. 28.04.2010"
puts "#"

restore [locate_data_file OCC697_2.brep] b2 
restore [locate_data_file OCC697_3.brep] b3 

checkshape b2
checkshape b3
##############################################
if { [catch {bfuse result b2 b3} catch_result] } {
##############################################
   puts "Faulty : an exception was caught"
}

set square 25357.5
set 2dviewer 0
Commit	Line	Data
f1aa2b62	1	puts "============"
	2	puts "OCC697"
	3	puts "============"
	4	puts ""
	5	######################################################
	6	# Fuse operation does not work
	7	######################################################
	8	## (old topology)
	9	## (fuse)
	10	######################################################
	11
	12	puts "#"
	13	puts "Non stable test case on Linux. MKV. 28.04.2010"
	14	puts "#"
	15
	16	restore [locate_data_file OCC697_2.brep] b2
	17	restore [locate_data_file OCC697_3.brep] b3
	18
352ffd73	19	checkshape b2
352ffd73	20	checkshape b3
f1aa2b62	21	##############################################
	22	if { [catch {bfuse result b2 b3} catch_result] } {
	23	##############################################
	24	puts "Faulty : an exception was caught"
	25	}
	26
	27	set square 25357.5
	28	set 2dviewer 0
	29