tests/bugs/modalg_2/bug22717

   1 puts "==========="
   2 puts "OCC22717"
   3 puts "==========="
   4 puts ""
   5 #######################################################################
   6 #  Exception during sewing
   7 #######################################################################
   8
   9 set BugNumber OCC22717
  10
  11 catch { pload XDE }
  12
  13 igesread [locate_data_file OCC22717-8_hole.igs] shape_8h *
  14
  15 if [catch {sewing result 0.019 shape_8h} catch_result] {
  16   puts "Faulty ${BugNumber} : function Sewing works wrongly"
  17 } else {
  18   checkshape result f
  19 }
  20
  21 checkmaxtol result -ref 0.99057887669774025
  22 checknbshapes result -shell 1
  23 checkfreebounds result 13
  24
  25 set square 16490.5
  26 set 3dviewer 0
  27