Adding test cases
[occt.git] / tests / bugs / modalg_5 / bug23823
1 puts "============"
2 puts "OCC23823"
3 puts "============"
4 puts ""
5 #######################################################################
6 # The result of section operation contains redundant vertex.
7 #######################################################################
8
9 set BugNumber OCC23823
10
11 restore [locate_data_file bug23823_SAS_MAT_rota.brep] b1
12 restore [locate_data_file bug23823_cylindre_ext.brep] b2
13
14 explode b1 f
15 explode b2 f
16
17 copy b1_3 b1
18 copy b2_1 b2
19
20 bop b1 b2
21 bopsection result
22
23 set nb_v_good 2
24 set nb_e_good 1
25 set nb_w_good 0
26 set nb_f_good 0
27 set nb_sh_good 0
28 set nb_sol_good 0
29 set nb_compsol_good 0
30 set nb_compound_good  1
31 set nb_shape_good 4
32
33 set nb_info [nbshapes result]
34
35 set 2dviewer 1