Adding test cases from chl grid
[occt.git] / tests / bugs / modalg / bug15850_4
1 puts "TODO OCC12345 ALL: Error : Result shape is WRONG"
2 puts "============"
3 puts "OCC15850"
4 puts "============"
5 puts ""
6 #######################################################################
7 # Regression in BOP - wrong results for simple shapes with Bspline geometry
8 #######################################################################
9
10 set BugNumber OCC15850
11
12 restore [locate_data_file OCC15850_bb.brep] bb
13 restore [locate_data_file OCC15850_bc.brep] bc
14
15 bop bb bc
16 bopsection result
17
18 set length 37.6991
19 set nb_v_good 4
20 set nb_e_good 4
21 set nb_w_good 0
22 set nb_f_good 0
23 set nb_sh_good 0
24 set nb_sol_good 0
25 set nb_compsol_good 0
26 set nb_compound_good 1
27 set nb_shape_good 9
28
29 regexp {nb alone Vertices +: +([-0-9.+eE]+)} [checksection result] full Vertices
30 set good_Vertices 0
31 if { ${Vertices} != ${good_Vertices} } {
32   puts "Faulty ${BugNumber}"
33 } else {
34   puts "OK ${BugNumber}"
35 }
36
37 set 2dviewer 0
38