Integration part of tests of grid chl
[occt.git] / tests / bugs / modalg / bug446_2
1
2 puts "========"
3 puts "OCC446"
4 puts "OCC447"
5 puts "(case 2)"
6 puts "========"
7 puts ""
8 ######################################
9 ## As result I have fail on shape that it is not closed.
10 ######################################
11
12 restore [locate_data_file OCC446b.brep] result
13
14 set che [checkshape result]
15 if { [regexp {Faulty} $che ] == 1} {
16     puts "Faulty OCC446 (case 2): Source shape is NotClosed"
17 } else {
18     puts "OCC446 OK (case 2): Source shape is Closed"
19 }
20 set square 24272.8
21 set 3dviewer 2