tests/bugs/modalg_7/bug29322_1

   1 puts "========"
   2 puts "OCC29322"
   3 puts "========"
   4 puts ""
   5 #################################################
   6 # Unify faces classification procedures in Boolean Operations
   7 #################################################
   8
   9 binrestore [locate_data_file bug29322_ZF6.bin] cs
  10
  11 explode cs
  12
  13 bclearobjects
  14 bcleartools
  15 baddobjects cs_1
  16 baddtools cs_2
  17 bfillds
  18 bbop result 1
  19
  20 checkshape result
  21 checknbshapes result -vertex 10 -edge 17 -wire 9 -face 9 -shell 1 -solid 1
  22 checkprops result -s 11.4557 -v 0.541187
  23 if {![regexp "OK" [bopcheck result]]} {
  24   puts "Error: the result is self-interfered"
  25 }
  26
  27 checkview -display result -2d -path ${imagedir}/${test_image}.png