ecf4f17c |
1 | puts "TODO CR27414 ALL: Error : is WRONG because number of FACE entities in shape" |
2 | |
3 | restore [locate_data_file bug26917_dom-8092_trim3.brep] s |
4 | |
5 | offsetparameter 1e-7 $calcul $type |
6 | offsetload s 10 |
7 | foreach f [explode s f] { |
8 | mksurface surf $f |
9 | set found [regexp {Axis :([-0-9.+eE]*), ([-0-9.+eE]*), ([-0-9.+eE]*)} [dump surf] full x y z] |
10 | if {$found && abs(abs($z) - 1) < 1.e-7} { |
11 | offsetonface $f 0 |
12 | } |
13 | } |
14 | offsetperform result |
15 | |
16 | checkprops result -v 2.39493e+006 -s 156207 |
17 | |
18 | unifysamedom result_unif result |
19 | checknbshapes result_unif -face 32 -shell 1 |
20 | |
21 | checkview -display result_unif -2d -path ${imagedir}/${test_image}.png |