47980104 |
1 | puts "========================" |
2 | puts "OCC24174" |
3 | puts "========================" |
4 | puts "" |
5 | ####################################################################### |
6 | # [regression] BRepBuilderAPI_Sewing returns result with very high tolerance |
7 | ####################################################################### |
8 | |
9 | pload XSDRAW |
10 | |
11 | restore [locate_data_file bug24174_stitch.brep] a |
12 | |
13 | sewing result 0.1 a |
14 | |
15 | # 0 |
16 | set log_1 [tolmax a] |
17 | regexp {max tol = ([-0-9.+eE]+)} ${log_1} full MaxTolerance_a |
18 | set CMP_TOL ${MaxTolerance_a} |
19 | |
20 | # 1 |
21 | checkshape result |
22 | |
23 | # 2 |
24 | set log_2 [tolmax result] |
25 | regexp {max tol = ([-0-9.+eE]+)} ${log_2} full MaxTolerance_result |
26 | if { ${MaxTolerance_result} > ${CMP_TOL} } { |
27 | puts "Error: invalid tolerance" |
28 | } |
29 | |
30 | # 3 |
31 | freebounds $result 0 |
32 | set s [explode result_c e] |
33 | |
34 | set Number [ llength ${s} ] |
35 | puts "Number of free edges is ${Number}" |
36 | set Number_Free_Edges 9 |
37 | if { ${Number} != ${Number_Free_Edges} } { |
38 | puts "Error : Number of free edges is ${Number}" |
39 | } |
40 | |
41 | set 2dviewer 1 |