tests/bugs/modalg_2/bug446_4

   1
   2 puts "========"
   3 puts "OCC446"
   4 puts "OCC447"
   5 puts "(case 4)"
   6 puts "========"
   7 puts ""
   8 ######################################
   9 ## As result I have fail on shape that it is not closed.
  10 ######################################
  11
  12 restore [locate_data_file OCC446d.brep] result
  13
  14 set che [checkshape result]
  15 if { [regexp {Faulty} $che ] == 1 } {
  16     puts "Faulty OCC446 (case 4): Source shape is NotClosed"
  17 } else {
  18     puts "OCC446 OK (case 4): Source shape is Closed"
  19 }
  20 checkprops result -s 629.347
  21 checkview -display result -2d -path ${imagedir}/${test_image}.png
  22