1 puts "================"
3 puts "================"
5 ##################################
6 ## Exception during usage ShapeFix_Shell class.
7 ##################################
9 restore [locate_data_file OCC125-2.brep] shell2
11 fixshape result shell2 1e-7
18 regexp {Mass +: +([-0-9.+eE]+)} [sprops result] full m
20 if { [string compare "$mass" "empty"] != 0 } {
22 puts "Error : The command is not valid. The $prop is 0."
25 puts "The expected $prop is $mass"
27 #check of change of square is < 1%
28 if { ($mass != 0 && [expr 1.*abs($mass - $m)/$mass] > 0.01) || ($mass == 0 && $m != 0) } {
29 puts "Error : The $prop of result shape is $m"
33 puts "Error : The command is not valid. The $prop is $m"