tests/bugs/modalg_4/bug6272_72

   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 containes a_3, a_5, a_1, a_2, a_4, a_6 solids
  15 #
  16
  17 explode a1 so
  18
  19 bop a1_5 a1_3
  20 if { [catch { bopfuse result } ] } {
  21     puts "Faulty ${BugNumber}"
  22 }
  23
  24 set square 730.993
  25 set 2dviewer 0
  26