Adding testing cases from chl group
[occt.git] / tests / bugs / modalg / bug4993_2
1 puts "============"
2 puts "OCC4993"
3 puts "============"
4 puts ""
5 ######################################################
6 # Problem in boolean fusion
7 # (new topology)
8 ######################################################
9
10 restore [locate_data_file OCC4993-s1.brep] s1 
11 restore [locate_data_file OCC4993-s2.brep] s2 
12
13 checkshape s1
14 checkshape s2
15
16 bop s2 s1
17 bopfuse result
18
19 set square 4854.51
20
21 set nb_v_good 40
22 set nb_e_good 64
23 set nb_w_good 24
24 set nb_f_good 24
25 set nb_sh_good 1
26 set nb_sol_good 1
27 set nb_compsol_good 0
28 set nb_compound_good 1
29 set nb_shape_good 155
30
31 set 2dviewer 0