0e94a94e |
1 | puts "========" |
2 | puts "OCC168" |
3 | puts "OCC279" |
4 | puts "========" |
5 | puts "Fix missing seam don't add seam " |
6 | puts "" |
7 | |
8 | restore [locate_data_file OCC168.brep] a |
9 | |
10 | fixshape result a 1e-7 |
352ffd73 |
11 | checkshape result |
0e94a94e |
12 | |
13 | set square 992.596 |
14 | |
15 | set prop "square" |
16 | set mass $square |
17 | regexp {Mass +: +([-0-9.+eE]+)} [sprops result] full m |
18 | |
19 | if { [string compare "$mass" "empty"] != 0 } { |
20 | if { $m == 0 } { |
21 | puts "Error : The command is not valid. The $prop is 0." |
22 | } |
23 | if { $mass > 0 } { |
24 | puts "The expected $prop is $mass" |
25 | } |
26 | #check of change of square is < 1% |
27 | if { ($mass != 0 && [expr 1.*abs($mass - $m)/$mass] > 0.01) || ($mass == 0 && $m != 0) } { |
28 | puts "Error : The $prop of result shape is $m" |
29 | } |
30 | } else { |
31 | if { $m != 0 } { |
32 | puts "Error : The command is not valid. The $prop is $m" |
33 | } |
34 | } |
35 | |
36 | set 2dviewer 0 |
37 | |