tests/bugs/modalg_7/bug28700_1

   1 puts "TODO OCC28700 ALL: ERROR: Micro edge is produced."
   2
   3 puts "========"
   4 puts "OCC28700"
   5 puts "========"
   6 puts ""
   7 #########################################################################
   8 # BRepBuilderAPI_Sewing produces too small edge covered by its vertices
   9 #########################################################################
  10
  11 restore [locate_data_file OCC714.brep] a
  12
  13 sewing result 0.1 a
  14 checkshape result
  15
  16 foreach e [explode result e] {
  17   if {[validrange $e] == "edge has no valid range"} {
  18     puts "ERROR: Micro edge is produced. Edge $e is too small."
  19   }
  20 }