tests/offset/shape_type_i_c/XQ1

   1 restore [locate_data_file bug29188_xm6_trim.brep] s
   2
   3 offsetparameter 1.e-7 c i r
   4 offsetload s 4
   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 3
  10   } else {
  11     if { y < -0.7 } {
  12       offsetonface $f 5
  13     } else {
  14       if { y > 0.7 } {
  15         offsetonface $f 3
  16       }
  17     }
  18   }
  19 }
  20 offsetperform result
  21
  22 checkprops result -s 34789.1 -v 364306
  23
  24 unifysamedom result_unif result
  25 checknbshapes result_unif -vertex 26 -edge 39 -wire 15 -face 15 -shell 1
  26
  27 checkview -display result_unif -2d -path ${imagedir}/${test_image}.png