809eca9d |
1 | puts "================" |
2 | puts "OCC22770" |
3 | puts "================" |
4 | puts "" |
5 | ####################################################################################### |
6 | # Improve comman sewing in DRAW |
7 | ###################################################################################### |
8 | |
9 | set BugNumber OCC22770 |
10 | |
11 | catch { pload XDE } |
12 | |
13 | # Create a new document and set UndoLimit |
14 | # NewDocument D MDTV-XCAF |
15 | # UndoLimit D 100 |
16 | # Open a transaction |
17 | # NewCommand D |
18 | |
19 | box a 1 2 3 |
20 | box b 2 0 0 1 2 3 |
21 | explode a f |
22 | explode b f |
23 | sewing result +t 1.1 a_2 b_1 |
24 | |
25 | set square 12 |
26 | set nb_v_good 4 |
27 | set nb_e_good 4 |
28 | set nb_w_good 2 |
29 | set nb_f_good 2 |
30 | set nb_sh_good 1 |
31 | set nb_sol_good 0 |
32 | set nb_compsol_good 0 |
33 | set nb_compound_good 0 |
34 | set nb_shape_good 13 |
35 | |
5ae01c85 |
36 | checkmaxtol result 1.5 |
37 | checknbshapes result -shell 1 |
38 | checkfreebounds result 0 |
809eca9d |
39 | |
5ae01c85 |
40 | set 3dviewer 0 |