tests/bugs/modalg_2/bug571_1

   1 puts "========"
   2 puts "OCC571"
   3 puts "========"
   4 puts ""
   5 ##########################
   6 ## Fillet operation fails on given shape
   7 ##########################
   8 ## LIMITATION: Builds fillet with 0.03<=r<=1.2
   9 ##########################
  10
  11 restore [locate_data_file OCC571.brep] a
  12 checkshape a
  13 explode a
  14
  15 if [catch {fillet result a_1 1.2 a_2 } catch_result] {
  16     puts "Faulty OCC571 exception (case 1): Fillet operation fails on given shape "
  17 } else {
  18     puts " OCC571 (case 1) OK: Fillet operation was made"
  19 }
  20
  21 checkprops result -s 21118.1
  22 checkshape result
  23 checkview -display result -2d -path ${imagedir}/${test_image}.png