103
|
1 <!DOCTYPE html>
|
|
2 <html>
|
|
3 <head>
|
|
4 <meta http-equiv="content-type" content="text/html;charset=utf-8">
|
|
5 <title>メタ計算を用いた Continuation based C の検証手法</title>
|
|
6
|
|
7 <meta name="generator" content="Slide Show (S9) v2.5.0 on Ruby 2.3.3 (2016-11-21) [x86_64-darwin16]">
|
|
8 <meta name="author" content="Yasutaka Higa" >
|
|
9
|
|
10 <!-- style sheet links -->
|
|
11 <link rel="stylesheet" href="s6/themes/screen.css" media="screen">
|
|
12 <link rel="stylesheet" href="s6/themes/print.css" media="print">
|
|
13 <link rel="stylesheet" href="s6/themes/blank.css" media="screen,projection">
|
|
14
|
|
15 <!-- JS -->
|
|
16 <script src="s6/js/jquery-1.11.3.min.js"></script>
|
|
17 <script src="s6/js/jquery.slideshow.js"></script>
|
|
18 <script src="s6/js/jquery.slideshow.counter.js"></script>
|
|
19 <script src="s6/js/jquery.slideshow.controls.js"></script>
|
|
20 <script src="s6/js/jquery.slideshow.footer.js"></script>
|
|
21 <script src="s6/js/jquery.slideshow.autoplay.js"></script>
|
|
22
|
|
23 <!-- prettify -->
|
|
24 <link rel="stylesheet" href="scripts/prettify.css">
|
|
25 <script src="scripts/prettify.js"></script>
|
|
26
|
|
27 <style>
|
|
28 .slide {page-break-after: always;}
|
|
29 </style>
|
|
30
|
|
31
|
|
32
|
|
33
|
|
34 </head>
|
|
35 <body>
|
|
36
|
|
37 <div class="layout">
|
|
38 <div id="header"></div>
|
|
39 <div id="footer">
|
|
40 <div align="right">
|
|
41 <img src="s6/images/logo.svg" width="200px">
|
|
42 </div>
|
|
43 </div>
|
|
44 </div>
|
|
45
|
|
46 <div class="presentation">
|
|
47
|
|
48 <div class='slide cover'>
|
|
49 <table width="90%" height="90%" border="0" align="center">
|
|
50 <tr>
|
|
51 <td>
|
|
52 <div align="center">
|
|
53 <h1><font color="#808db5">メタ計算を用いた Continuation based C の検証手法</font></h1>
|
|
54 </div>
|
|
55 </td>
|
|
56 </tr>
|
|
57 <tr>
|
|
58 <td>
|
|
59 <div align="left">
|
|
60 Yasutaka Higa
|
|
61
|
|
62 <hr style="color:#ffcc00;background-color:#ffcc00;text-align:left;border:none;width:100%;height:0.2em;">
|
|
63 </div>
|
|
64 </td>
|
|
65 </tr>
|
|
66 </table>
|
|
67 </div>
|
|
68
|
|
69 <div class='slide '>
|
|
70 <!-- === begin markdown block ===
|
|
71
|
|
72 generated by markdown/1.2.0 on Ruby 2.3.3 (2016-11-21) [x86_64-darwin16]
|
115
|
73 on 2017-02-13 17:14:46 +0900 with Markdown engine kramdown (1.13.0)
|
103
|
74 using options {}
|
|
75 -->
|
|
76
|
|
77 <!-- _S9SLIDE_ -->
|
|
78 <h1 id="section">プログラミング言語とソフトウェアの信頼性</h1>
|
|
79 <ul>
|
|
80 <li>信頼性の高いソフトウェアを提供したい</li>
|
|
81 <li>ソフトウェアの仕様を検証するには二つの手法がある
|
|
82 <ul>
|
|
83 <li>プログラムの持つ状態を数え上げ、仕様から外れた状態が無いかを確認するモデル検査</li>
|
|
84 <li>プログラムの性質を直接証明してしまう定理証明</li>
|
|
85 </ul>
|
|
86 </li>
|
|
87 <li>モデル検査も証明も行ないやすい言語として Continuation based C 言語を開発している</li>
|
|
88 </ul>
|
|
89
|
|
90
|
|
91 </div>
|
|
92 <div class='slide '>
|
|
93 <!-- _S9SLIDE_ -->
|
|
94 <h1 id="section-1">二つのアプローチを用いたソフトウェア検証</h1>
|
|
95 <ul>
|
|
96 <li>モデル検査的アプローチ
|
|
97 <ul>
|
|
98 <li>メタ計算ライブラリ akasha による網羅的な実行</li>
|
|
99 <li>非破壊赤黒木の仕様定義と検証</li>
|
|
100 </ul>
|
|
101 </li>
|
|
102 <li>定理証明的なアプローチ
|
|
103 <ul>
|
|
104 <li>依存型を持つ証明支援系言語 Agda による CbC の証明</li>
|
|
105 <li>部分型を利用して Agda 上に型付きの CbC の項を記述する</li>
|
|
106 <li>型システムを通して CbC の形式的な定義を得る</li>
|
|
107 <li>SingleLinkedStack の性質の証明</li>
|
|
108 </ul>
|
|
109 </li>
|
|
110 </ul>
|
|
111
|
|
112
|
|
113 </div>
|
|
114 <div class='slide '>
|
|
115 <!-- _S9SLIDE_ -->
|
114
|
116 <h1 id="section-2">モデル検査的アプローチについての流れ</h1>
|
|
117 <ul>
|
|
118 <li>Continuation based C (CbC) 言語について</li>
|
|
119 <li>CbC における CodeSegment と DataSegment を用いたプログラミングスタイル</li>
|
|
120 <li>CbC とメタ計算について</li>
|
|
121 <li>CbC で記述された GearsOS とそのデータ構造である赤黒木</li>
|
|
122 <li>赤黒木の仕様の定義とその検証手法</li>
|
|
123 </ul>
|
|
124
|
|
125
|
|
126 </div>
|
|
127 <div class='slide '>
|
|
128 <!-- _S9SLIDE_ -->
|
103
|
129 <h1 id="continuation-based-c">Continuation based C</h1>
|
|
130 <ul>
|
|
131 <li>当研究室で開発しているプログラミング言語</li>
|
|
132 <li>アセンブラとC言語の中間のような言語であり、構文はほとんど C 言語</li>
|
|
133 <li>OS や組み込みソフトウェアなどを対象にしている</li>
|
|
134 <li>CodeSegment と DataSegment という単位を用いてプログラミングする</li>
|
114
|
135 <li>両検証手法をメタ計算として利用可能</li>
|
103
|
136 </ul>
|
|
137
|
|
138
|
|
139 </div>
|
|
140 <div class='slide '>
|
|
141 <!-- _S9SLIDE_ -->
|
|
142 <h1 id="codesegment">CodeSegment</h1>
|
|
143 <ul>
|
|
144 <li>CodeSegment とは
|
|
145 <ul>
|
|
146 <li>処理の単位</li>
|
|
147 <li>結合や分割が容易</li>
|
|
148 <li>入力と出力を持つ</li>
|
|
149 </ul>
|
|
150 </li>
|
|
151 <li>CodeSegment どうしを接続することによりプログラム全体を作る</li>
|
|
152 </ul>
|
|
153
|
114
|
154 <p><img src="./images/goto.svg" alt="goto" width="50%" /></p>
|
|
155
|
103
|
156
|
|
157 </div>
|
|
158 <div class='slide '>
|
|
159 <!-- _S9SLIDE_ -->
|
|
160 <h1 id="datasegment">DataSegment</h1>
|
|
161 <ul>
|
|
162 <li>DataSegment とは
|
|
163 <ul>
|
|
164 <li>データの単位</li>
|
|
165 <li>CodeSegment の入出力にあたる</li>
|
|
166 <li>接続元の Output DataSegment は接続先の Input DataSegment</li>
|
|
167 </ul>
|
|
168 </li>
|
|
169 </ul>
|
|
170
|
114
|
171 <p><img src="./images/csds.svg" alt="csds" width="50%" /></p>
|
|
172
|
103
|
173
|
|
174 </div>
|
|
175 <div class='slide '>
|
|
176 <!-- _S9SLIDE_ -->
|
114
|
177 <h1 id="section-3">メタ計算</h1>
|
103
|
178 <ul>
|
|
179 <li>とある計算を実現するための計算</li>
|
|
180 <li>ネットワーク接続、例外処理、メモリ確保、並列処理など</li>
|
|
181 <li>CbC は通常レベルの計算とメタ計算を分離して考える
|
|
182 <ul>
|
|
183 <li>通常レベルではポインタは出てこない、など</li>
|
|
184 </ul>
|
|
185 </li>
|
114
|
186 <li>CodeSegment の接続部分に処理を追加することで実現</li>
|
103
|
187 </ul>
|
|
188
|
114
|
189 <p><img src="./images/meta.svg" alt="meta" width="50%" /></p>
|
|
190
|
103
|
191
|
|
192 </div>
|
|
193 <div class='slide '>
|
|
194 <!-- _S9SLIDE_ -->
|
|
195 <h1 id="meta-codesegment">Meta CodeSegment</h1>
|
|
196 <ul>
|
|
197 <li>メタ計算を行なう CodeSegment</li>
|
|
198 <li>通常の CodeSegment どうしの接続の間に入る</li>
|
|
199 <li>TODO: 図</li>
|
|
200 </ul>
|
|
201
|
|
202
|
|
203 </div>
|
|
204 <div class='slide '>
|
|
205 <!-- _S9SLIDE_ -->
|
|
206 <h1 id="meta-datasegment">Meta DataSegment</h1>
|
|
207 <ul>
|
|
208 <li>メタ計算用の DataSegment</li>
|
|
209 <li>通常の DataSegment を含むような DataSegment</li>
|
|
210 <li>TODO: 図</li>
|
|
211 </ul>
|
|
212
|
|
213
|
|
214 </div>
|
|
215 <div class='slide '>
|
|
216 <!-- _S9SLIDE_ -->
|
|
217 <h1 id="gearsos">並列に信頼性高く動作する GearsOS</h1>
|
|
218 <ul>
|
|
219 <li>CbC を用いたメタ計算の例として本研究室で開発している GearsOS がある</li>
|
|
220 <li>並列実行やモデル検査をメタ計算として提供する</li>
|
|
221 <li>現在はメモリ管理、Synchronized Queue、非破壊赤黒木などが実装済み</li>
|
|
222 <li>今回はこの非破壊赤黒木の検証を行なう</li>
|
|
223 </ul>
|
|
224
|
|
225
|
|
226 </div>
|
|
227 <div class='slide '>
|
|
228 <!-- _S9SLIDE_ -->
|
114
|
229 <h1 id="section-4">赤黒木</h1>
|
103
|
230 <ul>
|
|
231 <li>データの保存に用いる二分木</li>
|
|
232 <li>特に赤黒木はノードが持つ赤か黒の色を使って木のバランスを取る
|
|
233 <ul>
|
|
234 <li>ルートノードと葉ノードの色は黒</li>
|
|
235 <li>赤ノードは2つの黒ノードを子として持つ(よって赤ノードが続くことは無い)</li>
|
|
236 <li>ルートから最下位ノードへの経路に含まれる黒ノードの数はどの最下位ノードでも一定</li>
|
|
237 </ul>
|
|
238 </li>
|
|
239 <li>TODO: 図</li>
|
|
240 </ul>
|
|
241
|
|
242
|
|
243 </div>
|
|
244 <div class='slide '>
|
|
245 <!-- _S9SLIDE_ -->
|
|
246 <h1 id="gearsos-">GearsOS における赤黒木の利用例(ノードの挿入)</h1>
|
|
247 <ul>
|
|
248 <li>挿入したい要素を DataSegment に格納して次の CodeSegment へ goto</li>
|
|
249 <li>goto する前に Meta CodeSegment が実行されて木に挿入する</li>
|
|
250 <li>GearsOS では木の実装のためにスタックを用いて経路情報を保持している</li>
|
|
251 </ul>
|
|
252
|
114
|
253 <p><img src="./images/put.svg" alt="put" width="50%" /></p>
|
|
254
|
103
|
255
|
|
256 </div>
|
|
257 <div class='slide '>
|
|
258 <!-- _S9SLIDE_ -->
|
114
|
259 <h1 id="section-5">仕様の記述とその確認</h1>
|
103
|
260 <ul>
|
|
261 <li>「バランスが取れている」とは何かを表現できる必要がある
|
|
262 <ul>
|
|
263 <li>実行可能な CbC の式を使った assert になる</li>
|
|
264 </ul>
|
|
265 </li>
|
|
266 <li>そしてそれを保証したい
|
|
267 <ul>
|
|
268 <li>プログラムの全ての状態においてこれは常に成り立つのか?</li>
|
|
269 </ul>
|
|
270 </li>
|
|
271 </ul>
|
|
272
|
|
273
|
|
274 </div>
|
|
275 <div class='slide '>
|
|
276 <!-- _S9SLIDE_ -->
|
|
277 <h1 id="spin">既存のモデル検査器 spin</h1>
|
|
278 <ul>
|
|
279 <li>spin
|
|
280 <ul>
|
|
281 <li>promela と呼ばれる言語でプログラムを記述</li>
|
|
282 <li>並列に動作するプログラムの仕様を検証可能</li>
|
|
283 <li>検証した promela から実行可能な C ソースを生成可能</li>
|
|
284 <li>仕様は bool になる式を用いた assert</li>
|
|
285 <li>promela は C とは記述が異なる</li>
|
|
286 </ul>
|
|
287 </li>
|
|
288 </ul>
|
|
289
|
|
290
|
|
291 </div>
|
|
292 <div class='slide '>
|
|
293 <!-- _S9SLIDE_ -->
|
|
294 <h1 id="cbmc">既存のモデル検査器 CBMC</h1>
|
|
295 <ul>
|
|
296 <li>CBMC
|
|
297 <ul>
|
|
298 <li>検証対象のCソースを変更しないでも良い</li>
|
|
299 <li>C/C++ 言語の記号実行が可能
|
|
300 <ul>
|
|
301 <li>条件分岐を網羅的に実行</li>
|
|
302 </ul>
|
|
303 </li>
|
|
304 <li>仕様は bool になる式を用いた assert</li>
|
|
305 <li>有限ステップ検証する有界モデル検査器</li>
|
|
306 </ul>
|
|
307 </li>
|
|
308 </ul>
|
|
309
|
|
310
|
|
311 </div>
|
|
312 <div class='slide '>
|
|
313 <!-- _S9SLIDE_ -->
|
|
314 <h1 id="akasha">メタ計算ライブラリ akasha</h1>
|
|
315 <ul>
|
114
|
316 <li>メタ計算としてプログラムの状態を数え上げる
|
|
317 <ul>
|
|
318 <li>goto された時に挿入される要素の組み合わせを全て列挙して実行する</li>
|
|
319 <li>その度に仕様の式は成り立つかをチェックする</li>
|
|
320 </ul>
|
|
321 </li>
|
|
322 <li>ノーマルレベルのコードを検証用に変更せず検証可能</li>
|
103
|
323 </ul>
|
|
324
|
115
|
325 <p><img src="./images/akashaPut.svg" alt="akashaPut" width="51%" /></p>
|
114
|
326
|
103
|
327
|
|
328 </div>
|
|
329 <div class='slide '>
|
|
330 <!-- _S9SLIDE_ -->
|
114
|
331 <h1 id="section-6">チェックする仕様</h1>
|
103
|
332 <ul>
|
114
|
333 <li>赤黒木のの高さに関する仕様に以下のものがある
|
|
334 <ul>
|
|
335 <li>木をルートから辿った際に最も長い経路は最も短い経路の高々2倍に収まる</li>
|
|
336 </ul>
|
|
337 </li>
|
|
338 <li>以下のように assert を用いて CbC で定義できる</li>
|
|
339 <li>この仕様が満たされるかをチェックする</li>
|
103
|
340 </ul>
|
|
341
|
114
|
342 <pre><code>void verifySpecification(struct Context* context, struct Tree* tree) {
|
|
343 assert(!(maxHeight(tree->root, 1) > 2*minHeight(tree->root, 1)));
|
|
344 goto meta(context, EnumerateInputs);
|
|
345 }
|
|
346 </code></pre>
|
|
347
|
103
|
348
|
|
349 </div>
|
|
350 <div class='slide '>
|
|
351 <!-- _S9SLIDE_ -->
|
|
352 <h1 id="akasha--cbmc-">akasha と CBMC の比較</h1>
|
|
353 <ul>
|
|
354 <li>akasha は有限の要素数の組み合わせをチェックする
|
|
355 <ul>
|
|
356 <li>要素数が13個までならどの順で木に挿入しても良い</li>
|
|
357 </ul>
|
|
358 </li>
|
|
359 <li>比較対象として C Bounded Model Checker を使用した
|
|
360 <ul>
|
|
361 <li>C/C++ の記号実行を行なう</li>
|
|
362 <li>実行可能なステップ数411だけ展開しても仕様は満たされる</li>
|
|
363 <li>が、恣意的にバグを入れ込んでも反例を返さない</li>
|
|
364 <li>akasha は返した</li>
|
|
365 </ul>
|
|
366 </li>
|
|
367 <li>固定の要素数までの仕様検査で十分なのか?</li>
|
|
368 </ul>
|
|
369
|
|
370
|
|
371 </div>
|
|
372 <div class='slide '>
|
|
373 <!-- _S9SLIDE_ -->
|
114
|
374 <h1 id="section-7">定理証明的なアプローチの流れ</h1>
|
|
375 <ul>
|
|
376 <li>プログラムを証明するにはどうするのか</li>
|
|
377 <li>証明支援系 Agda における証明</li>
|
|
378 <li>Agda による CbC の定義</li>
|
|
379 <li>Agda を用いて CbC のコードを証明する</li>
|
|
380 </ul>
|
|
381
|
|
382
|
|
383 </div>
|
|
384 <div class='slide '>
|
|
385 <!-- _S9SLIDE_ -->
|
|
386 <h1 id="continuation-based-c-">定理証明を Continuation based C へ適用するには</h1>
|
103
|
387 <ul>
|
|
388 <li>任意の回数だけ木の操作を行なっても大丈夫なことを保証したい</li>
|
|
389 <li>そのままプログラムの性質を保証してやる</li>
|
114
|
390 <li>Coq, Agda, ATS2 などのプログラミング言語で証明が可能
|
103
|
391 <ul>
|
114
|
392 <li>本当は CbC で CbC 自身を証明したい</li>
|
|
393 <li>しかし CbC の形式的な定義が無いために今はできない</li>
|
103
|
394 </ul>
|
|
395 </li>
|
114
|
396 <li>Agda 上に CbC を定義することで形式的な定義を得る</li>
|
103
|
397 </ul>
|
|
398
|
|
399
|
|
400 </div>
|
|
401 <div class='slide '>
|
|
402 <!-- _S9SLIDE_ -->
|
114
|
403 <h1 id="agda--datasegment">Agda と DataSegment</h1>
|
103
|
404 <ul>
|
114
|
405 <li>CbC の DataSegment は Agda のレコード型</li>
|
103
|
406 </ul>
|
|
407
|
114
|
408 <pre><code>__code cs0(int a, int b){
|
|
409 goto cs1(a+b);
|
|
410 }
|
|
411 </code></pre>
|
|
412 <pre><code>record ds0 : Set where
|
|
413 field
|
|
414 a : Int
|
|
415 b : Int
|
|
416 </code></pre>
|
|
417
|
103
|
418
|
|
419 </div>
|
|
420 <div class='slide '>
|
|
421 <!-- _S9SLIDE_ -->
|
114
|
422 <h1 id="agda--codesegment">Agda と CodeSegment</h1>
|
103
|
423 <ul>
|
114
|
424 <li>CbC の CodeSegment は、Agda の関数型(Input を取って Output を返す)</li>
|
|
425 </ul>
|
|
426
|
|
427 <pre><code>__code cs0(int a, int b){
|
|
428 goto cs1(a+b);
|
|
429 }
|
|
430 </code></pre>
|
|
431 <pre><code>cs0 : CodeSegment ds0 ds1
|
|
432 cs0 = cs (\d -> goto cs1 (record {c = (ds0.a d) + (ds0.b d)}))
|
|
433 </code></pre>
|
|
434
|
|
435
|
|
436 </div>
|
|
437 <div class='slide '>
|
|
438 <!-- _S9SLIDE_ -->
|
|
439 <h1 id="section-8">メタレベルの型付け</h1>
|
|
440 <ul>
|
|
441 <li>メタ計算とは通常のレベルとは区別された計算</li>
|
|
442 <li>任意の通常のレベルの計算を扱えなくてはならない
|
103
|
443 <ul>
|
114
|
444 <li>ライブラリが呼び出されるプログラムは無数にあるようなイメージ</li>
|
103
|
445 </ul>
|
|
446 </li>
|
114
|
447 <li>メタレベルを使うための制約を満たしていれば良い、ということを表現できれば良い</li>
|
|
448 <li>部分型を使う
|
103
|
449 <ul>
|
114
|
450 <li>Java におけるインターフェース、Haskell における型クラス</li>
|
|
451 <li>「このデータにはこのフィールドさえあれば良い」</li>
|
103
|
452 </ul>
|
|
453 </li>
|
|
454 </ul>
|
|
455
|
|
456
|
|
457 </div>
|
|
458 <div class='slide '>
|
|
459 <!-- _S9SLIDE_ -->
|
114
|
460 <h1 id="agda-">Agda 上のメタ計算</h1>
|
103
|
461 <ul>
|
114
|
462 <li>ノーマルレベルの型を保持したままメタレベルの計算を利用できる
|
103
|
463 <ul>
|
115
|
464 <li>cs0 の定義はメタ計算用に変更しなくても良い</li>
|
103
|
465 </ul>
|
|
466 </li>
|
|
467 </ul>
|
|
468
|
115
|
469 <pre><code>main : ds1
|
|
470 main = goto cs0 (record {a = 100 ; b = 50})
|
|
471 </code></pre>
|
|
472 <pre><code>main : Meta
|
|
473 main = gotoMeta push cs0 (record {context = (record {a = 100 ; b = 50 ; c = 70}) ; c' = 0 ; next = (N.cs id)})
|
|
474 </code></pre>
|
|
475
|
103
|
476
|
|
477 </div>
|
|
478 <div class='slide '>
|
|
479 <!-- _S9SLIDE_ -->
|
114
|
480 <h1 id="agda--cbc-">Agda 上に CbC を記述した成果</h1>
|
103
|
481 <ul>
|
114
|
482 <li>部分型で CbC の型付けができた</li>
|
|
483 <li>メタ計算をきちんと階層化できた
|
103
|
484 <ul>
|
114
|
485 <li>メタ計算にもメタ計算が適用可能</li>
|
103
|
486 </ul>
|
|
487 </li>
|
114
|
488 <li>赤黒木で利用しているデータ構造スタックの性質を証明できた
|
103
|
489 <ul>
|
114
|
490 <li>任意の回数だけ値を積んで同じだけ取り出すとスタックは変化しない</li>
|
103
|
491 </ul>
|
|
492 </li>
|
|
493 </ul>
|
|
494
|
|
495
|
|
496 </div>
|
|
497 <div class='slide '>
|
|
498 <!-- _S9SLIDE_ -->
|
114
|
499 <h1 id="section-9">まとめ</h1>
|
103
|
500 <ul>
|
|
501 <li>Continuation based C 言語を対象にした二種類の検証アプローチ</li>
|
|
502 <li>モデル検査的なアプローチ
|
|
503 <ul>
|
|
504 <li>継続を上書きして可能な状態を数え上げるメタ計算ライブラリ akasha を実装</li>
|
|
505 <li>有限の要素数まで保証できた</li>
|
|
506 </ul>
|
|
507 </li>
|
|
508 <li>証明的なアプローチ
|
|
509 <ul>
|
|
510 <li>証明支援系 Agda 上で CbC のプログラムを定義して直接証明</li>
|
|
511 <li>部分型を利用して CbC を型付け</li>
|
|
512 <li>データ構造 SingleLinkedStack の証明ができた</li>
|
|
513 </ul>
|
|
514 </li>
|
|
515 </ul>
|
|
516
|
|
517
|
|
518 </div>
|
|
519 <div class='slide '>
|
|
520 <!-- _S9SLIDE_ -->
|
114
|
521 <h1 id="section-10">今後の課題</h1>
|
103
|
522 <ul>
|
|
523 <li>部分型を利用してCbCを型付け</li>
|
|
524 <li>依存型をCbC に導入して自身を証明可能にする</li>
|
|
525 <li>型情報から stub を自動生成すkる</li>
|
114
|
526 <li>赤黒木の挿入に関する性質を証明する</li>
|
103
|
527 </ul>
|
|
528
|
|
529 <!-- vim: set filetype=markdown.slide: -->
|
|
530
|
|
531 <!-- === end markdown block === -->
|
|
532 </div>
|
|
533
|
|
534
|
|
535 </div><!-- presentation -->
|
|
536 </body>
|
|
537 </html>
|