tests/bugs/modalg/bug771

   1
   2 puts "========"
   3 puts "OCC771"
   4 puts "SAM1639"
   5 puts "========"
   6 puts ""
   7 ###########################
   8 ## Impossible fusung 3 shapes attached
   9 ###########################
  10
  11 restore [locate_data_file OCC771.brep] a
  12 explode a
  13 checkshape a_1
  14 checkshape a_2
  15 checkshape a_3
  16
  17 bfuse res1 a_1 a_2
  18
  19 checkshape res1
  20
  21 bfuse result res1 a_3
  22
  23 set square 1306.68
  24 set 2dviewer 0
  25