1 puts "TODO OCC28700 ALL: ERROR: Micro edge is produced."
7 #########################################################################
8 # BRepBuilderAPI_Sewing produces too small edge covered by its vertices
9 #########################################################################
11 restore [locate_data_file 22770-tramp.brep] a
12 restore [locate_data_file 22770-trans.brep] b
14 sewing result 0.1 a b -p
17 foreach e [explode result e] {
18 if {[validrange $e] == "edge has no valid range"} {
19 puts "ERROR: Micro edge is produced. Edge $e is too small."