tests/bugs/modalg_7/bug27224

   1 puts "========"
   2 puts "OCC27224"
   3 puts "========"
   4 puts ""
   5 ############################################################################
   6 # Incorrect result of boolean operation in boolean bcut_complex Q1 test case
   7 ############################################################################
   8
   9 restore [locate_data_file buc60290a.rle] sol1
  10 restore [locate_data_file buc60290b.rle] sol2
  11
  12 explode sol1 f
  13 explode sol2 f
  14
  15 bsection result sol2_1 sol1_1
  16
  17 regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection result] full nbv
  18
  19 if { $nbv != 0 } {
  20   puts "Error : Incorrect result of boolean operation"
  21 } else {
  22   puts "OK : Correct result of boolean operation"
  23 }
  24
  25 smallview
  26 donly result
  27 fit
  28
  29 checkview -screenshot -2d -path ${imagedir}/${test_image}.png