0024275: Cppcheck warnings on uninitialized class members
[occt.git] / tests / thrusection / specific / G5
CommitLineData
3bea4c16 1puts "============"
2puts "OCC7166"
3puts "============"
4puts ""
5#######################################################################
6# Improvement of API of ThruSection
7#######################################################################
8
9set BugNumber OCC7166
10
11#
12#
13#
14#
15#
16# v22 v21
17# *----------------------*
18# / \
19# / \
20# / v12 v11 \
21# / *---------------------* \
22# / | | \
23# / | | \
24# * v23 | * v3 | v28 *
25# | | | \ | |
26# | | | \ | |
27# | | | \ | |
28# | | | \ | |
29# | | | /* v2 | |
30# | | | / | |
31# | | | / | | * v4, v5
32# | | | / | |
33# | | * | |
34# | | v1 | |
35# | | | |
36# | | | |
37# * v24 | | v27 *
38# \ | | /
39# \ *---------------------* /
40# \ v13 v14 /
41# \ /
42# \ /
43# \ v25 v26 /
44# *----------------------*
45#
46#
47#
48
49set z1 40
50set z2 20
51set z3 0
52set z4 100
53set z5 30
54set z6 10
55
56# begining vertex
57vertex v4 2.5 5 ${z4}
58# ending vertex
59vertex v5 2.5 5 -${z4}
60
61# top triangle
62vertex v1 0 0 ${z1}
63vertex v2 5 5 ${z1}
64vertex v3 0 10 ${z1}
65
66edge e1 v1 v2
67edge e2 v2 v3
68edge e3 v3 v1
69
70wire w1 e1 e2 e3
71
72# top beziercurve
73beziercurve bzc1 5 5 5 ${z5} 5 -5 ${z5} -5 -5 ${z5} -5 5 ${z5} 5 5 ${z5}
74mkedge ebzc1 bzc1
75wire wbzc1 ebzc1
76
77# top quadrangle
78vertex v11 15 15 ${z2}
79vertex v12 -15 15 ${z2}
80vertex v13 -15 -15 ${z2}
81vertex v14 15 -15 ${z2}
82
83edge e11 v11 v12
84edge e12 v12 v13
85edge e13 v13 v14
86edge e14 v14 v11
87
88wire w11 e11 e12 e13 e14
89
90# top pbsplinecurve
91pbsplinecurve pbc1 3 9 0 1 1 1 2 1 3 1 4 1 5 1 6 1 7 1 8 1 -1 0 ${z6} 1 -2 2 ${z6} 1 0 1 ${z6} 1 2 2 ${z6} 1 1 0 ${z6} 1 2 -2 ${z6} 1 0 -1 ${z6} 1 -2 -2 ${z6} 1
92mkedge epbc1 pbc1
93wire wpbc1 epbc1
94
95# octagon
96vertex v21 25 25 ${z3}
97vertex v22 -25 25 ${z3}
98vertex v23 -30 10 ${z3}
99vertex v24 -30 -10 ${z3}
100vertex v25 -25 -25 ${z3}
101vertex v26 25 -25 ${z3}
102vertex v27 30 -10 ${z3}
103vertex v28 30 10 ${z3}
104
105edge e21 v21 v22
106edge e22 v22 v23
107edge e23 v23 v24
108edge e24 v24 v25
109edge e25 v25 v26
110edge e26 v26 v27
111edge e27 v27 v28
112edge e28 v28 v21
113
114wire w21 e21 e22 e23 e24 e25 e26 e27 e28
115
116# bottom pbsplinecurve
117pbsplinecurve pbc2 3 9 0 1 1 1 2 1 3 1 4 1 5 1 6 1 7 1 8 1 -1 0 -${z6} 1 -2 2 -${z6} 1 0 1 -${z6} 1 2 2 -${z6} 1 1 0 -${z6} 1 2 -2 -${z6} 1 0 -1 -${z6} 1 -2 -2 -${z6} 1
118mkedge epbc2 pbc2
119wire wpbc2 epbc2
120
121# bottom quadrangle
122vertex v111 15 15 -${z2}
123vertex v112 -15 15 -${z2}
124vertex v113 -15 -15 -${z2}
125vertex v114 15 -15 -${z2}
126
127edge e111 v111 v112
128edge e112 v112 v113
129edge e113 v113 v114
130edge e114 v114 v111
131
132wire w111 e111 e112 e113 e114
133
134# bottom beziercurve
135beziercurve bzc2 5 5 5 -${z5} 5 -5 -${z5} -5 -5 -${z5} -5 5 -${z5} 5 5 -${z5}
136mkedge ebzc2 bzc2
137wire wbzc2 ebzc2
138
139# bottom triangle
140vertex v101 0 0 -${z1}
141vertex v102 5 5 -${z1}
142vertex v103 0 10 -${z1}
143
144edge e101 v101 v102
145edge e102 v102 v103
146edge e103 v103 v101
147
148wire w101 e101 e102 e103
149
150
151#
152set issolid 0
153set isruled 1
154#thrusections result ${issolid} ${isruled} v4 w1 w11 w21 w111 w101 v5
155thrusections result ${issolid} ${isruled} v4 w1 wbzc1 w11 wpbc1 w21 wpbc2 w111 wbzc2 w101 v5
156
157
158set square 12436.8
159
160set nb_v_good 101
161set nb_e_good 209
162set nb_w_good 110
163set nb_f_good 110
164set nb_sh_good 1
165set nb_sol_good 0
166set nb_compsol_good 0
167set nb_compound_good 0
168set nb_shape_good 531
169
170
171
172set index [lsearch [whatis result] Closed]
173if {$index == -1} {
174 puts "Faulty ${BugNumber} : result is not Closed shape"
175
176}
177
178set 3dviewer 0
179