tests/bugs/modalg_2/bug472_1

   1 puts "TODO OCC25917 ALL: Faulty shapes in variables faulty_1 to faulty_"
   2 puts "TODO OCC25917 ALL: Error : The area of result shape is"
   3
   4 puts "========================"
   5 puts " OCC472 "
   6 puts "(case 1)"
   7 puts "========================"
   8 puts ""
   9 #####################################################
  10 ## Bad result of Fuse Operation (Cut&Common - bad too). SAM1470 (#2634)
  11 #####################################################
  12
  13 restore [locate_data_file OCC472a.brep] b1
  14 checkshape b1
  15
  16 restore [locate_data_file OCC472b.brep] b2
  17 checkshape b2
  18
  19 bcut result b1 b2
  20
  21 checkprops result -s 0
  22 checkshape result
  23 checkview -display result -2d -path ${imagedir}/${test_image}.png