tests/bugs/modalg_2/bug22771

   1 puts "============"
   2 puts "OCC22771"
   3 puts "============"
   4 puts ""
   5 #######################################################################
   6 # An extra vertex produced in result of Boolean section for the cases of closed intersection curves.
   7 #######################################################################
   8
   9 set BugNumber OCC22771
  10
  11 puts "Load first shape ..."
  12 restore [locate_data_file bug22771_Box_1.brep] b1
  13
  14 puts "Load second shape ..."
  15 restore [locate_data_file bug22771_Cylinder_1.brep] b2
  16
  17 puts "Prepare boolean operation ..."
  18 explode b1 f
  19 copy b1_5 b1
  20 copy b2_1 b2
  21
  22 bop b1 b2
  23
  24 puts "Start boolean operation ..."
  25 bopsection result
  26 puts "Finish boolean operation ..."
  27
  28 set length 314.159
  29
  30 checknbshapes result -vertex 1 -edge 1 -wire 0 -face 0 -shell 0 -solid 0 -compsolid 0 -compound 1 -shape 3
  31 set 3dviewer 1