1 puts "TODO OCC11111 ALL: Error : Result shape is WRONG"
3 puts "================"
5 puts "================"
7 #######################################################################################
8 # Improve comman sewing in DRAW
9 ######################################################################################
11 set BugNumber OCC22770
13 restore [locate_data_file 22770-tramp.brep] a
14 restore [locate_data_file 22770-trans.brep] b
16 sewing result 0.1 a b +mint 0.01 -a
18 set square 1.88469e+07
27 set nb_compound_good 1
28 set nb_shape_good 1761
30 checkmaxtol result 0.00087010032709666047
31 checknbshapes result -shell 2
32 checkfreebounds result 6