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
15 sewing result +t 0.01 a b
17 set square 1.88469e+07
26 set nb_compound_good 1
27 set nb_shape_good 1761
29 checkmaxtol result 0.002196807453775285
30 checknbshapes result -shell 2
31 checkfreebounds result 6