restore [locate_data_file bug28046_rm-106_merged_input_trim4.brep] s offsetparameter 1e-7 c i offsetload s 10 foreach f [explode s f] { mksurface surf $f set found [regexp {Axis :([-0-9.+eE]*), ([-0-9.+eE]*), ([-0-9.+eE]*)} [dump surf] full x y z] if {$found && abs(abs($z) - 1) < 1.e-7} { offsetonface $f 0 } } offsetperform result checkprops result -v 1.28281e+006 -s 95811.8 unifysamedom result_unif result checknbshapes result_unif -face 14 -shell 1 checkview -display result_unif -2d -path ${imagedir}/${test_image}.png