Adding test cases from grid chl
[occt.git] / tests / bugs / moddata / bug441_3
CommitLineData
a87752f3 1puts "========================"
2puts " OCC441 "
3puts "(case 3)"
4puts "========================"
5puts ""
6###############################
7## Instability of BRepCheck check status.
8###############################
9
10restore [locate_data_file OCC441c.brep] result
11
12decho off
13set err [checkshape result r]
14decho on
15
16set j 1
17repeat 25 {
18 restore [locate_data_file OCC441c.brep] result
19 decho off
20 set err1 [checkshape result r]
21 decho on
22 if { $err != $err1 } {
23 puts [format " Faulty OCC441: function CHECKSHAPE works wrongly on %s time" $j]
24 break
25 } else {
26 puts [format " OCC441 OK: function CHECKSHAPE works properly %s time" $j]
27 }
28 incr j
29}
30
31set 2dviewer 0