Adding test cases from chl grid
[occt.git] / tests / bugs / modalg / bug5805_39
1 puts "============"
2 puts "OCC5805"
3 puts "============"
4
5 #######################################################################
6 # BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results.
7 #######################################################################
8
9 set BugNumber OCC5805
10
11 #
12 #                    v12                   v11
13 #                    *---------------------*
14 #                    |                     |
15 #                    |                     |
16 #                    |                     |
17 #                    |                     |
18 #                    |                     |
19 #                    |                     |
20 #                    |                     |
21 #                    |                     |
22 #                    |                     |
23 #                    |                     |
24 #                    *---------------------*
25 #                    v13                   v14
26 #
27
28 set z1 5
29 set z2 -5
30
31 # quadrangle1
32 polyline UpCover 0 0 ${z1} 6 0 ${z1} 6 6 ${z1} 0 6 ${z1} 0 0 ${z1}
33
34 # quadrangle2
35 polyline BottomCover 3 -2 ${z2} 8 3 ${z2} 3 8 ${z2} -2 3 ${z2} 3 -2 ${z2}
36
37 set issolid 1
38 set isruled 1
39 if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] {
40    puts "Faulty ${BugNumber} : thrusections is wrong"
41    
42 }
43
44 set distance -0.5
45 catch { OFFSETSHAPE $distance {s_6} $calcul $type }
46
47
48 set square 524.758
49
50 set nb_v_good 16
51 set nb_e_good 24
52 set nb_w_good 12
53 set nb_f_good 11
54 set nb_sh_good 1
55 set nb_sol_good 1
56 set nb_compsol_good 0
57 set nb_compound_good 0
58 set nb_shape_good 65
59
60
61 set index [lsearch [whatis s] Closed]
62 if {$index == -1} {
63   puts "Faulty ${BugNumber} : s is not Closed shape"
64   
65 }
66
67 set index [lsearch [whatis result] Closed]
68 if {$index == -1} {
69   puts "Faulty ${BugNumber} : result is not Closed shape"
70   
71 }
72
73
74 set 2dviewer 0