Integration part of tests of grid chl
[occt.git] / tests / bugs / moddata / bug161
1
2 puts "========"
3 puts "OCC161"
4 puts "========"
5 puts ""
6 ###########################################################
7 ## The face provided in attachment has single wire that is misoriented, i.e has
8 ## internal part outside. The checkshape command in DRAW should report that error
9 ## situation, while it does not.
10 ###########################################################
11
12 restore [locate_data_file OCC161.brep] result
13
14 decho off
15 set che [checkshape result]
16 decho on
17
18 if { [regexp {Faulty} $che] != 1 } {
19     puts "Faulty OCC161 : Checkshape command works wrongly"
20 } else {
21     puts "OCC161 OK : Checkshape command works properly"
22 }
23
24 set 2dviewer 0