tests/bugs/modalg_7/bug29843_2

   1 puts "========"
   2 puts "0029843: Modeling Algorithms - Boolean FUSE produces incorrect result"
   3 puts "========"
   4 puts ""
   5
   6 puts "Boolean operation fails on the objects located far from origin (1.e+8)"
   7
   8 restore [locate_data_file bug29843_loc.brep] s
   9
  10 explode s
  11 bclearobjects
  12 bcleartools
  13 baddobjects s_1
  14 baddtools s_2
  15 bfillds
  16
  17 bbop r_0 0
  18 bbop r_1 1
  19 bbop r_2 2
  20 bbop r_3 3
  21 bbop r_4 4
  22 bbuild r_5
  23
  24 foreach i { 0 1 2 3 4 5} {
  25   checkshape r_$i
  26   if {![regexp "OK" [bopcheck r_$i]]} {
  27     puts "Error: r_$i is self-intersecting shape"
  28   }
  29 }
  30
  31 checkprops r_0 -s 62185.2 -v 1.1761e+06
  32 checknbshapes r_0 -vertex 6 -edge 9 -wire 5 -face 5 -shell 1 -solid 1 -t
  33
  34 checkprops r_1 -s 1.85327e+06 -v 5.92874e+07
  35 checknbshapes r_1 -vertex 15 -edge 24 -wire 11 -face 11 -shell 1 -solid 1 -t
  36
  37 checkprops r_2 -s 1.85376e+06 -v 5.78639e+07
  38 checknbshapes r_2 -vertex 14 -edge 21 -wire 9 -face 9 -shell 1 -solid 1 -t
  39
  40 checkprops r_3 -s 37189.7 -v 247431
  41 checknbshapes r_3 -vertex 6 -edge 9 -wire 5 -face 5 -shell 1 -solid 1 -t
  42
  43 checkprops r_4 -l 952.189
  44 checksection r_4 -r 2
  45 checknbshapes r_4 -vertex 6 -edge 7 -t
  46
  47 checkprops r_5 -s 2.01533e+06 -v 6.04635e+07
  48 checknbshapes r_5 -vertex 15 -edge 26 -wire 15 -face 15 -shell 3 -solid 3 -t
  49
  50 checkview -display r_2 -2d -path ${imagedir}/${test_image}.png
  51