tests/bugs/modalg_4/bug697_7

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