Integration part of tests of grid chl
[occt.git] / tests / bugs / iges / bug60823
1 puts "TODO OCC12345 ALL: An exception was caught"
2 puts "TODO OCC12345 ALL: \\*\\* Exception \\*\\*.*"
3 puts "TODO OCC12345 ALL: TEST INCOMPLETE"
4
5 puts "========================"                                               
6 puts "BUC60823"
7 puts "========================"                                                
8
9 igesbrep [locate_data_file buc60823.igs] a *
10
11 tpcompound result
12 puts [checkshape result]
13 puts [checkshape result r]
14
15 tclean result
16 vinit
17 vdisplay result
18 vsetdispmode result 1
19 vfit
20
21 set info [trinfo result]
22 regexp { +([-0-9.+eE]+) +triangles} $info full tri
23 regexp { +([-0-9.+eE]+) +nodes} $info full nod
24
25 if { $tri != 17618 || $nod != 11153 } {
26     puts "Shading problem may be, nb tri & nod are changed"
27 }
28
29 set 2dviewer 0
30