6684fa06a8a32afb74a64e63b260e280c00ada7b
[occt.git] / tests / bugs / moddata_1 / bug20904_1
1 puts "============"
2 puts "OCC20904"
3 puts "============"
4 puts ""
5 #######################################################################
6 # BRepBuilderAPI_Sewing produces a shape with big tolerance
7 #######################################################################
8
9 set BugNumber OCC20904
10
11 restore [locate_data_file bug20904_face_bas.brep] a 
12
13 set tolerance_in 1.e-6
14 set tolerance_out ${tolerance_in}
15 sewing result ${tolerance_in} a
16
17 set tolerance_list [maxtolerance result]
18
19 regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance_list full MaxFaceTolerance
20 regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance_list full MaxEdgeTolerance
21 regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance_list full MaxVertexTolerance
22
23 set status 0
24
25 if { ${MaxFaceTolerance} > ${tolerance_out} } {
26   set status 1
27   puts "Max Face Tolerance is bad"
28 }
29
30 if { ${MaxEdgeTolerance} > ${tolerance_out} } {
31   set status 1
32   puts "Max Edge Tolerance is bad"
33 }
34
35 if { ${MaxVertexTolerance} > ${tolerance_out} } {
36   set status 1
37   puts "Max Vertex Tolerance is bad"
38 }
39
40 # Resume
41 puts ""
42 if { ${status} != 0 } {
43   puts "Faulty ${BugNumber}"
44 } else {
45   puts "OK ${BugNumber}"
46 }
47
48 checkmaxtol result 9.9999999999999995e-008
49 checknbshapes result -shell 0
50 checkfreebounds result 2
51
52 set square 30078.9
53 set 2dviewer 0