1 restore [locate_data_file bug28442_simple9.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 # reverse normal direction for faces with orientation REVERSED
13 if {[regexp {REVERSED} [whatis $f]]} {
16 # set offset value for top faces only
17 if {abs($z - 1) < 1.e-7 } {
23 checkprops result -v 1977 -s 1167.43
25 unifysamedom result_unif result
26 checknbshapes result_unif -face 15 -shell 1
28 checkview -display result_unif -2d -path ${imagedir}/${test_image}.png