tests/bugs/modalg_4/bug697_1

   1 puts "============"
   2 puts "OCC697"
   3 puts "============"
   4 puts ""
   5 ######################################################
   6 # Fuse operation does not work
   7 ######################################################
   8 ## (old topology)
   9 ## (fuse)
  10 ######################################################
  11
  12 restore [locate_data_file OCC697_1.brep] b1
  13 restore [locate_data_file OCC697_2.brep] b2
  14
  15 checkshape b1
  16 checkshape b2
  17 ##############################################
  18 if { [catch {bfuse result b1 b2} catch_result] } {
  19 ##############################################
  20     puts "Faulty : an exception was caught"
  21 }
  22
  23 checkprops result -s 8879.41
  24 checkshape result
  25 checkview -display result -2d -path ${imagedir}/${test_image}.png
  26