8e1dd065c6c07745fc9796e38ec5faa15c50760b
[occt.git] / tests / bugs / modalg_4 / bug697_1
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 restore [locate_data_file OCC697_1.brep] b1 
13 restore [locate_data_file OCC697_2.brep] b2 
14
15 checkshape b1
16 checkshape b2
17 ##############################################
18 if { [catch {bfuse result b1 b2} catch_result] } {
19 ##############################################
20     puts "Faulty : an exception was caught"
21 }
22
23 checkprops result -s 8879.41 
24 checkshape result
25 checkview -display result -2d -path ${imagedir}/${test_image}.png
26