b58dfc5e |
1 | puts "TODO DEBUG_OCC24121 Debian60-64 Windows: Error: ShapeFix_Wireframe" |
2 | |
61c421bf |
3 | puts "================" |
4 | puts "OCC394" |
5 | puts "SAM1296" |
6 | puts "================" |
7 | puts "" |
8 | ################################################################### |
9 | ## After operation "Merge edges" tolerance shape increased from 5 to 198. |
10 | ################################################################### |
11 | |
12 | pload QAcommands |
13 | |
14 | restore [locate_data_file OCC394.brep] a |
15 | |
16 | OCC394 r a 10000 2 1.57 |
17 | |
18 | regexp { +Face +: +Min +([-0-9.+eE]+)} [maxtolerance a] full face_a_tolerance |
19 | regexp { +Edge +: +Min +([-0-9.+eE]+)} [maxtolerance a] full edge_a_tolerance |
20 | regexp { +Vertex +: +Min +([-0-9.+eE]+)} [maxtolerance a] full vertex_a_tolerance |
21 | |
22 | set max_a_tolerance ${face_a_tolerance} |
23 | if {${edge_a_tolerance} > ${max_a_tolerance}} { |
24 | set max_a_tolerance ${edge_a_tolerance} |
25 | } |
26 | if {${vertex_a_tolerance} > ${max_a_tolerance}} { |
27 | set max_a_tolerance ${vertex_a_tolerance} |
28 | } |
29 | |
30 | regexp { +Face +: +Min +([-0-9.+eE]+)} [maxtolerance r] full face_r_tolerance |
31 | regexp { +Edge +: +Min +([-0-9.+eE]+)} [maxtolerance r] full edge_r_tolerance |
32 | regexp { +Vertex +: +Min +([-0-9.+eE]+)} [maxtolerance r] full vertex_r_tolerance |
33 | |
34 | set max_r_tolerance ${face_r_tolerance} |
35 | if {${edge_r_tolerance} > ${max_r_tolerance}} { |
36 | set max_r_tolerance ${edge_r_tolerance} |
37 | } |
38 | if {${vertex_r_tolerance} > ${max_r_tolerance}} { |
39 | set max_r_tolerance ${vertex_r_tolerance} |
40 | } |
41 | |
42 | puts "\nface_a_tolerance = ${face_a_tolerance}" |
43 | puts "edge_a_tolerance = ${edge_a_tolerance}" |
44 | puts "vertex_a_tolerance = ${vertex_a_tolerance}" |
45 | puts "\nmax_a_tolerance = ${max_a_tolerance}" |
46 | |
47 | puts "\nface_r_tolerance = ${face_r_tolerance}" |
48 | puts "edge_a_tolerance = ${edge_a_tolerance}" |
49 | puts "vertex_a_tolerance = ${vertex_a_tolerance}" |
50 | puts "\nmax_r_tolerance = ${max_r_tolerance}\n" |
51 | |
52 | if { ${max_a_tolerance} < ${max_r_tolerance} } { |
53 | puts "OCC394 - Error" |
54 | } else { |
55 | puts "OCC394 - OK" |
56 | } |
57 | |
58 | renamevar r result |
59 | set 2dviewer 0 |
60 | |