Integration part of tests of grid chl
[occt.git] / tests / bugs / xde / bug470
1 puts "========================"
2 puts " OCC470 "
3 puts "========================"
4
5 restore [locate_data_file OCC470.brep] a 
6
7 regexp { +Face +: +Min +([-0-9.+eE]+)} [maxtolerance a] full MinFace1
8 regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} [maxtolerance a] full MaxFace1
9 regexp { +Edge +: +Min +([-0-9.+eE]+)} [maxtolerance a] full MinEdge1
10 regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} [maxtolerance a] full MaxEdge1
11 regexp { +Vertex +: +Min +([-0-9.+eE]+)} [maxtolerance a] full MinVertex1
12 regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} [maxtolerance a] full MaxVertex1
13
14 fixshape result a 1.e-7 0.1
15
16 regexp { +Face +: +Min +([-0-9.+eE]+)} [maxtolerance result] full MinFace2
17 regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} [maxtolerance result] full MaxFace2
18 regexp { +Edge +: +Min +([-0-9.+eE]+)} [maxtolerance result] full MinEdge2
19 regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} [maxtolerance result] full MaxEdge2
20 regexp { +Vertex +: +Min +([-0-9.+eE]+)} [maxtolerance result] full MinVertex2
21 regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} [maxtolerance result] full MaxVertex2
22
23 if { $MinFace2 > $MinFace1 } {
24    puts "Error : MinFace Tolerance is increased"
25 }
26
27 if { $MaxFace2 > $MaxFace1 } {
28    puts "Error : MaxFace Tolerance is increased"
29 }
30
31 if { $MinEdge2 > $MinEdge1 } {
32    puts "Error : MinEdge Tolerance is increased"
33 }
34
35 if { $MaxEdge2 > $MaxEdge1 } {
36    puts "Error : MaxEdge Tolerance is increased"
37 }
38
39 if { $MinVertex2 > $MinVertex1 } {
40    puts "Error : MinVertex Tolerance is increased"
41 }
42
43 if { $MaxVertex2 > $MaxVertex1 } {
44    puts "Error : MaxVertex Tolerance is increased"
45 }
46
47 set 2dviewer 0
48