tests/offset/shape_type_i_c/XH8

   1 restore [locate_data_file bug26917_dom-8092_simple4.brep] s
   2
   3 offsetparameter 1e-7 $calcul $type
   4 offsetload s 1
   5 foreach f [explode s f] {
   6   mksurface surf $f
   7   set found [regexp {Axis   :([-0-9.+eE]*), ([-0-9.+eE]*), ([-0-9.+eE]*)} [dump surf] full x y z]
   8   if {$found && abs(abs($z) - 1) < 1.e-7} {
   9     offsetonface $f 0
  10   }
  11 }
  12 offsetperform result
  13
  14 checkprops result -v 70.4702 -s 114.508
  15
  16 unifysamedom result_unif result
  17 checknbshapes result_unif -face 10 -shell 1
  18
  19 checkview -display result_unif -2d -path ${imagedir}/${test_image}.png