tests/bugs/modalg_4/bug6272_74

   1 puts "============"
   2 puts "OCC6272"
   3 puts "============"
   4 puts ""
   5 ######################################################
   6 # Incorrect results of gluing operation
   7 ######################################################
   8
   9 set BugNumber OCC6272
  10
  11 restore [locate_data_file OCC6272_bridge2.brep] a1
  12
  13 #
  14 # a1 is compound. It contains a_3, a_5, a_1, a_2, a_4, a_6 solids
  15 #
  16
  17 explode a1 so
  18
  19 bop a1_1 a1_5
  20 if { [catch { bopfuse result } ] } {
  21     puts "Faulty ${BugNumber}"
  22 }
  23
  24 checkprops result -s 2037.7
  25 checkshape result
  26 checkview -display result -2d -path ${imagedir}/${test_image}.png
  27