0e94a94e |
1 | puts "================" |
2 | puts "OCC76" |
3 | puts "================" |
4 | puts "" |
5 | |
59495dbe |
6 | set vol1_exp 3050.42 |
7 | set vol2_exp 10195.3 |
8 | |
0e94a94e |
9 | restore [locate_data_file shading_177.brep] sh1 |
352ffd73 |
10 | checkshape sh1 |
0e94a94e |
11 | regexp {Mass +: +([-0-9.+eE]+)} [vprops sh1] full l1 |
12 | |
13 | restore [locate_data_file OCC76-2.brep] sh2 |
352ffd73 |
14 | checkshape sh2 |
0e94a94e |
15 | regexp {Mass +: +([-0-9.+eE]+)} [vprops sh2] full l2 |
16 | |
59495dbe |
17 | if { [expr abs([expr $l1 - $vol1_exp])] > 0.00999} { |
7b5e532f |
18 | puts "Error : Volume of OCC76-1.brep is calculated wrongly because $vol1_exp value must be but $l1 is" |
0e94a94e |
19 | } else { |
20 | puts " Volume of OCC76-1.brep is right calculated" |
21 | } |
22 | |
59495dbe |
23 | if { [expr abs([expr $l2 - $vol2_exp])] > 0.00999} { |
24 | puts "Error : Volume of OCC76-2.brep is calculated wrongly because $vol2_exp value must be but $l2 is" |
0e94a94e |
25 | } else { |
26 | puts " Volume of OCC76-2.brep is right calculated" |
27 | } |