tests/bugs/modalg/bug637_2

   1
   2 puts "================"
   3 puts "OCC637"
   4 puts "(case 2)"
   5 puts "================"
   6 puts ""
   7 ##########################################
   8 ## BRepOffsetAPI_MakePipeShell crashes with fatal exception
   9 ##########################################
  10
  11 restore [locate_data_file OCC637d.brep] s
  12 checkshape s
  13
  14 restore [locate_data_file OCC637c.brep] s1
  15 checkshape s1
  16
  17 restore [locate_data_file OCC637f.brep] s2
  18 checkshape s2
  19
  20 mksweep s
  21 addsweep s1
  22 addsweep s2
  23
  24 if [catch {buildsweep result } catch_result] {
  25     puts "Faulty OCC637 (case 2): function buildsweep works wrongly"
  26 }
  27
  28 set square 1090.91
  29 set 2dviewer 0
  30