0024927: Getting rid of "Persistent" functionality -- Tests
[occt.git] / tests / bugs / modalg_2 / bug22770_15
1 puts "TODO OCC24036 ALL: Faulty shapes in variables faulty_1 to faulty_2"
2 puts "TODO OCC24036 ALL: Error : Result shape is WRONG because it must contains 642 vertices instead of 966"
3 puts "TODO OCC24036 ALL: Error : Result shape is WRONG because it must contains 955 edges instead of 1224"
4 puts "TODO OCC24036 ALL: Error : Result shape is WRONG because it must contains 3 shells instead of 18"
5 puts "TODO OCC24036 ALL: Error : Result shape is WRONG because it must contains 2133 shapes instead of 2741"
6
7 puts "================"
8 puts "OCC22770"
9 puts "================"
10 puts ""
11 #######################################################################################
12 # Improve comman sewing in DRAW
13 ######################################################################################
14
15 set BugNumber OCC22770
16
17 catch { pload XDE }
18
19 # Create a new document and set UndoLimit
20
21 # NewDocument D BinXCAF
22 # UndoLimit D 100
23
24 # Open a transaction
25 # NewCommand D
26
27 restore [locate_data_file 22770-tramp.brep] a 
28 restore [locate_data_file 22770-trans.brep] b 
29 sewing result a b -p
30
31 set square 1.8847e+07
32
33 set nb_v_good 642
34 set nb_e_good 955
35 set nb_w_good 273
36 set nb_f_good 259
37 set nb_sh_good 3
38 set nb_sol_good 0
39 set nb_compsol_good 0
40 set nb_compound_good 1
41 set nb_shape_good 2133
42
43 checkmaxtol result 0.000126867229511314
44 checknbshapes result -shell 18
45 checkfreebounds result 927
46
47 set 3dviewer 0