tests/offset/shape_type_i_c/XT3

   1 puts "========"
   2 puts "0031307: Modeling Algorithms - Offset algorithm produces incorrect result in mode Complete join type Intersection"
   3 puts "========"
   4 puts ""
   5
   6 restore [locate_data_file bug31307_input.brep] s
   7 offsetparameter 1e-7 c i r
   8 offsetload s 0
   9 foreach f [explode s f] {
  10   mksurface surf $f
  11   set found [regexp {Axis   :([-0-9.+eE]*), ([-0-9.+eE]*), ([-0-9.+eE]*)} [dump surf] full x y z]
  12   if {$found && abs($z - 1) < 1.e-7} {
  13     offsetonface $f 0
  14   } else {
  15     if {$found && abs($z) < 1.e-7} {
  16       offsetonface $f 10
  17     } else {
  18       offsetonface $f 9.961946980917444
  19     }
  20   }
  21 }
  22 offsetperform result
  23
  24 checkprops result -s 2.31278e+06 -v 2.94585e+07
  25
  26 unifysamedom result_unif result
  27 checknbshapes result_unif -vertex 188 -edge 285 -wire 101 -face 100 -shell 1 -solid 1
  28
  29 checkview -display result_unif -2d -path ${imagedir}/${test_image}.png