restore [locate_data_file bug29188_xm6_trim.brep] s

offsetparameter 1.e-7 c i r
offsetload s 4
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 3
  } else {
    if { y < -0.7 } {
      offsetonface $f 5
    } else {
      if { y > 0.7 } {
        offsetonface $f 3
      }
    }
  }
}
offsetperform result

checkprops result -s 34789.1 -v 364306

unifysamedom result_unif result
checknbshapes result_unif -vertex 26 -edge 39 -wire 15 -face 15 -shell 1

checkview -display result_unif -2d -path ${imagedir}/${test_image}.png
