Adding test cases from chl grid
[occt.git] / tests / bugs / modalg / bug21722
1 puts "============"
2 puts "OCC21722"
3 puts "============"
4 puts ""
5 #######################################################################
6 # The operation Section produces non-complete result.
7 #######################################################################
8
9 set BugNumber OCC21722
10
11 puts "Load shape ..."
12 restore [locate_data_file OCC21722.brep] g 
13
14 puts "Prepare first shape ..."
15 explode g
16 copy g_1 b1
17
18 puts "Prepare second shape ..."
19 copy g_2 b2
20
21 puts "Prepare boolean operation ..."
22 bop b1 b2
23
24 puts "Start boolean operation ..."
25 bopsection result
26 puts "Finish boolean operation ..."
27
28 set length 1.91376
29
30 set nb_v_good 4
31 set nb_e_good 2
32 set nb_w_good 0
33 set nb_f_good 0
34 set nb_sh_good 0
35 set nb_sol_good 0
36 set nb_compsol_good 0
37 set nb_compound_good 1
38 set nb_shape_good 7
39
40
41 set 2dviewer 0