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