1 restore [locate_data_file bug28387_input_trim1.brep] s
3 offsetparameter 1e-7 c i r
6 foreach f [explode s f] {
8 set found [regexp {Axis :([-0-9.+eE]*), ([-0-9.+eE]*), ([-0-9.+eE]*)} [dump surf] full x y z]
12 if {abs(abs($z) - 1) < 1.e-7} {
13 # set offset value for the top/bottom faces to 0
15 } elseif {abs($z) < 1.e-7} {
16 # set offset value for the vertical faces to 5
18 } elseif { abs($y) > 0.7} {
19 # set offset value for the slightly tilted faces
20 offsetonface $f 4.9969541350954784775
25 checkprops result -v 807596 -s 70965.5
27 unifysamedom result_unif result
28 checknbshapes result_unif -face 32 -shell 1
30 checkview -display result_unif -2d -path ${imagedir}/${test_image}.png