annotate presentation/slide.html @ 120:8a84cda440f3

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