tests/bugs/modalg/bug697_5

   1 puts "============"
   2 puts "OCC697"
   3 puts "============"
   4 puts ""
   5 ######################################################
   6 # Fuse operation does not work
   7 ######################################################
   8 ## (new topology)
   9 ## (bfuse)
  10 ######################################################
  11
  12 restore [locate_data_file OCC697_2.brep] b2
  13 restore [locate_data_file OCC697_3.brep] b3
  14
  15 checkshape b2
  16 checkshape b3
  17
  18 if { [catch {bfuse result b2 b3} catch_result] } {
  19     puts "Faulty OCC697"
  20 }
  21 set square 25357.5
  22 set 3dviewer 1
  23