tests/bugs/modalg/bug616

   1
   2 puts "========================"
   3 puts " OCC616"
   4 puts "========================"
   5 puts ""
   6 ########################################
   7 ## Function MKOFFSET gives exception for attached face
   8 ########################################
   9
  10 restore [locate_data_file OCC616.brep] a
  11 checkshape a
  12
  13 if { [catch {mkoffset result a 5 -2} catch_result] } {
  14     puts "Faulty OCC616: function MKOFFSET works with exception"
  15 } else {
  16     renamevar result_1 result
  17     checkshape result
  18     puts "OCC616 OK: function MKOFFSET works OK"
  19 }
  20
  21 set length 1062.78
  22 set 2dviewer 0