puts "TODO OCC24036 ALL: Faulty shapes in variables faulty_1 to faulty_" #puts "TODO OCC24036 ALL: Error : Result shape is WRONG because it must contains 642 vertices instead of 966" #puts "TODO OCC24036 ALL: Error : Result shape is WRONG because it must contains 955 edges instead of 1224" #puts "TODO OCC24036 ALL: Error : Result shape is WRONG because it must contains 3 shells instead of 18" #puts "TODO OCC24036 ALL: Error : Result shape is WRONG because it must contains 2133 shapes instead of 2741" puts "================" puts "OCC22770" puts "================" puts "" ####################################################################################### # Improve comman sewing in DRAW ###################################################################################### set BugNumber OCC22770 catch { pload XDE } # Create a new document and set UndoLimit # NewDocument D BinXCAF # UndoLimit D 100 # Open a transaction # NewCommand D restore [locate_data_file 22770-tramp.brep] a restore [locate_data_file 22770-trans.brep] b sewing result a b +c set square 1.8847e+07 set nb_v_good 964 set nb_e_good 1222 set nb_w_good 273 set nb_f_good 259 set nb_sh_good 18 set nb_sol_good 0 set nb_compsol_good 0 set nb_compound_good 1 set nb_shape_good 2737 checkmaxtol result 0.000126867229511314 checknbshapes result -shell 18 checkfreebounds result 926 set 3dviewer 0