1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
puts "##################################################"
puts "0026627: Shape Healing hangs as of OCC 6.8.0"
puts "##################################################"
# load and check shape
restore [locate_data_file bug26627_fixed.brep] a
tolerance a
checkshape a
# call fixshape -- it should finish in fraction of second
cpulimit 10
fixshape result a 1e-6
# result should have positive volume
if { [regexp {Mass\s*:\s*([0-9.e+-]*)} [vprops result] dummy volume] } {
checkreal "Volume of the solid" $volume 4332.63 0.1 0.
} else {
puts "Error: cannot get volume of result!"
}
|
