1 puts "================"
3 puts "================"
5 #######################################################################################
6 # Improve comman sewing in DRAW
7 ######################################################################################
13 # Create a new document and set UndoLimit
14 # NewDocument D BinXCAF
23 sewing result +t 1.1 a_2 b_1
25 checkprops result -s 12
27 checknbshapes result -vertex 4 -edge 4 -wire 2 -face 2 -shell 1 -solid 0 -compsolid 0 -compound 0 -shape 13
28 checkmaxtol result -ref 1.5
29 checknbshapes result -shell 1
30 checkfreebounds result 0
31 checkview -display result -3d -path ${imagedir}/${test_image}.png