| author | Christian Urban <urbanc@in.tum.de> | 
| Wed, 16 Oct 2019 23:45:46 +0100 | |
| changeset 660 | 7ef4d9a2676a | 
| parent 581 | 4782a4bfc888 | 
| child 661 | 32fd8125f56e | 
| permissions | -rw-r--r-- | 
| 33 | 1 | \documentclass[dvipsnames,14pt,t]{beamer}
 | 
| 270 
4dbeaf43031d
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
265diff
changeset | 2 | \usepackage{../slides}
 | 
| 
4dbeaf43031d
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
265diff
changeset | 3 | \usepackage{../graphics}
 | 
| 215 
828303e8e4af
updated slides
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
145diff
changeset | 4 | \usepackage{../langs}
 | 
| 
828303e8e4af
updated slides
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
145diff
changeset | 5 | \usepackage{../data}
 | 
| 33 | 6 | |
| 270 
4dbeaf43031d
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
265diff
changeset | 7 | \hfuzz=220pt | 
| 
4dbeaf43031d
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
265diff
changeset | 8 | |
| 
4dbeaf43031d
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
265diff
changeset | 9 | \pgfplotsset{compat=1.11}
 | 
| 145 
920f675b4ed1
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
144diff
changeset | 10 | |
| 270 
4dbeaf43031d
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
265diff
changeset | 11 | \newcommand{\bl}[1]{\textcolor{blue}{#1}}  
 | 
| 33 | 12 | |
| 445 | 13 | \renewcommand{\slidecaption}{CFL 04, King's College London}
 | 
| 33 | 14 | |
| 15 | \begin{document}
 | |
| 16 | ||
| 17 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | |
| 270 
4dbeaf43031d
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
265diff
changeset | 18 | \begin{frame}[t]
 | 
| 33 | 19 | \frametitle{%
 | 
| 20 |   \begin{tabular}{@ {}c@ {}}
 | |
| 21 | \\[-3mm] | |
| 445 | 22 | \LARGE Compilers and \\[-2mm] | 
| 33 | 23 | \LARGE Formal Languages (4)\\[3mm] | 
| 24 |   \end{tabular}}
 | |
| 25 | ||
| 26 | \normalsize | |
| 27 |   \begin{center}
 | |
| 28 |   \begin{tabular}{ll}
 | |
| 660 | 29 | Email: & christian.urban at kcl.ac.uk\\ | 
| 30 | Office Hours: & Thursdays 12 -- 14\\ | |
| 31 | Location: & N7.07 (North Wing, Bush House)\\ | |
| 32 | Slides \& Progs: & KEATS (also homework is there)\\ | |
| 33 | 33 |   \end{tabular}
 | 
| 34 |   \end{center}
 | |
| 660 | 35 | |
| 270 
4dbeaf43031d
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
265diff
changeset | 36 | \end{frame}
 | 
| 574 | 37 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 38 | ||
| 39 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | |
| 40 | \begin{frame}[c]
 | |
| 41 | ||
| 578 | 42 | \begin{center}
 | 
| 43 | \begin{tikzpicture}[scale=2,>=stealth',very thick,
 | |
| 44 |                              every state/.style={minimum size=0pt,draw=blue!50,very thick,fill=blue!20},]
 | |
| 45 |   \only<-7>{\node[state, initial] (q0) at ( 0,1) {$\mbox{Q}_0$};}
 | |
| 46 |   \only<8->{\node[state, initial,accepting] (q0) at ( 0,1) {$\mbox{Q}_0$};}                           
 | |
| 47 |   \only<-7>{\node[state] (q1) at ( 1,1) {$\mbox{Q}_1$};}
 | |
| 48 |   \only<8->{\node[state,accepting] (q1) at ( 1,1) {$\mbox{Q}_1$};}
 | |
| 49 |   \node[state] (q2) at ( 2,1) {$\mbox{Q}_2$};
 | |
| 50 |   \path[->] (q0) edge[bend left] node[above] {\alert{$a$}} (q1)
 | |
| 51 |                   (q1) edge[bend left] node[above] {\alert{$b$}} (q0)
 | |
| 52 |                   (q2) edge[bend left=50] node[below] {\alert{$b$}} (q0)
 | |
| 53 |                   (q1) edge node[above] {\alert{$a$}} (q2)
 | |
| 54 |                   (q2) edge [loop right] node {\alert{$a$}} ()
 | |
| 55 |                   (q0) edge [loop below] node {\alert{$b$}} ()
 | |
| 56 | ; | |
| 57 | \end{tikzpicture}
 | |
| 58 | \end{center}\bigskip
 | |
| 574 | 59 | |
| 578 | 60 | \begin{center}
 | 
| 61 | \begin{tabular}{r@ {\hspace{2mm}}c@ {\hspace{2mm}}l}
 | |
| 62 | \bl{$\mbox{Q}_0$} & \bl{$=$} & \bl{$\ONE + \mbox{Q}_0\,b + \mbox{Q}_1\,b +  \mbox{Q}_2\,b$}\\
 | |
| 63 | \bl{$\mbox{Q}_1$} & \bl{$=$} & \bl{$\mbox{Q}_0\,a$}\\
 | |
| 64 | \bl{$\mbox{Q}_2$} & \bl{$=$} & \bl{$\mbox{Q}_1\,a + \mbox{Q}_2\,a$}\\
 | |
| 65 | \end{tabular}
 | |
| 66 | \end{center}
 | |
| 67 | ||
| 68 | ||
| 69 | Arden's Lemma: | |
| 70 | \begin{center}
 | |
| 71 | If \bl{$q = q\,r + s$}\; then\; \bl{$q = s\, r^*$}
 | |
| 72 | \end{center}
 | |
| 73 | ||
| 74 | \only<2-6>{\small
 | |
| 75 | \begin{textblock}{6}(1,0.8)
 | |
| 76 | \begin{bubble}[6.7cm]
 | |
| 77 | \begin{tabular}{r@ {\hspace{1mm}}c@ {\hspace{1mm}}l}
 | |
| 579 | 78 | \multicolumn{3}{@{}l}{substitute \bl{$\mbox{Q}_1$} into \bl{$\mbox{Q}_0$} \& \bl{$\mbox{Q}_2$}:}\\    
 | 
| 578 | 79 | \bl{$\mbox{Q}_0$} & \bl{$=$} & \bl{$\ONE + \mbox{Q}_0\,b + \mbox{Q}_0\,a\,b +  \mbox{Q}_2\,b$}\\
 | 
| 80 | \bl{$\mbox{Q}_2$} & \bl{$=$} & \bl{$\mbox{Q}_0\,a\,a + \mbox{Q}_2\,a$}
 | |
| 81 | \end{tabular}
 | |
| 82 | \end{bubble}
 | |
| 83 | \end{textblock}}
 | |
| 84 | ||
| 85 | \only<3-6>{\small
 | |
| 86 | \begin{textblock}{6}(2,4.15)
 | |
| 87 | \begin{bubble}[6.7cm]
 | |
| 88 | \begin{tabular}{r@ {\hspace{1mm}}c@ {\hspace{1mm}}l}
 | |
| 89 | \multicolumn{3}{@{}l}{simplifying \bl{$\mbox{Q}_0$}:}\\    
 | |
| 90 | \bl{$\mbox{Q}_0$} & \bl{$=$} & \bl{$\ONE + \mbox{Q}_0\,(b + a\,b) + \mbox{Q}_2\,b$}\\
 | |
| 91 | \bl{$\mbox{Q}_2$} & \bl{$=$} & \bl{$\mbox{Q}_0\,a\,a + \mbox{Q}_2\,a$}
 | |
| 92 | \end{tabular}
 | |
| 93 | \end{bubble}
 | |
| 94 | \end{textblock}}
 | |
| 574 | 95 | |
| 578 | 96 | \only<4-6>{\small
 | 
| 97 | \begin{textblock}{6}(3,7.55)
 | |
| 98 | \begin{bubble}[6.7cm]
 | |
| 99 | \begin{tabular}{r@ {\hspace{1mm}}c@ {\hspace{1mm}}l}
 | |
| 100 |   \multicolumn{3}{@{}l}{Arden for \bl{$\mbox{Q}_2$}:}\\    
 | |
| 101 | \bl{$\mbox{Q}_0$} & \bl{$=$} & \bl{$\ONE + \mbox{Q}_0\,(b + a\,b) + \mbox{Q}_2\,b$}\\
 | |
| 102 | \bl{$\mbox{Q}_2$} & \bl{$=$} & \bl{$\mbox{Q}_0\,a\,a\,(a^*)$}
 | |
| 103 | \end{tabular}
 | |
| 104 | \end{bubble}
 | |
| 105 | \end{textblock}}
 | |
| 106 | ||
| 107 | \only<5-6>{\small
 | |
| 108 | \begin{textblock}{6}(4,10.9)
 | |
| 109 | \begin{bubble}[7.5cm]
 | |
| 110 | \begin{tabular}{r@ {\hspace{1mm}}c@ {\hspace{1mm}}l}
 | |
| 111 |   \multicolumn{3}{@{}l}{Substitute \bl{$\mbox{Q}_2$} and simplify:}\\    
 | |
| 112 | \bl{$\mbox{Q}_0$} & \bl{$=$} & \bl{$\ONE + \mbox{Q}_0\,(b + a\,b + a\,a\,(a^*)\,b)$}\\
 | |
| 113 | \end{tabular}
 | |
| 114 | \end{bubble}
 | |
| 115 | \end{textblock}}
 | |
| 116 | ||
| 117 | \only<6>{\small
 | |
| 118 | \begin{textblock}{6}(5,13.4)
 | |
| 119 | \begin{bubble}[7.5cm]
 | |
| 120 | \begin{tabular}{r@ {\hspace{1mm}}c@ {\hspace{1mm}}l}
 | |
| 121 |   \multicolumn{3}{@{}l}{Arden again for \bl{$\mbox{Q}_0$}:}\\    
 | |
| 122 | \bl{$\mbox{Q}_0$} & \bl{$=$} & \bl{$(b + a\,b + a\,a\,(a^*)\,b)^*$}\\
 | |
| 123 | \end{tabular}
 | |
| 124 | \end{bubble}
 | |
| 125 | \end{textblock}}
 | |
| 126 | ||
| 127 | ||
| 128 | \only<7->{\small
 | |
| 129 | \begin{textblock}{6}(6,11.5)
 | |
| 130 | \begin{bubble}[6.7cm]
 | |
| 131 | \begin{tabular}{r@ {\hspace{1mm}}c@ {\hspace{1mm}}l}
 | |
| 132 | \multicolumn{3}{@{}l}{Finally:}\\    
 | |
| 133 | \bl{$\mbox{Q}_0$} & \bl{$=$} & \bl{$(b + a\,b + a\,a\,(a^*)\,b)^*$}\\
 | |
| 134 | \bl{$\mbox{Q}_1$} & \bl{$=$} & \bl{$(b + a\,b + a\,a\,(a^*)\,b)^*\,a$}\\
 | |
| 135 | \bl{$\mbox{Q}_2$} & \bl{$=$} & \bl{$(b + a\,b + a\,a\,(a^*)\,b)^*\,a\,a\,(a^*)$}\\
 | |
| 136 | \end{tabular}
 | |
| 137 | \end{bubble}
 | |
| 138 | \end{textblock}}
 | |
| 139 | ||
| 574 | 140 | \end{frame}
 | 
| 141 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | |
| 142 | ||
| 139 
6e7c3db9023d
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
93diff
changeset | 143 | |
| 
6e7c3db9023d
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
93diff
changeset | 144 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 144 
0cb61bed557d
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
142diff
changeset | 145 | \begin{frame}[c]
 | 
| 
0cb61bed557d
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
142diff
changeset | 146 | \frametitle{Regexps and Automata}
 | 
| 
0cb61bed557d
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
142diff
changeset | 147 | |
| 
0cb61bed557d
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
142diff
changeset | 148 | \begin{center}
 | 
| 
0cb61bed557d
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
142diff
changeset | 149 | \begin{tikzpicture}
 | 
| 
0cb61bed557d
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
142diff
changeset | 150 | \node (rexp)  {\bl{\bf Regexps}};
 | 
| 
0cb61bed557d
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
142diff
changeset | 151 | \node (nfa) [right=of rexp] {\bl{\bf NFAs}};
 | 
| 
0cb61bed557d
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
142diff
changeset | 152 | \node (dfa) [right=of nfa] {\bl{\bf DFAs}};
 | 
| 272 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 153 | \node (mdfa) [right=of dfa] {\bl{\bf \begin{tabular}{c}minimal\\ DFAs\end{tabular}}};
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 154 | \path[->,red, line width=2mm] (rexp) edge node [above=4mm, black] | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 155 |      {\begin{tabular}{c@{\hspace{9mm}}}Thompson's\\[-1mm] construction\end{tabular}} (nfa);
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 156 | \path[->,red, line width=2mm] (nfa) edge node [above=4mm, black] | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 157 |      {\begin{tabular}{c}subset\\[-1mm] construction\end{tabular}}(dfa);
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 158 | \path[->, red, line width=2mm] (dfa) edge node [below=5mm, black] {minimisation} (mdfa);
 | 
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 159 | %%\path[->, red, line width=2mm] (dfa) edge [bend left=45] (rexp); | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 160 | \path[->, red, line width=2mm] (dfa) edge [bend left=45] node [below, black] {\begin{tabular}{l}Brzozowski's\\ method\end{tabular}} (rexp);
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 161 | |
| 144 
0cb61bed557d
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
142diff
changeset | 162 | \end{tikzpicture}\\
 | 
| 
0cb61bed557d
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
142diff
changeset | 163 | \end{center}
 | 
| 
0cb61bed557d
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
142diff
changeset | 164 | |
| 270 
4dbeaf43031d
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
265diff
changeset | 165 | \end{frame}
 | 
| 145 
920f675b4ed1
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
144diff
changeset | 166 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
920f675b4ed1
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
144diff
changeset | 167 | |
| 
920f675b4ed1
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
144diff
changeset | 168 | |
| 
920f675b4ed1
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
144diff
changeset | 169 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
920f675b4ed1
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
144diff
changeset | 170 | \begin{frame}[t]
 | 
| 445 | 171 | \frametitle{\bl{$a^{?\{n\}} \cdot a^{\{n\}}$}}
 | 
| 145 
920f675b4ed1
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
144diff
changeset | 172 | |
| 272 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 173 | \begin{tikzpicture}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 174 | \begin{axis}[xlabel={\pcode{a}s},ylabel={time in secs},
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 175 | enlargelimits=false, | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 176 |     xtick={0,5,...,30},
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 177 | xmax=30, | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 178 | ymax=35, | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 179 |     ytick={0,5,...,30},
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 180 | scaled ticks=false, | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 181 | axis lines=left, | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 182 | width=10cm, | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 183 | height=7cm, | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 184 |     legend entries={Python,Ruby,my NFA},  
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 185 | legend pos=north west, | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 186 | legend cell align=left] | 
| 445 | 187 | \addplot[blue,mark=*, mark options={fill=white}] table {re-python.data};
 | 
| 188 | \addplot[brown,mark=pentagon*, mark options={fill=white}] table {re-ruby.data};  
 | |
| 578 | 189 | \addplot[red,mark=triangle*, mark options={fill=white}] table {nfasearch.data};	 
 | 
| 272 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 190 | \end{axis}
 | 
| 145 
920f675b4ed1
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
144diff
changeset | 191 | \end{tikzpicture}
 | 
| 
920f675b4ed1
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
144diff
changeset | 192 | |
| 579 | 193 | The punchline is that many existing libraries do depth-first search | 
| 194 | in NFAs (backtracking). | |
| 578 | 195 | |
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 196 | \end{frame}
 | 
| 145 
920f675b4ed1
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
144diff
changeset | 197 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
920f675b4ed1
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
144diff
changeset | 198 | |
| 520 | 199 | % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 200 | % \begin{frame}[c]
 | |
| 201 | % \frametitle{DFA to Rexp}
 | |
| 145 
920f675b4ed1
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
144diff
changeset | 202 | |
| 520 | 203 | % \begin{center}
 | 
| 204 | % \begin{tikzpicture}[scale=2,>=stealth',very thick,
 | |
| 205 | %                     every state/.style={minimum size=0pt,
 | |
| 206 | % draw=blue!50,very thick,fill=blue!20},] | |
| 207 | %   \node[state, initial]        (q0) at ( 0,1) {$q_0$};
 | |
| 208 | %   \node[state]                    (q1) at ( 1,1) {$q_1$};
 | |
| 209 | %   \node[state, accepting] (q2) at ( 2,1) {$q_2$};
 | |
| 210 | %   \path[->] (q0) edge[bend left] node[above] {\alert{$a$}} (q1)
 | |
| 211 | %             (q1) edge[bend left] node[above] {\alert{$b$}} (q0)
 | |
| 212 | %             (q2) edge[bend left=50] node[below] {\alert{$b$}} (q0)
 | |
| 213 | %             (q1) edge node[above] {\alert{$a$}} (q2)
 | |
| 214 | %             (q2) edge [loop right] node {\alert{$a$}} ()
 | |
| 215 | %             (q0) edge [loop below] node {\alert{$b$}} ();
 | |
| 216 | % \end{tikzpicture}
 | |
| 217 | % \end{center}\bigskip
 | |
| 145 
920f675b4ed1
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
144diff
changeset | 218 | |
| 520 | 219 | % \begin{center}
 | 
| 220 | % \begin{tabular}{r@ {\hspace{2mm}}c@ {\hspace{2mm}}l@{\hspace{7mm}}l}
 | |
| 221 | % \bl{$q_0$} & \bl{$=$} & \bl{$\ONE + q_0\,b + q_1\,b +  q_2\,b$} & (start state)\\
 | |
| 222 | % \bl{$q_1$} & \bl{$=$} & \bl{$q_0\,a$}\\
 | |
| 223 | % \bl{$q_2$} & \bl{$=$} & \bl{$q_1\,a + q_2\,a$}\\
 | |
| 145 
920f675b4ed1
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
144diff
changeset | 224 | |
| 520 | 225 | % \end{tabular}
 | 
| 226 | % \end{center}
 | |
| 145 
920f675b4ed1
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
144diff
changeset | 227 | |
| 520 | 228 | % Arden's Lemma: | 
| 229 | % \begin{center}
 | |
| 230 | % If \bl{$q = q\,r + s$}\; then\; \bl{$q = s\, r^*$}
 | |
| 231 | % \end{center}
 | |
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 232 | |
| 145 
920f675b4ed1
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
144diff
changeset | 233 | |
| 520 | 234 | % \end{frame}
 | 
| 235 | % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | |
| 145 
920f675b4ed1
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
144diff
changeset | 236 | |
| 520 | 237 | % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 238 | % \begin{frame}[c]
 | |
| 239 | % \frametitle{DFA Minimisation}
 | |
| 145 
920f675b4ed1
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
144diff
changeset | 240 | |
| 520 | 241 | % \begin{enumerate}
 | 
| 242 | % \item Take all pairs \bl{$(q, p)$} with \bl{$q \not= p$}
 | |
| 243 | % \item Mark all pairs that accepting and non-accepting states | |
| 244 | % \item For  all unmarked pairs \bl{$(q, p)$} and all characters \bl{$c$} test whether
 | |
| 245 | % \begin{center}
 | |
| 246 | % \bl{$(\delta(q, c), \delta(p,c))$}
 | |
| 247 | % \end{center} 
 | |
| 248 | % are marked. If yes, then also mark \bl{$(q, p)$}.
 | |
| 249 | % \item Repeat last step until no change. | |
| 250 | % \item All unmarked pairs can be merged. | |
| 251 | % \end{enumerate}
 | |
| 145 
920f675b4ed1
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
144diff
changeset | 252 | |
| 520 | 253 | % \end{frame}
 | 
| 254 | % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | |
| 270 
4dbeaf43031d
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
265diff
changeset | 255 | |
| 520 | 256 | % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 257 | % \begin{frame}[c]
 | |
| 265 
332fbe9c91ab
added slides
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
215diff
changeset | 258 | |
| 520 | 259 | % \begin{center}
 | 
| 260 | % \begin{tabular}{@{\hspace{-8mm}}cc@{}}
 | |
| 261 | % \begin{tikzpicture}[>=stealth',very thick,auto,
 | |
| 262 | %                              every state/.style={minimum size=0pt,inner sep=2pt,draw=blue!50,very thick,fill=blue!20},]
 | |
| 263 | % \node[state,initial]  (q_0)  {$q_0$};
 | |
| 264 | % \node[state] (q_1) [right=of q_0] {$q_1$};
 | |
| 265 | % \node[state] (q_2) [below right=of q_0] {$q_2$};
 | |
| 266 | % \node[state] (q_3) [right=of q_2] {$q_3$};
 | |
| 267 | % \node[state, accepting] (q_4) [right=of q_1] {$q_4$};
 | |
| 268 | % \path[->] (q_0) edge node [above]  {\alert{$a$}} (q_1);
 | |
| 269 | % \path[->] (q_1) edge node [above]  {\alert{$a$}} (q_4);
 | |
| 270 | % \path[->] (q_4) edge [loop right] node  {\alert{$a, b$}} ();
 | |
| 271 | % \path[->] (q_3) edge node [right]  {\alert{$a$}} (q_4);
 | |
| 272 | % \path[->] (q_2) edge node [above]  {\alert{$a$}} (q_3);
 | |
| 273 | % \path[->] (q_1) edge node [right]  {\alert{$b$}} (q_2);
 | |
| 274 | % \path[->] (q_0) edge node [above]  {\alert{$b$}} (q_2);
 | |
| 275 | % \path[->] (q_2) edge [loop left] node  {\alert{$b$}} ();
 | |
| 276 | % \path[->] (q_3) edge [bend left=95, looseness=1.3] node [below]  {\alert{$b$}} (q_0);
 | |
| 277 | % \end{tikzpicture}
 | |
| 278 | % & | |
| 279 | % \raisebox{9mm}{\begin{tikzpicture}[scale=0.6,line width=0.8mm]
 | |
| 280 | % \draw (0,0) -- (4,0); | |
| 281 | % \draw (0,1) -- (4,1); | |
| 282 | % \draw (0,2) -- (3,2); | |
| 283 | % \draw (0,3) -- (2,3); | |
| 284 | % \draw (0,4) -- (1,4); | |
| 272 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 285 | |
| 520 | 286 | % \draw (0,0) -- (0, 4); | 
| 287 | % \draw (1,0) -- (1, 4); | |
| 288 | % \draw (2,0) -- (2, 3); | |
| 289 | % \draw (3,0) -- (3, 2); | |
| 290 | % \draw (4,0) -- (4, 1); | |
| 272 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 291 | |
| 520 | 292 | % \draw (0.5,-0.5) node {$q_0$}; 
 | 
| 293 | % \draw (1.5,-0.5) node {$q_1$}; 
 | |
| 294 | % \draw (2.5,-0.5) node {$q_2$}; 
 | |
| 295 | % \draw (3.5,-0.5) node {$q_3$};
 | |
| 272 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 296 | |
| 520 | 297 | % \draw (-0.5, 3.5) node {$q_1$}; 
 | 
| 298 | % \draw (-0.5, 2.5) node {$q_2$}; 
 | |
| 299 | % \draw (-0.5, 1.5) node {$q_3$}; 
 | |
| 300 | % \draw (-0.5, 0.5) node {$q_4$}; 
 | |
| 272 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 301 | |
| 520 | 302 | % \draw (0.5,0.5) node {\large$\star$}; 
 | 
| 303 | % \draw (1.5,0.5) node {\large$\star$}; 
 | |
| 304 | % \draw (2.5,0.5) node {\large$\star$}; 
 | |
| 305 | % \draw (3.5,0.5) node {\large$\star$};
 | |
| 306 | % \draw (0.5,1.5) node {\large$\star$}; 
 | |
| 307 | % \draw (2.5,1.5) node {\large$\star$}; 
 | |
| 308 | % \draw (0.5,3.5) node {\large$\star$}; 
 | |
| 309 | % \draw (1.5,2.5) node {\large$\star$}; 
 | |
| 310 | % \end{tikzpicture}}
 | |
| 311 | % \end{tabular}
 | |
| 312 | % \end{center}
 | |
| 265 
332fbe9c91ab
added slides
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
215diff
changeset | 313 | |
| 272 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 314 | |
| 520 | 315 | % \mbox{}\\[-20mm]\mbox{}
 | 
| 265 
332fbe9c91ab
added slides
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
215diff
changeset | 316 | |
| 520 | 317 | % \begin{center}
 | 
| 318 | % \begin{tikzpicture}[>=stealth',very thick,auto,
 | |
| 319 | %                              every state/.style={minimum size=0pt,inner sep=2pt,draw=blue!50,very thick,fill=blue!20},]
 | |
| 320 | % \node[state,initial]  (q_02)  {$q_{0, 2}$};
 | |
| 321 | % \node[state] (q_13) [right=of q_02] {$q_{1, 3}$};
 | |
| 322 | % \node[state, accepting] (q_4) [right=of q_13] {$q_{4\phantom{,0}}$};
 | |
| 323 | % \path[->] (q_02) edge [bend left] node [above]  {\alert{$a$}} (q_13);
 | |
| 324 | % \path[->] (q_13) edge [bend left] node [below]  {\alert{$b$}} (q_02);
 | |
| 325 | % \path[->] (q_02) edge [loop below] node  {\alert{$b$}} ();
 | |
| 326 | % \path[->] (q_13) edge node [above]  {\alert{$a$}} (q_4);
 | |
| 327 | % \path[->] (q_4) edge [loop above] node  {\alert{$a, b$}} ();
 | |
| 328 | % \end{tikzpicture}\\
 | |
| 329 | % minimal automaton | |
| 330 | % \end{center}
 | |
| 265 
332fbe9c91ab
added slides
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
215diff
changeset | 331 | |
| 520 | 332 | % \end{frame}
 | 
| 333 | % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | |
| 265 
332fbe9c91ab
added slides
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
215diff
changeset | 334 | |
| 144 
0cb61bed557d
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
142diff
changeset | 335 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 272 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 336 | \begin{frame}[c]
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 337 | \frametitle{Regular Languages}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 338 | |
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 339 | Two equivalent definitions:\bigskip | 
| 139 
6e7c3db9023d
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
93diff
changeset | 340 | |
| 272 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 341 | \begin{quote}\rm A language is \alert{regular} iff there exists a
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 342 | regular expression that recognises all its strings. | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 343 | \end{quote}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 344 | |
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 345 | \begin{quote}\rm A language is \alert{regular} iff there exists an
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 346 | automaton that recognises all its strings. | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 347 | \end{quote}\bigskip\bigskip
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 348 | |
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 349 | |
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 350 | \small | 
| 445 | 351 | for example \bl{$a^nb^n$} is not regular
 | 
| 272 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 352 | \end{frame}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 353 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 354 | |
| 578 | 355 | |
| 272 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 356 | |
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 357 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 358 | \begin{frame}[c]
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 359 | \frametitle{Negation}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 360 | |
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 361 | Regular languages are closed under negation:\bigskip | 
| 139 
6e7c3db9023d
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
93diff
changeset | 362 | |
| 
6e7c3db9023d
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
93diff
changeset | 363 | \begin{center}
 | 
| 272 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 364 | \begin{tikzpicture}[scale=2,>=stealth',very thick,
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 365 |                     every state/.style={minimum size=0pt,
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 366 | draw=blue!50,very thick,fill=blue!20}] | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 367 |   \only<1>{\node[state,initial] (q0) at ( 0,1) {$q_0$};}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 368 |   \only<2>{\node[state,initial,accepting] (q0) at ( 0,1) {$q_0$};}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 369 |   \only<1>{\node[state] (q1) at ( 1,1) {$q_1$};}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 370 |   \only<2>{\node[state,accepting] (q1) at ( 1,1) {$q_1$};}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 371 |   \only<1>{\node[state, accepting] (q2) at ( 2,1) {$q_2$};}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 372 |   \only<2>{\node[state] (q2) at ( 2,1) {$q_2$};}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 373 |   \path[->] (q0) edge[bend left] node[above] {\alert{$a$}} (q1)
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 374 |             (q1) edge[bend left] node[above] {\alert{$b$}} (q0)
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 375 |             (q2) edge[bend left=50] node[below] {\alert{$b$}} (q0)
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 376 |             (q1) edge node[above] {\alert{$a$}} (q2)
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 377 |             (q2) edge [loop right] node {\alert{$a$}} ()
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 378 |             (q0) edge [loop below] node {\alert{$b$}} ();
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 379 | \end{tikzpicture}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 380 | \end{center}\bigskip\bigskip
 | 
| 139 
6e7c3db9023d
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
93diff
changeset | 381 | |
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 382 | But requires that the automaton is \alert{completed}!
 | 
| 272 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 383 | |
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 384 | \end{frame}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 385 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 386 | |
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 387 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 388 | \begin{frame}[c]
 | 
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 389 | \frametitle{The Goal of this Course}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 390 | \mbox{}\\[-26mm]\mbox{}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 391 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 392 | \begin{center}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 393 |   \begin{tikzpicture}[scale=1,
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 394 |                       node/.style={
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 395 | rectangle,rounded corners=3mm, | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 396 | very thick,draw=black!50, | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 397 | minimum height=18mm, minimum width=20mm, | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 398 | top color=white,bottom color=black!20}] | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 399 | |
| 578 | 400 |   \node at (3.05, 1.8) {\Large\bf Write a compiler};
 | 
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 401 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 402 |   \node (0) at (-2.3,0) {}; 
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 403 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 404 |   \node (A) at (0,0)  [node] {};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 405 |   \node [below right] at (A.north west) {lexer};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 406 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 407 |   \node (B) at (3,0)  [node] {};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 408 | \node [below right=1mm] at (B.north west) | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 409 |     {\mbox{}\hspace{-1mm}parser};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 410 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 411 |   \node (C) at (6,0)  [node] {};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 412 | \node [below right] at (C.north west) | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 413 |     {\mbox{}\hspace{-1mm}code gen};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 414 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 415 |   \node (1) at (8.4,0) {}; 
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 416 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 417 | \draw [->,line width=4mm] (0) -- (A); | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 418 | \draw [->,line width=4mm] (A) -- (B); | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 419 | \draw [->,line width=4mm] (B) -- (C); | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 420 | \draw [->,line width=4mm] (C) -- (1); | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 421 |   \end{tikzpicture}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 422 |   \end{center}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 423 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 424 | Today a lexer. | 
| 579 | 425 | |
| 426 | \only<2>{
 | |
| 427 | \begin{textblock}{1}(6,9.8)
 | |
| 428 | \begin{tabular}{c}
 | |
| 429 | \includegraphics[scale=0.13]{../pics/rosetta.jpg}\\[-2mm]
 | |
| 430 | \footnotesize lexing $\Rightarrow$ recognising words (Stone of Rosetta) | |
| 431 | \end{tabular}
 | |
| 432 | \end{textblock}}
 | |
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 433 | \end{frame}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 434 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 435 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 436 | \begin{frame}[c]
 | 
| 578 | 437 | \frametitle{Regular Expressions}
 | 
| 438 | ||
| 439 | In programming languages they are often used to recognise:\medskip | |
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 440 | |
| 578 | 441 | \begin{itemize}
 | 
| 442 | \item symbols, digits | |
| 443 | \item identifiers | |
| 444 | \item numbers (non-leading zeros) | |
| 445 | \item keywords | |
| 446 | \item comments | |
| 447 | \end{itemize}\bigskip
 | |
| 448 | ||
| 449 | \mbox{}\hfill\bl{\url{http://www.regexper.com}}
 | |
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 450 | \end{frame}
 | 
| 578 | 451 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 452 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 453 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 454 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 455 | \begin{frame}[c]
 | 
| 521 | 456 | \frametitle{Lexing: Test Case}
 | 
| 272 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 457 | |
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 458 | \mbox{\lstinputlisting[language=While]{../progs/fib.while}}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 459 | |
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 460 | \end{frame}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 461 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 462 | |
| 578 | 463 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 464 | %\begin{frame}[c]
 | |
| 465 | %\frametitle{?? Test Case}
 | |
| 466 | % | |
| 467 | %\mbox{\lstinputlisting[language=While]{../progs/collatz.while}}
 | |
| 468 | % | |
| 469 | %\end{frame}
 | |
| 139 
6e7c3db9023d
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
93diff
changeset | 470 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
6e7c3db9023d
added
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
93diff
changeset | 471 | |
| 35 | 472 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 272 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 473 | \begin{frame}[t]
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 474 | |
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 475 | \tt | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 476 | \begin{center}\large
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 477 | \code{"if true then then 42 else +"}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 478 | \end{center}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 479 | |
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 480 | |
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 481 | \begin{tabular}{@{}l}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 482 | KEYWORD: \\ | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 483 | \hspace{5mm}{if}, {then}, {else},\\ 
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 484 | WHITESPACE:\\ | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 485 | \hspace{5mm}{" "}, {$\backslash$n},\\ 
 | 
| 521 | 486 | IDENTIFIER:\\ | 
| 272 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 487 | \hspace{5mm}LETTER $\cdot$ (LETTER + DIGIT + {\_})$^*$\\ 
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 488 | NUM:\\ | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 489 | \hspace{5mm}(NONZERODIGIT $\cdot$ DIGIT$^*$) + {0}\\
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 490 | OP:\\ | 
| 521 | 491 | \hspace{5mm}+, -, *, \%, <, <=\\
 | 
| 272 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 492 | COMMENT:\\ | 
| 277 
8eb3261294ba
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
274diff
changeset | 493 | \hspace{5mm}{$\slash$*} $\cdot$ $\sim$(ALL$^*$ $\cdot$ (*$\slash$) $\cdot$ ALL$^*$) $\cdot$ {*$\slash$}
 | 
| 272 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 494 | \end{tabular}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 495 | |
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 496 | \end{frame}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 497 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 498 | |
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 499 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 500 | \begin{frame}[t]
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 501 | |
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 502 | \tt | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 503 | \begin{center}\large
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 504 | \code{"if true then then 42 else +"}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 505 | \end{center}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 506 | |
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 507 | \only<1>{
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 508 | \small\begin{tabular}{l}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 509 | KEYWORD(if),\\ | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 510 | WHITESPACE,\\ | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 511 | IDENT(true),\\ | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 512 | WHITESPACE,\\ | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 513 | KEYWORD(then),\\ | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 514 | WHITESPACE,\\ | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 515 | KEYWORD(then),\\ | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 516 | WHITESPACE,\\ | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 517 | NUM(42),\\ | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 518 | WHITESPACE,\\ | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 519 | KEYWORD(else),\\ | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 520 | WHITESPACE,\\ | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 521 | OP(+) | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 522 | \end{tabular}}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 523 | |
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 524 | \only<2>{
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 525 | \small\begin{tabular}{l}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 526 | KEYWORD(if),\\ | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 527 | IDENT(true),\\ | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 528 | KEYWORD(then),\\ | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 529 | KEYWORD(then),\\ | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 530 | NUM(42),\\ | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 531 | KEYWORD(else),\\ | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 532 | OP(+) | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 533 | \end{tabular}}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 534 | |
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 535 | \end{frame}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 536 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 537 | |
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 538 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 539 | \begin{frame}[c]
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 540 | |
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 541 | |
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 542 | There is one small problem with the tokenizer. How should we | 
| 578 | 543 | tokenize\ldots? | 
| 272 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 544 | |
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 545 | \begin{center}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 546 | \large\code{"x-3"}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 547 | \end{center}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 548 | |
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 549 | \tt | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 550 | \begin{tabular}{@{}l}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 551 | ID: \ldots\\ | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 552 | OP:\\ | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 553 | \hspace{5mm}\texttt{"+"}, \texttt{"-"}\\
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 554 | NUM:\\ | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 555 | \hspace{5mm}(NONZERODIGIT $\cdot$ DIGIT$^*$) + {''0''}\\
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 556 | NUMBER:\\ | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 557 | \hspace{5mm}NUM +  (\texttt{"-"} $\cdot$ NUM)\\
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 558 | \end{tabular}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 559 | |
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 560 | \end{frame}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 561 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 562 | |
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 563 | \begin{frame}[c]
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 564 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 565 | The same problem with\medskip | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 566 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 567 | \[ | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 568 | \bl{(ab + a) \cdot (c + bc)}
 | 
| 353 
b88670c5d04b
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
352diff
changeset | 569 | \]\medskip | 
| 
b88670c5d04b
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
352diff
changeset | 570 | |
| 
b88670c5d04b
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
352diff
changeset | 571 | and the string $\bl{abc}$.\pause\pause\bigskip
 | 
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 572 | |
| 353 
b88670c5d04b
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
352diff
changeset | 573 | Or, keywords are \pcode{if} and identifiers are 
 | 
| 
b88670c5d04b
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
352diff
changeset | 574 | letters followed by ``letters + numbers + \_''$^*$ | 
| 
b88670c5d04b
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
352diff
changeset | 575 | |
| 
b88670c5d04b
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
352diff
changeset | 576 | \[ | 
| 578 | 577 | \bl{if}\qquad\bl{iffoo}
 | 
| 353 
b88670c5d04b
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
352diff
changeset | 578 | \] | 
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 579 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 580 | \end{frame}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 581 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 582 | |
| 272 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 583 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 584 | \begin{frame}[c]
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 585 | \frametitle{POSIX: Two Rules}
 | 
| 33 | 586 | |
| 38 | 587 | \begin{itemize}
 | 
| 272 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 588 | \item Longest match rule (``maximal munch rule''): The | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 589 | longest initial substring matched by any regular expression is taken | 
| 278 
c7890e677e06
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
277diff
changeset | 590 | as the next token.\bigskip | 
| 272 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 591 | |
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 592 | \item Rule priority: | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 593 | For a particular longest initial substring, the first regular | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 594 | expression that can match determines the token. | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 595 | \end{itemize}\bigskip\bigskip\pause
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 596 | |
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 597 | \small | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 598 | \hfill most posix matchers are buggy\\ | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 599 | \footnotesize | 
| 353 
b88670c5d04b
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
352diff
changeset | 600 | \hfill | 
| 
b88670c5d04b
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
352diff
changeset | 601 | \url{http://www.haskell.org/haskellwiki/Regex_Posix}
 | 
| 
b88670c5d04b
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
352diff
changeset | 602 | \smallskip\pause | 
| 
b88670c5d04b
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
352diff
changeset | 603 | |
| 
b88670c5d04b
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
352diff
changeset | 604 | \hfill \small traditional lexers are fast, but hairy | 
| 272 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 605 | |
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 606 | %\url{http://www.technologyreview.com/tr10/?year=2011}  
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 607 | %finite deterministic automata/ nondeterministic automaton | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 608 | %\item problem with infix operations, for example i-12 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 609 | |
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 610 | \end{frame}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 611 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 612 | |
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 613 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 614 | \begin{frame}[c]
 | 
| 581 | 615 | \frametitle{Sulzmann \& Lu Matcher}
 | 
| 272 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 616 | |
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 617 | We want to match the string \bl{$abc$} using \bl{$r_1$}:
 | 
| 38 | 618 | |
| 272 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 619 | \begin{center}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 620 | \begin{tikzpicture}[scale=2,node distance=1.3cm,every node/.style={minimum size=8mm}]
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 621 | \node (r1)  {\bl{$r_1$}};
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 622 | \node (r2) [right=of r1] {\bl{$r_2$}};
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 623 | \draw[->,line width=1mm]  (r1) -- (r2) node[above,midway] {\bl{$der\,a$}};\pause
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 624 | \node (r3) [right=of r2] {\bl{$r_3$}};
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 625 | \draw[->,line width=1mm]  (r2) -- (r3) node[above,midway] {\bl{$der\,b$}};\pause
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 626 | \node (r4) [right=of r3] {\bl{$r_4$}};
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 627 | \draw[->,line width=1mm]  (r3) -- (r4) node[above,midway] {\bl{$der\,c$}};\pause
 | 
| 521 | 628 | \draw (r4) node[anchor=west] {\;\raisebox{3mm}{\bl{$nullable?$}}};\pause
 | 
| 272 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 629 | \node (v4) [below=of r4] {\bl{$v_4$}};
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 630 | \draw[->,line width=1mm] (r4) -- (v4);\pause | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 631 | \node (v3) [left=of v4] {\bl{$v_3$}};
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 632 | \draw[->,line width=1mm]  (v4) -- (v3) node[below,midway] {\bl{$inj\,c$}};\pause
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 633 | \node (v2) [left=of v3] {\bl{$v_2$}};
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 634 | \draw[->,line width=1mm]  (v3) -- (v2) node[below,midway] {\bl{$inj\,b$}};\pause
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 635 | \node (v1) [left=of v2] {\bl{$v_1$}};
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 636 | \draw[->,line width=1mm]  (v2) -- (v1) node[below,midway] {\bl{$inj\,a$}};\pause
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 637 | \draw[->,line width=0.5mm] (r3) -- (v3); | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 638 | \draw[->,line width=0.5mm] (r2) -- (v2); | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 639 | \draw[->,line width=0.5mm] (r1) -- (v1); | 
| 273 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 640 | \draw (r4) node[anchor=north west] {\;\raisebox{-8mm}{\bl{$mkeps$}}};
 | 
| 272 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 641 | \end{tikzpicture}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 642 | \end{center}
 | 
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 643 | |
| 
1446bc47a294
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
270diff
changeset | 644 | \end{frame}
 | 
| 33 | 645 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 646 | ||
| 273 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 647 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 648 | \begin{frame}[c]
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 649 | \frametitle{Regexes and Values}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 650 | |
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 651 | Regular expressions and their corresponding values: | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 652 | |
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 653 | \begin{center}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 654 | \begin{columns}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 655 | \begin{column}{3cm}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 656 | \begin{tabular}{@{}rrl@{}}
 | 
| 445 | 657 |   \bl{$r$} & \bl{$::=$}  & \bl{$\ZERO$}\\
 | 
| 658 |            & \bl{$\mid$} & \bl{$\ONE$}   \\
 | |
| 273 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 659 |            & \bl{$\mid$} & \bl{$c$}          \\
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 660 |            & \bl{$\mid$} & \bl{$r_1 \cdot r_2$}\\
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 661 |            & \bl{$\mid$} & \bl{$r_1 + r_2$}   \\
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 662 | \\ | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 663 |            & \bl{$\mid$} & \bl{$r^*$}         \\
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 664 | \\ | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 665 |   \end{tabular}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 666 | \end{column}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 667 | \begin{column}{3cm}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 668 | \begin{tabular}{@{\hspace{-7mm}}rrl@{}}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 669 |   \bl{$v$} & \bl{$::=$}  & \\
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 670 |            &             & \bl{$Empty$}   \\
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 671 |            & \bl{$\mid$} & \bl{$Char(c)$}          \\
 | 
| 279 
f406c6677b8c
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
278diff
changeset | 672 |            & \bl{$\mid$} & \bl{$Seq(v_1,v_2)$}\\
 | 
| 273 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 673 |            & \bl{$\mid$} & \bl{$Left(v)$}   \\
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 674 |            & \bl{$\mid$} & \bl{$Right(v)$}  \\
 | 
| 578 | 675 |            & \bl{$\mid$} & \bl{$Stars\,[]$}      \\
 | 
| 676 |            & \bl{$\mid$} & \bl{$Stars\,[v_1,\ldots\,v_n]$} \\
 | |
| 273 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 677 |   \end{tabular}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 678 | \end{column}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 679 | \end{columns}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 680 | \end{center}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 681 | |
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 682 | \end{frame}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 683 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 684 | |
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 685 | \begin{frame}[c]
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 686 | \small | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 687 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 688 | {\small\lstinputlisting[language=Scala,numbers=none,
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 689 | xleftmargin=-5mm] {../progs/app01.scala}}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 690 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 691 | {\small\lstinputlisting[language=Scala,numbers=none,
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 692 | xleftmargin=-5mm] {../progs/app02.scala}}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 693 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 694 | \end{frame}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 695 | |
| 273 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 696 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 697 | \begin{frame}[c]
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 698 | \frametitle{Mkeps}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 699 | |
| 280 
267bd65b2e29
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
279diff
changeset | 700 | Finding a (posix) value for recognising the empty string: | 
| 273 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 701 | |
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 702 | \begin{center}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 703 | \begin{tabular}{lcl}
 | 
| 521 | 704 |   \bl{$mkeps\,(\ONE)$}  & \bl{$\dn$}  & \bl{$Empty$}\\
 | 
| 705 |   \bl{$mkeps\,(r_1 + r_2)$} & \bl{$\dn$}  & \bl{if $nullable(r_1)$}  \\
 | |
| 273 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 706 |                           &             & \bl{then $Left(mkeps(r_1))$}\\
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 707 |                           &             & \bl{else $Right(mkeps(r_2))$}\\
 | 
| 521 | 708 |   \bl{$mkeps\,(r_1 \cdot r_2)$}  & \bl{$\dn$} & \bl{$Seq(mkeps(r_1),mkeps(r_2))$}\\
 | 
| 578 | 709 |   \bl{$mkeps\,(r^*)$}      & \bl{$\dn$} & \bl{$Stars\,[]$}  \\
 | 
| 273 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 710 | \end{tabular}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 711 | \end{center}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 712 | |
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 713 | \end{frame}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 714 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 715 | |
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 716 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 717 | \begin{frame}[c]
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 718 | \frametitle{Inject}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 719 | |
| 521 | 720 | Injecting (``Adding'') a character to a value\\[-12mm]\mbox{}
 | 
| 273 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 721 | |
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 722 | \begin{center}
 | 
| 578 | 723 | \begin{tabular}{@{\hspace{-3mm}}l@{\hspace{1mm}}c@{\hspace{1mm}}l@{}}
 | 
| 724 |   \bl{$inj\,(c)\,c\,(Empty)$} & \bl{$\dn$}  & \bl{$Char\,c$}\\
 | |
| 725 |   \bl{$inj\,(r_1 + r_2)\,c\,(Left(v))$} & \bl{$\dn$}  & \bl{$Left(inj\,r_1\,c\,v)$}\\
 | |
| 726 |   \bl{$inj\,(r_1 + r_2)\,c\,(Right(v))$} & \bl{$\dn$}  & \bl{$Right(inj\,r_2\,c\,v)$}\\
 | |
| 727 |   \bl{$inj\,(r_1 \cdot r_2)\,c\,(Seq(v_1,v_2))$} & \bl{$\dn$}  & \bl{$Seq(inj\,r_1\,c\,v_1,v_2)$}\\
 | |
| 728 |   \bl{$inj\,(r_1 \cdot r_2)\,c\,(Left(Seq(v_1,v_2)))$} & \bl{$\dn$}  & \bl{$Seq(inj\,r_1\,c\,v_1,v_2)$}\\
 | |
| 729 |   \bl{$inj\,(r_1 \cdot r_2)\,c\,(Right(v))$} & \bl{$\dn$}  & \bl{$Seq(mkeps(r_1),inj\,r_2\,c\,v)$}\\
 | |
| 579 | 730 |   \bl{$inj\,(r^*)\,c\,(Seq(v,Stars\,vs))$} & \bl{$\dn$}  & \bl{$Stars\,(inj\,r\,c\,v\,::\,vs)$}\\
 | 
| 273 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 731 | \end{tabular}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 732 | \end{center}\bigskip
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 733 | |
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 734 | \footnotesize | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 735 | \bl{$inj$}: 1st arg $\mapsto$ a rexp; 2nd arg $\mapsto$ a character; 3rd arg $\mapsto$ a value 
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 736 | \end{frame}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 737 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 738 | |
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 739 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 740 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 741 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 742 | \begin{frame}[c]
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 743 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 744 | \begin{textblock}{10}(3,5)
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 745 | \begin{tikzpicture}[scale=2,node distance=1.3cm,every node/.style={minimum size=8mm}]
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 746 | \node (r1)  {\bl{$r_1$}};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 747 | \node (r2) [right=of r1] {\bl{$r_2$}};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 748 | \draw[->,line width=1mm]  (r1) -- (r2) node[above,midway] {\bl{$der\,a$}};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 749 | \node (r3) [right=of r2] {\bl{$r_3$}};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 750 | \draw[->,line width=1mm]  (r2) -- (r3) node[above,midway] {\bl{$der\,b$}};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 751 | \node (r4) [right=of r3] {\bl{$r_4$}};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 752 | \draw[->,line width=1mm]  (r3) -- (r4) node[above,midway] {\bl{$der\,c$}};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 753 | \draw (r4) node[anchor=west] {\;\raisebox{3mm}{\bl{$nullable$}}};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 754 | \node (v4) [below=of r4] {\bl{$v_4$}};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 755 | \draw[->,line width=1mm] (r4) -- (v4); | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 756 | \node (v3) [left=of v4] {\bl{$v_3$}};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 757 | \draw[->,line width=1mm]  (v4) -- (v3) node[below,midway] {\bl{$inj\,c$}};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 758 | \node (v2) [left=of v3] {\bl{$v_2$}};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 759 | \draw[->,line width=1mm]  (v3) -- (v2) node[below,midway] {\bl{$inj\,b$}};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 760 | \node (v1) [left=of v2] {\bl{$v_1$}};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 761 | \draw[->,line width=1mm]  (v2) -- (v1) node[below,midway] {\bl{$inj\,a$}};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 762 | \draw[->,line width=0.5mm] (r3) -- (v3); | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 763 | \draw[->,line width=0.5mm] (r2) -- (v2); | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 764 | \draw[->,line width=0.5mm] (r1) -- (v1); | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 765 | \draw (r4) node[anchor=north west] {\;\raisebox{-8mm}{\bl{$mkeps$}}};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 766 | \end{tikzpicture}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 767 | \end{textblock}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 768 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 769 | \only<2->{
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 770 | \begin{textblock}{6}(1,0.8)
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 771 | \begin{bubble}[6cm]
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 772 | \small | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 773 | \begin{tabular}{ll}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 774 | \bl{$r_1$}: & \bl{$a \cdot (b \cdot c)$}\\
 | 
| 445 | 775 | \bl{$r_2$}: & \bl{$\ONE \cdot (b \cdot c)$}\\
 | 
| 776 | \bl{$r_3$}: & \bl{$(\ZERO \cdot (b \cdot c)) + (\ONE \cdot c)$}\\
 | |
| 777 | \bl{$r_4$}: & \bl{$(\ZERO \cdot (b \cdot c)) + ((\ZERO \cdot c) + \ONE)$}\\
 | |
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 778 | \end{tabular}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 779 | \end{bubble}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 780 | \end{textblock}}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 781 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 782 | \only<2->{
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 783 | \begin{textblock}{6}(5,11.4)
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 784 | \begin{bubble}[7.6cm]
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 785 | \small | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 786 | \begin{tabular}{ll}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 787 | \bl{$v_1$}: & \bl{$Seq(Char(a), Seq(Char(b), Char(c)))$}\\
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 788 | \bl{$v_2$}: & \bl{$Seq(Empty, Seq(Char(b), Char(c)))$}\\
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 789 | \bl{$v_3$}: & \bl{$Right(Seq(Empty, Char(c)))$}\\
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 790 | \bl{$v_4$}: & \bl{$Right(Right(Empty))$}\\
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 791 | \end{tabular}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 792 | \end{bubble}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 793 | \end{textblock}}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 794 | \end{frame}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 795 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 796 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 797 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 798 | \begin{frame}[c]
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 799 | \frametitle{Flatten}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 800 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 801 | Obtaining the string underlying a value: | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 802 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 803 | \begin{center}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 804 | \begin{tabular}{lcl}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 805 |   \bl{$|Empty|$}     & \bl{$\dn$} & \bl{$[]$}\\
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 806 |   \bl{$|Char(c)|$}   & \bl{$\dn$} & \bl{$[c]$}\\
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 807 |   \bl{$|Left(v)|$}   & \bl{$\dn$} & \bl{$|v|$}\\
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 808 |   \bl{$|Right(v)|$}  & \bl{$\dn$} & \bl{$|v|$}\\
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 809 |   \bl{$|Seq(v_1,v_2)|$}& \bl{$\dn$} & \bl{$|v_1| \,@\, |v_2|$}\\
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 810 |   \bl{$|[v_1,\ldots ,v_n]|$} & \bl{$\dn$} & \bl{$|v_1| \,@\ldots @\, |v_n|$}\\
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 811 | \end{tabular}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 812 | \end{center}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 813 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 814 | \end{frame}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 815 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 816 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 817 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 818 | \begin{frame}[c]
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 819 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 820 | \begin{textblock}{10}(3,5)
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 821 | \begin{tikzpicture}[scale=2,node distance=1.3cm,every node/.style={minimum size=8mm}]
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 822 | \node (r1)  {\bl{$r_1$}};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 823 | \node (r2) [right=of r1] {\bl{$r_2$}};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 824 | \draw[->,line width=1mm]  (r1) -- (r2) node[above,midway] {\bl{$der\,a$}};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 825 | \node (r3) [right=of r2] {\bl{$r_3$}};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 826 | \draw[->,line width=1mm]  (r2) -- (r3) node[above,midway] {\bl{$der\,b$}};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 827 | \node (r4) [right=of r3] {\bl{$r_4$}};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 828 | \draw[->,line width=1mm]  (r3) -- (r4) node[above,midway] {\bl{$der\,c$}};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 829 | \draw (r4) node[anchor=west] {\;\raisebox{3mm}{\bl{$nullable$}}};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 830 | \node (v4) [below=of r4] {\bl{$v_4$}};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 831 | \draw[->,line width=1mm] (r4) -- (v4); | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 832 | \node (v3) [left=of v4] {\bl{$v_3$}};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 833 | \draw[->,line width=1mm]  (v4) -- (v3) node[below,midway] {\bl{$inj\,c$}};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 834 | \node (v2) [left=of v3] {\bl{$v_2$}};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 835 | \draw[->,line width=1mm]  (v3) -- (v2) node[below,midway] {\bl{$inj\,b$}};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 836 | \node (v1) [left=of v2] {\bl{$v_1$}};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 837 | \draw[->,line width=1mm]  (v2) -- (v1) node[below,midway] {\bl{$inj\,a$}};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 838 | \draw[->,line width=0.5mm] (r3) -- (v3); | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 839 | \draw[->,line width=0.5mm] (r2) -- (v2); | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 840 | \draw[->,line width=0.5mm] (r1) -- (v1); | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 841 | \draw (r4) node[anchor=north west] {\;\raisebox{-8mm}{\bl{$mkeps$}}};
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 842 | \end{tikzpicture}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 843 | \end{textblock}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 844 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 845 | \begin{textblock}{6}(1,0.8)
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 846 | \begin{bubble}[6cm]
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 847 | \small | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 848 | \begin{tabular}{ll}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 849 | \bl{$r_1$}: & \bl{$a \cdot (b \cdot c)$}\\
 | 
| 445 | 850 | \bl{$r_2$}: & \bl{$\ONE \cdot (b \cdot c)$}\\
 | 
| 851 | \bl{$r_3$}: & \bl{$(\ZERO \cdot (b \cdot c)) + (\ONE \cdot c)$}\\
 | |
| 852 | \bl{$r_4$}: & \bl{$(\ZERO \cdot (b \cdot c)) + ((\ZERO \cdot c) + \ONE)$}\\
 | |
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 853 | \end{tabular}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 854 | \end{bubble}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 855 | \end{textblock}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 856 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 857 | \begin{textblock}{6}(1,11.4)
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 858 | \begin{bubble}[7.6cm]
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 859 | \small | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 860 | \begin{tabular}{ll}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 861 | \bl{$v_1$}: & \bl{$Seq(Char(a), Seq(Char(b), Char(c)))$}\\
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 862 | \bl{$v_2$}: & \bl{$Seq(Empty, Seq(Char(b), Char(c)))$}\\
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 863 | \bl{$v_3$}: & \bl{$Right(Seq(Empty, Char(c)))$}\\
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 864 | \bl{$v_4$}: & \bl{$Right(Right(Empty))$}\\
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 865 | \end{tabular}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 866 | \end{bubble}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 867 | \end{textblock}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 868 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 869 | \begin{textblock}{6}(12,11.4)
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 870 | \begin{bubble}[2cm]
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 871 | \small | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 872 | \begin{tabular}{ll}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 873 | \bl{$|v_1|$}: & \bl{$abc$}\\
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 874 | \bl{$|v_2|$}: & \bl{$bc$}\\
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 875 | \bl{$|v_3|$}: & \bl{$c$}\\
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 876 | \bl{$|v_4|$}: & \bl{$[]$}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 877 | \end{tabular}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 878 | \end{bubble}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 879 | \end{textblock}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 880 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 881 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 882 | \end{frame}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 883 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 884 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 885 | |
| 273 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 886 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 887 | \begin{frame}[c]
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 888 | \frametitle{Lexing}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 889 | |
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 890 | \begin{center}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 891 | \begin{tabular}{l@{\hspace{1mm}}c@{\hspace{1mm}}l}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 892 |   \bl{$lex\,r\,[]$} & \bl{$\dn$}  & \bl{if $nullable(r)$ then $mkeps(r)$ else $error$}\\
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 893 |   \bl{$lex\,r\,c::s$} & \bl{$\dn$}  & \bl{$inj\,r\,c\,lex(der(c,r), s)$}\\
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 894 | \end{tabular}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 895 | \end{center}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 896 | |
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 897 | \footnotesize | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 898 | \bl{$lex$}: returns a value
 | 
| 280 
267bd65b2e29
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
279diff
changeset | 899 | |
| 
267bd65b2e29
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
279diff
changeset | 900 | \begin{center}
 | 
| 
267bd65b2e29
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
279diff
changeset | 901 | \begin{tikzpicture}[scale=2,node distance=1.0cm,every node/.style={minimum size=6mm}]
 | 
| 
267bd65b2e29
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
279diff
changeset | 902 | \node (r1)  {\bl{$r_1$}};
 | 
| 
267bd65b2e29
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
279diff
changeset | 903 | \node (r2) [right=of r1] {\bl{$r_2$}};
 | 
| 
267bd65b2e29
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
279diff
changeset | 904 | \draw[->,line width=1mm]  (r1) -- (r2) node[above,midway] {\bl{$der\,a$}};
 | 
| 
267bd65b2e29
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
279diff
changeset | 905 | \node (r3) [right=of r2] {\bl{$r_3$}};
 | 
| 
267bd65b2e29
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
279diff
changeset | 906 | \draw[->,line width=1mm]  (r2) -- (r3) node[above,midway] {\bl{$der\,b$}};
 | 
| 
267bd65b2e29
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
279diff
changeset | 907 | \node (r4) [right=of r3] {\bl{$r_4$}};
 | 
| 
267bd65b2e29
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
279diff
changeset | 908 | \draw[->,line width=1mm]  (r3) -- (r4) node[above,midway] {\bl{$der\,c$}};
 | 
| 
267bd65b2e29
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
279diff
changeset | 909 | \draw (r4) node[anchor=west] {\;\raisebox{3mm}{\bl{$nullable$}}};
 | 
| 
267bd65b2e29
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
279diff
changeset | 910 | \node (v4) [below=of r4] {\bl{$v_4$}};
 | 
| 
267bd65b2e29
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
279diff
changeset | 911 | \draw[->,line width=1mm] (r4) -- (v4); | 
| 
267bd65b2e29
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
279diff
changeset | 912 | \node (v3) [left=of v4] {\bl{$v_3$}};
 | 
| 
267bd65b2e29
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
279diff
changeset | 913 | \draw[->,line width=1mm]  (v4) -- (v3) node[below,midway] {\bl{$inj\,c$}};
 | 
| 
267bd65b2e29
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
279diff
changeset | 914 | \node (v2) [left=of v3] {\bl{$v_2$}};
 | 
| 
267bd65b2e29
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
279diff
changeset | 915 | \draw[->,line width=1mm]  (v3) -- (v2) node[below,midway] {\bl{$inj\,b$}};
 | 
| 
267bd65b2e29
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
279diff
changeset | 916 | \node (v1) [left=of v2] {\bl{$v_1$}};
 | 
| 
267bd65b2e29
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
279diff
changeset | 917 | \draw[->,line width=1mm]  (v2) -- (v1) node[below,midway] {\bl{$inj\,a$}};
 | 
| 
267bd65b2e29
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
279diff
changeset | 918 | \draw[->,line width=0.5mm] (r3) -- (v3); | 
| 
267bd65b2e29
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
279diff
changeset | 919 | \draw[->,line width=0.5mm] (r2) -- (v2); | 
| 
267bd65b2e29
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
279diff
changeset | 920 | \draw[->,line width=0.5mm] (r1) -- (v1); | 
| 
267bd65b2e29
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
279diff
changeset | 921 | \draw (r4) node[anchor=north west] {\;\raisebox{-8mm}{\bl{$mkeps$}}};
 | 
| 
267bd65b2e29
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
279diff
changeset | 922 | \end{tikzpicture}
 | 
| 
267bd65b2e29
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
279diff
changeset | 923 | \end{center}
 | 
| 
267bd65b2e29
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
279diff
changeset | 924 | |
| 273 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 925 | \end{frame}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 926 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 927 | |
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 928 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 929 | \begin{frame}[c]
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 930 | \frametitle{Records}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 931 | |
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 932 | \begin{itemize}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 933 | \item new regex: \bl{$(x:r)$}\hspace{7mm}new value: \bl{$Rec(x,v)$}\medskip\pause
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 934 | |
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 935 | \item \bl{$nullable(x:r) \dn nullable(r)$}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 936 | \item \bl{$der\,c\,(x:r) \dn (x:der\,c\,r)$}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 937 | \item \bl{$mkeps(x:r) \dn Rec(x, mkeps(r))$}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 938 | \item \bl{$inj\,(x:r)\,c\,v \dn Rec(x, inj\,r\,c\,v)$}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 939 | \end{itemize}\bigskip\bigskip\pause
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 940 | |
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 941 | \small | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 942 | for extracting subpatterns \bl{$(z: ((x:ab) + (y:ba))$}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 943 | |
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 944 | \end{frame}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 945 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 946 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 947 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 948 | \begin{frame}[c]
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 949 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 950 | \begin{itemize}
 | 
| 445 | 951 | \item A regular expression for email addresses | 
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 952 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 953 | \begin{center}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 954 | \begin{tabular}{l}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 955 | (name: \bl{$[a\mbox{-}z0\mbox{-}9\_\!\_\,.-]^+$})\bl{$\cdot @\cdot$}\\ 
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 956 | \qquad(domain: \bl{$[a\mbox{-}z0\mbox{-}9\,.-]^+$}) \bl{$\cdot .\cdot$}\\ 
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 957 | \qquad\qquad(top\_level: \bl{$[a\mbox{-}z\,.]^{\{2,6\}}$})
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 958 | \end{tabular}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 959 | \end{center}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 960 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 961 | \bl{\[
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 962 | \texttt{christian.urban@kcl.ac.uk}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 963 | \]} | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 964 | |
| 445 | 965 | \item the result environment: | 
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 966 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 967 | \begin{center}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 968 | \begin{tabular}{l}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 969 | \bl{$[(name:\texttt{christian.urban}),$}\\ 
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 970 | \bl{$\phantom{[}(domain:\texttt{kcl}),$}\\ 
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 971 | \bl{$\phantom{[}(top\_level:\texttt{ac.uk})]$}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 972 | \end{tabular}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 973 | \end{center}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 974 | \end{itemize}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 975 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 976 | \end{frame}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 977 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 978 | |
| 273 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 979 | |
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 980 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 981 | \begin{frame}[c]
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 982 | \frametitle{While Tokens}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 983 | |
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 984 | \begin{center}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 985 | \begin{tabular}{rcl}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 986 | \pcode{WHILE\_REGS} & $\dn$ & \raisebox{-1mm}{\large(}\pcode{("k" : KEYWORD)} +\\ 
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 987 |                   &       & \phantom{(}\pcode{("i" : ID)} +\\ 
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 988 |                   &       & \phantom{(}\pcode{("o" : OP)} + \\
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 989 |                   &       & \phantom{(}\pcode{("n" : NUM)} + \\
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 990 |                   &       & \phantom{(}\pcode{("s" : SEMI)} +\\ 
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 991 |                   &       & \phantom{(}\pcode{("p" : (LPAREN + RPAREN))} +\\ 
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 992 |                   &       & \phantom{(}\pcode{("b" : (BEGIN + END))} +\\ 
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 993 |                   &       & \phantom{(}\pcode{("w" : WHITESPACE)}\raisebox{-1mm}{\large)$^*$}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 994 | \end{tabular}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 995 | \end{center}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 996 | |
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 997 | \end{frame}
 | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 998 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
b56d5e4468c0
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
272diff
changeset | 999 | |
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1000 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1001 | |
| 274 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1002 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1003 | \begin{frame}[c]
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1004 | \frametitle{Simplification}
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1005 | |
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1006 | \begin{itemize}
 | 
| 522 | 1007 | \item If we simplify after the derivative, then we are building the | 
| 578 | 1008 | value for the simplified regular expression, but \alert{\textbf{not}} for the original
 | 
| 274 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1009 | regular expression. | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1010 | \end{itemize}
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1011 | |
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1012 | \begin{center}
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1013 | \begin{tikzpicture}[scale=2,node distance=1.3cm,every node/.style={minimum size=8mm}]
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1014 | \node (r1)  {\bl{$r_1$}};
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1015 | \node (r2) [right=of r1] {\bl{$r_2$}};
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1016 | \draw[->,line width=1mm]  (r1) -- (r2) node[above,midway] {\bl{$der\,a$}};
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1017 | \node (r3) [right=of r2] {\bl{$r_3$}};
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1018 | \draw[->,line width=1mm]  (r2) -- (r3) node[above,midway] {\bl{$der\,b$}};
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1019 | \node (r4) [right=of r3] {\bl{$r_4$}};
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1020 | \draw[->,line width=1mm]  (r3) -- (r4) node[above,midway] {\bl{$der\,c$}};
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1021 | \draw (r4) node[anchor=west] {\;\raisebox{3mm}{\bl{$nullable$}}};
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1022 | \node (v4) [below=of r4] {\bl{$v_4$}};
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1023 | \draw[->,line width=1mm] (r4) -- (v4); | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1024 | \node (v3) [left=of v4] {\bl{$v_3$}};
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1025 | \draw[->,line width=1mm]  (v4) -- (v3) node[below,midway] {\bl{$inj\,c$}};
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1026 | \node (v2) [left=of v3] {\bl{$v_2$}};
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1027 | \draw[->,line width=1mm]  (v3) -- (v2) node[below,midway] {\bl{$inj\,b$}};
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1028 | \node (v1) [left=of v2] {\bl{$v_1$}};
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1029 | \draw[->,line width=1mm]  (v2) -- (v1) node[below,midway] {\bl{$inj\,a$}};
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1030 | \draw[->,line width=0.5mm] (r3) -- (v3); | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1031 | \draw[->,line width=0.5mm] (r2) -- (v2); | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1032 | \draw[->,line width=0.5mm] (r1) -- (v1); | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1033 | \draw (r4) node[anchor=north west] {\;\raisebox{-8mm}{\bl{$mkeps$}}};
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1034 | \end{tikzpicture}
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1035 | \end{center}
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1036 | |
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1037 | \small | 
| 445 | 1038 | \hspace{4.5cm}\bl{$(\ZERO \cdot (b \cdot c)) + ((\ZERO \cdot c) + \ONE)$}
 | 
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1039 | $\mapsto$ | 
| 445 | 1040 | \bl{$\ONE$}
 | 
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1041 | |
| 274 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1042 | \end{frame}
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1043 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1044 | |
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1045 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1046 | \begin{frame}[c]
 | 
| 447 
68769db65185
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
445diff
changeset | 1047 | |
| 
68769db65185
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
445diff
changeset | 1048 | Normally we would have | 
| 
68769db65185
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
445diff
changeset | 1049 | |
| 
68769db65185
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
445diff
changeset | 1050 |   \begin{center}
 | 
| 
68769db65185
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
445diff
changeset | 1051 |   \bl{$(\ZERO \cdot (b \cdot c)) + ((\ZERO \cdot c) + \ONE)$}
 | 
| 
68769db65185
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
445diff
changeset | 1052 |   \end{center}
 | 
| 
68769db65185
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
445diff
changeset | 1053 | |
| 452 
0b707b614dac
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
451diff
changeset | 1054 | and answer how this regular expression matches the empty string | 
| 578 | 1055 | with the value | 
| 447 
68769db65185
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
445diff
changeset | 1056 | |
| 
68769db65185
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
445diff
changeset | 1057 |   \begin{center}
 | 
| 
68769db65185
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
445diff
changeset | 1058 |   \bl{$Right(Right(Empty))$}
 | 
| 
68769db65185
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
445diff
changeset | 1059 |   \end{center}\bigskip
 | 
| 
68769db65185
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
445diff
changeset | 1060 | |
| 578 | 1061 |   But now we simplify this to \bl{$\ONE$} and would produce \bl{$Empty$} (see \textit{mkeps}).
 | 
| 447 
68769db65185
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
445diff
changeset | 1062 | |
| 
68769db65185
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
445diff
changeset | 1063 | \end{frame}
 | 
| 
68769db65185
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
445diff
changeset | 1064 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
68769db65185
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
445diff
changeset | 1065 | |
| 
68769db65185
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
445diff
changeset | 1066 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
68769db65185
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
445diff
changeset | 1067 | \begin{frame}[c]
 | 
| 274 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1068 | \frametitle{Rectification}
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1069 | |
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1070 | \def\arraystretch{1.05}
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1071 | \begin{center}
 | 
| 445 | 1072 | \begin{tabular}{l@{\hspace{2mm}}c@{\hspace{2mm}}l@{\hspace{8mm}}l}
 | 
| 274 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1073 | & & & \hspace{5mm}rectification \\
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1074 | & & & \hspace{5mm}functions:\\
 | 
| 445 | 1075 | \bl{$r \cdot \ZERO$} & $\mapsto$ & \bl{$\ZERO$} & \\ 
 | 
| 1076 | \bl{$\ZERO \cdot r$} & $\mapsto$ & \bl{$\ZERO$} & \\ 
 | |
| 1077 | \bl{$r \cdot \ONE$} & $\mapsto$ & \bl{$r$} & \bl{$\lambda f_1\,f_2\,v.\, Seq(f_1\,v, f_2\,Empty)$}\\ 
 | |
| 1078 | \bl{$\ONE \cdot r$} & $\mapsto$ & \bl{$r$} & \bl{$\lambda f_1\,f_2\,v.\, Seq(f_1\,Empty, f_2\,v)$}\\ 
 | |
| 1079 | \bl{$r + \ZERO$} & $\mapsto$ & \bl{$r$}   & \bl{$\lambda f_1\,f_2\,v.\, Left(f_1\,v)$}\\ 
 | |
| 1080 | \bl{$\ZERO + r$} & $\mapsto$ & \bl{$r$}   & \bl{$\lambda f_1\,f_2\,v.\, Right(f_2\,v)$}\\
 | |
| 274 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1081 | \bl{$r + r$} & $\mapsto$ & \bl{$r$} & \bl{$\lambda f_1\,f_2\,v.\, Left(f_1\,v)$}
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1082 | \end{tabular}
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1083 | \end{center}\medskip\pause
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1084 | |
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1085 | \small | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1086 | old \bl{$simp$} returns a rexp;\\
 | 
| 445 | 1087 | new \bl{$simp$} returns a rexp and a rectification~function.
 | 
| 274 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1088 | \end{frame}
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1089 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1090 | |
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1091 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1092 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1093 | \begin{frame}[c]
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1094 | \frametitle{Rectification}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1095 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1096 | \begin{center}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1097 | \begin{tabular}{l}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1098 | \bl{$simp(r)$}:\\
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1099 | \quad case \bl{$r = r_1 + r_2$}\\
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1100 | \qquad let \bl{$(r_{1s}, f_{1s}) = simp(r_1)$}\\
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1101 | \qquad \phantom{let} \bl{$(r_{2s}, f_{2s}) = simp(r_2)$}\smallskip\\
 | 
| 445 | 1102 | \qquad case \bl{$r_{1s} = \ZERO$}: 
 | 
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1103 |        return \bl{$(r_{2s}, \lambda v. \,Right(f_{2s}(v)))$}\\
 | 
| 445 | 1104 | \qquad case \bl{$r_{2s} = \ZERO$}: 
 | 
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1105 |        return \bl{$(r_{1s}, \lambda v. \,Left(f_{1s}(v)))$}\\
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1106 | \qquad case \bl{$r_{1s} = r_{2s}$}:
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1107 |        return \bl{$(r_{1s}, \lambda v. \,Left(f_{1s}(v)))$}\\
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1108 | \qquad otherwise: | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1109 |        return \bl{$(r_{1s} + r_{2s}, f_{alt}(f_{1s}, f_{2s}))$}\\
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1110 | \end{tabular}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1111 | \end{center}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1112 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1113 | \small | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1114 | \begin{center}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1115 | \begin{tabular}{l@{\hspace{1mm}}l}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1116 | \bl{$f_{alt}(f_1, f_2) \dn$}\\
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1117 | \qquad \bl{$\lambda v.\,$} case \bl{$v = Left(v')$}: 
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1118 |       & return \bl{$Left(f_1(v'))$}\\
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1119 | \qquad \phantom{$\lambda v.\,$} case \bl{$v = Right(v')$}: 
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1120 |       & return \bl{$Right(f_2(v'))$}\\      
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1121 | \end{tabular}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1122 | \end{center}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1123 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1124 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1125 | \end{frame}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1126 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1127 | |
| 445 | 1128 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1129 | \begin{frame}[c]
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1130 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1131 | {\footnotesize\lstinputlisting[language=Scala,numbers=none,
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1132 | xleftmargin=-5mm] {../progs/app05.scala}}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1133 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1134 | \end{frame}
 | 
| 445 | 1135 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1136 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1137 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1138 | \begin{frame}[c]
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1139 | \frametitle{Rectification}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1140 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1141 | \begin{center}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1142 | \begin{tabular}{@{\hspace{-3mm}}l}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1143 | \bl{$simp(r)$}:\ldots\\
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1144 | \quad case \bl{$r = r_1 \cdot r_2$}\\
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1145 | \qquad let \bl{$(r_{1s}, f_{1s}) = simp(r_1)$}\\
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1146 | \qquad \phantom{let} \bl{$(r_{2s}, f_{2s}) = simp(r_2)$}\smallskip\\
 | 
| 445 | 1147 | \qquad case \bl{$r_{1s} = \ZERO$}: 
 | 
| 1148 |        return \bl{$(\ZERO, f_{error})$}\\
 | |
| 1149 | \qquad case \bl{$r_{2s} = \ZERO$}: 
 | |
| 1150 |        return \bl{$(\ZERO, f_{error})$}\\
 | |
| 1151 | \qquad case \bl{$r_{1s} = \ONE$}: 
 | |
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1152 | return \bl{$(r_{2s}, \lambda v. \,Seq(f_{1s}(Empty), f_{2s}(v)))$}\\
 | 
| 445 | 1153 | \qquad case \bl{$r_{2s} = \ONE$}: 
 | 
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1154 | return \bl{$(r_{1s}, \lambda v. \,Seq(f_{1s}(v), f_{2s}(Empty)))$}\\
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1155 | \qquad otherwise: | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1156 |        return \bl{$(r_{1s} \cdot r_{2s}, f_{seq}(f_{1s}, f_{2s}))$}\\
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1157 | \end{tabular}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1158 | \end{center}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1159 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1160 | \small | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1161 | \begin{center}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1162 | \begin{tabular}{l@{\hspace{1mm}}l}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1163 | \bl{$f_{seq}(f_1, f_2) \dn$}\\
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1164 | \qquad \bl{$\lambda v.\,$ case $v = Seq(v_1, v_2)$}: 
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1165 |       & return \bl{$Seq(f_1(v_1), f_2(v_2))$}\\
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1166 | \end{tabular}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1167 | \end{center}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1168 | \end{frame}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1169 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1170 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1171 | |
| 451 | 1172 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1173 | \begin{frame}[c]
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1174 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1175 | {\footnotesize\lstinputlisting[language=Scala,numbers=none,
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1176 | xleftmargin=-5mm] {../progs/app06.scala}}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1177 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1178 | \end{frame}
 | 
| 451 | 1179 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 1180 | ||
| 1181 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | |
| 1182 | \begin{frame}[t]
 | |
| 1183 | \frametitle{Rectification Example}
 | |
| 1184 | ||
| 1185 | \begin{center}
 | |
| 1186 | \bl{$\only<1>{(b \cdot c)}%
 | |
| 1187 |      \only<2-3>{(\underline{b \cdot c})}%
 | |
| 1188 |      \only<1-3>{+}% 
 | |
| 1189 |      \only<1>{(\ZERO + \ONE)}%
 | |
| 1190 |      \only<2-3>{(\underline{\ZERO + \ONE})}$}%
 | |
| 1191 | \only<4->{%
 | |
| 1192 | \bl{$\underline{(b \cdot c) + (\ZERO + \ONE)}$}%
 | |
| 1193 | } | |
| 1194 | $\mapsto$ | |
| 1195 | \bl{$(b \cdot c) + \ONE$}
 | |
| 1196 | \end{center}\bigskip
 | |
| 1197 | ||
| 1198 | \onslide<3->{%
 | |
| 1199 | \begin{center}
 | |
| 1200 | \begin{tabular}{lcl}
 | |
| 1201 | \bl{$f_{s1}$} & \bl{$=$} & \bl{$\lambda v.v$}\\
 | |
| 1202 | \bl{$f_{s2}$} & \bl{$=$} & \bl{$\lambda v. \textit{Right}(v)$}
 | |
| 1203 | \end{tabular}
 | |
| 1204 | \end{center}}
 | |
| 1205 | ||
| 1206 | \only<4>{%
 | |
| 1207 | \begin{center}
 | |
| 1208 | \begin{tabular}{@{}l@{\hspace{1mm}}l@{}}
 | |
| 1209 | \bl{$f_{alt}(f_{s1}, f_{s2}) \dn$}\\
 | |
| 1210 | \quad \bl{$\lambda v.\,$} 
 | |
| 1211 |         case \bl{$v = Left(v')$}: 
 | |
| 1212 |       & return \bl{$Left(f_{s1}(v'))$}\\
 | |
| 1213 | \quad \phantom{$\lambda v.\,$} 
 | |
| 1214 |         case \bl{$v = Right(v')$}: 
 | |
| 1215 |       & return \bl{$Right(f_{s2}(v'))$}\\ 
 | |
| 1216 | \end{tabular}
 | |
| 1217 | \end{center}}%
 | |
| 1218 | \only<5->{%
 | |
| 1219 | \begin{center}
 | |
| 1220 | \begin{tabular}{@{}l@{\hspace{1mm}}l@{}}
 | |
| 1221 | \only<5->{\phantom{\bl{$f_{alt}(f_{s1}, f_{s2}) \dn$}}}\\
 | |
| 1222 | \quad \bl{$\lambda v.\,$} 
 | |
| 1223 |         case \bl{$v = Left(v')$}: 
 | |
| 1224 |       & return \bl{$Left(v')$}\\
 | |
| 1225 | \quad \phantom{$\lambda v.\,$} 
 | |
| 1226 |         case \bl{$v = Right(v')$}: 
 | |
| 1227 |       & return \bl{$Right(Right(v'))$}\\ 
 | |
| 1228 | \end{tabular}
 | |
| 1229 | \end{center}}%
 | |
| 1230 | ||
| 1231 | \only<6->{%
 | |
| 1232 | \begin{center}
 | |
| 1233 | \begin{tabular}{@{}l@{\hspace{4mm}}l@{}}
 | |
| 1234 | \bl{$\textit{mkeps}$} simplified case: &
 | |
| 1235 | \bl{$\textit{Right}(\textit{Empty})$}\\
 | |
| 1236 | rectified case: & | |
| 1237 | \bl{$\textit{Right}(\textit{Right}(\textit{Empty}))$}
 | |
| 1238 | \end{tabular}
 | |
| 1239 | \end{center}}%
 | |
| 1240 | ||
| 1241 | \end{frame}
 | |
| 1242 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | |
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1243 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1244 | |
| 274 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1245 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1246 | \begin{frame}[c]
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1247 | \frametitle{Lexing with Simplification}
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1248 | |
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1249 | \begin{center}
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1250 | \begin{tabular}{l@{\hspace{1mm}}c@{\hspace{1mm}}l}
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1251 |   \bl{$lex\,r\,[]$} & \bl{$\dn$}  & \bl{if $nullable(r)$ then $mkeps(r)$ else $error$}\\
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1252 |   \bl{$lex\,r\,c::s$} & \bl{$\dn$}  & \bl{let $(r', frect) = simp(der(c, r))$}\smallskip\\
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1253 |                       & & \bl{$inj\,r\,c\,(frect(lex(r', s)))$}\\
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1254 | \end{tabular}
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1255 | \end{center}\bigskip
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1256 | |
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1257 | \begin{center}\small
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1258 | \begin{tikzpicture}[node distance=1.1cm,every node/.style={minimum size=7mm}]
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1259 | \node (r1)  {\bl{$r_1$}};
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1260 | \node (r2) [right=of r1] {\bl{$r_2$}};
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1261 | \draw[->,line width=1mm]  (r1) -- (r2) node[above,midway] {\bl{$der\,a$}};
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1262 | \node (r3) [right=of r2] {\bl{$r_3$}};
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1263 | \draw[->,line width=1mm]  (r2) -- (r3) node[above,midway] {\bl{$der\,b$}};
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1264 | \node (r4) [right=of r3] {\bl{$r_4$}};
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1265 | \draw[->,line width=1mm]  (r3) -- (r4) node[above,midway] {\bl{$der\,c$}};
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1266 | \draw (r4) node[anchor=west] {\;\raisebox{3mm}{\bl{$nullable$}}};
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1267 | \node (v4) [below=of r4] {\bl{$v_4$}};
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1268 | \draw[->,line width=1mm] (r4) -- (v4); | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1269 | \node (v3) [left=of v4] {\bl{$v_3$}};
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1270 | \draw[->,line width=1mm]  (v4) -- (v3) node[below,midway] {\bl{$inj\,c$}};
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1271 | \node (v2) [left=of v3] {\bl{$v_2$}};
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1272 | \draw[->,line width=1mm]  (v3) -- (v2) node[below,midway] {\bl{$inj\,b$}};
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1273 | \node (v1) [left=of v2] {\bl{$v_1$}};
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1274 | \draw[->,line width=1mm]  (v2) -- (v1) node[below,midway] {\bl{$inj\,a$}};
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1275 | \draw[->,line width=0.5mm] (r3) -- (v3); | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1276 | \draw[->,line width=0.5mm] (r2) -- (v2); | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1277 | \draw[->,line width=0.5mm] (r1) -- (v1); | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1278 | \draw (r4) node[anchor=north west] {\;\raisebox{-8mm}{\bl{$mkeps$}}};
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1279 | \end{tikzpicture}
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1280 | \end{center}
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1281 | |
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1282 | |
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1283 | \end{frame}
 | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1284 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
21f0f24424ab
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
273diff
changeset | 1285 | |
| 451 | 1286 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 1287 | \begin{frame}[c]
 | |
| 1288 | \frametitle{Environments}
 | |
| 1289 | ||
| 1290 | Obtaining the ``recorded'' parts of a value: | |
| 1291 | ||
| 1292 | \begin{center}
 | |
| 1293 | \begin{tabular}{lcl}
 | |
| 1294 |   \bl{$env(Empty)$}     & \bl{$\dn$} & \bl{$[]$}\\
 | |
| 1295 |   \bl{$env(Char(c))$}   & \bl{$\dn$} & \bl{$[]$}\\
 | |
| 1296 |   \bl{$env(Left(v))$}   & \bl{$\dn$} & \bl{$env(v)$}\\
 | |
| 1297 |   \bl{$env(Right(v))$}  & \bl{$\dn$} & \bl{$env(v)$}\\
 | |
| 1298 |   \bl{$env(Seq(v_1,v_2))$}& \bl{$\dn$} & \bl{$env(v_1) \,@\, env(v_2)$}\\
 | |
| 578 | 1299 |   \bl{$env(Stars\,[v_1,\ldots ,v_n])$} & \bl{$\dn$} & 
 | 
| 451 | 1300 |      \bl{$env(v_1) \,@\ldots @\, env(v_n)$}\\
 | 
| 1301 |   \bl{$env(Rec(x:v))$} & \bl{$\dn$} & \bl{$(x:|v|) :: env(v)$}\\
 | |
| 1302 | \end{tabular}
 | |
| 1303 | \end{center}
 | |
| 1304 | ||
| 1305 | \end{frame}
 | |
| 1306 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | |
| 1307 | ||
| 1308 | ||
| 1309 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | |
| 1310 | \begin{frame}[c]
 | |
| 1311 | \frametitle{While Tokens}
 | |
| 1312 | ||
| 1313 | \begin{center}
 | |
| 1314 | \begin{tabular}{@{}r@{\hspace{2mm}}c@{\hspace{2mm}}l@{}}
 | |
| 1315 | \pcode{WHILE\_REGS} & $\dn$ & \raisebox{-1mm}{\large(}\pcode{("k" : KEYWORD)} +\\ 
 | |
| 1316 |                   &       & \phantom{(}\pcode{("i" : ID)} +\\ 
 | |
| 1317 |                   &       & \phantom{(}\pcode{("o" : OP)} + \\
 | |
| 1318 |                   &       & \phantom{(}\pcode{("n" : NUM)} + \\
 | |
| 1319 |                   &       & \phantom{(}\pcode{("s" : SEMI)} +\\ 
 | |
| 1320 |                   &       & \phantom{(}\pcode{("p" : (LPAREN + RPAREN))} +\\ 
 | |
| 1321 |                   &       & \phantom{(}\pcode{("b" : (BEGIN + END))} +\\ 
 | |
| 1322 |                   &       & \phantom{(}\pcode{("w" : WHITESPACE)}\raisebox{-1mm}{\large)$^*$}
 | |
| 1323 | \end{tabular}
 | |
| 1324 | \end{center}
 | |
| 1325 | ||
| 1326 | \end{frame}
 | |
| 1327 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | |
| 1328 | ||
| 1329 | ||
| 1330 | ||
| 1331 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | |
| 1332 | \begin{frame}[t]
 | |
| 1333 | ||
| 1334 | \consolas | |
| 1335 | \begin{center}
 | |
| 1336 | \code{"if true then then 42 else +"}
 | |
| 1337 | \end{center}
 | |
| 1338 | ||
| 1339 | \only<1>{
 | |
| 1340 | \small\begin{tabular}{l}
 | |
| 1341 | KEYWORD(if),\\ | |
| 1342 | WHITESPACE,\\ | |
| 1343 | IDENT(true),\\ | |
| 1344 | WHITESPACE,\\ | |
| 1345 | KEYWORD(then),\\ | |
| 1346 | WHITESPACE,\\ | |
| 1347 | KEYWORD(then),\\ | |
| 1348 | WHITESPACE,\\ | |
| 1349 | NUM(42),\\ | |
| 1350 | WHITESPACE,\\ | |
| 1351 | KEYWORD(else),\\ | |
| 1352 | WHITESPACE,\\ | |
| 1353 | OP(+) | |
| 1354 | \end{tabular}}
 | |
| 1355 | ||
| 1356 | \only<2>{
 | |
| 1357 | \small\begin{tabular}{l}
 | |
| 1358 | KEYWORD(if),\\ | |
| 1359 | IDENT(true),\\ | |
| 1360 | KEYWORD(then),\\ | |
| 1361 | KEYWORD(then),\\ | |
| 1362 | NUM(42),\\ | |
| 1363 | KEYWORD(else),\\ | |
| 1364 | OP(+) | |
| 1365 | \end{tabular}}
 | |
| 1366 | ||
| 1367 | \end{frame}
 | |
| 1368 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | |
| 1369 | ||
| 1370 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | |
| 1371 | \begin{frame}[c]
 | |
| 521 | 1372 | \frametitle{Lexer: Two Rules}
 | 
| 451 | 1373 | |
| 1374 | \begin{itemize}
 | |
| 1375 | \item Longest match rule (``maximal munch rule''): The | |
| 1376 | longest initial substring matched by any regular expression is taken | |
| 1377 | as next token.\bigskip | |
| 1378 | ||
| 1379 | \item Rule priority: | |
| 1380 | For a particular longest initial substring, the first regular | |
| 1381 | expression that can match determines the token. | |
| 1382 | ||
| 1383 | \end{itemize}
 | |
| 1384 | ||
| 1385 | %\url{http://www.technologyreview.com/tr10/?year=2011}
 | |
| 1386 | ||
| 1387 | %finite deterministic automata/ nondeterministic automaton | |
| 1388 | ||
| 1389 | %\item problem with infix operations, for example i-12 | |
| 1390 | ||
| 1391 | ||
| 1392 | \end{frame}
 | |
| 1393 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | |
| 1394 | ||
| 1395 | ||
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1396 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1397 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1398 | \begin{frame}[c]
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1399 | \begin{center}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1400 | \begin{tabular}{@ {}l@ {\hspace{2mm}}c@ {\hspace{2mm}}l@ {}}
 | 
| 578 | 1401 | \bl{$zeroable(\ZERO)$}      & \bl{$\dn$} & \bl{$true$}\\
 | 
| 1402 | \bl{$zeroable(\ONE)$}         & \bl{$\dn$} & \bl{$\textit{false}$}\\
 | |
| 445 | 1403 | \bl{$zeroable(c)$}                & \bl{$\dn$} & \bl{$\textit{false}$}\\
 | 
| 1404 | \bl{$zeroable(r_1 + r_2)$}        & \bl{$\dn$} & \bl{$zeroable(r_1) \wedge zeroable(r_2)$}\\ 
 | |
| 1405 | \bl{$zeroable(r_1 \cdot r_2)$}    & \bl{$\dn$} & \bl{$zeroable(r_1) \vee zeroable(r_2)$}\\
 | |
| 1406 | \bl{$zeroable(r^*)$}              & \bl{$\dn$} & \bl{$\textit{false}$}\\
 | |
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1407 | \end{tabular}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1408 | \end{center}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1409 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1410 | \begin{center}
 | 
| 445 | 1411 | \bl{$zeroable(r)$} if and only if \bl{$L(r) = \{\}$}
 | 
| 352 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1412 | \end{center}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1413 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1414 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1415 | \end{frame}
 | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1416 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1417 | |
| 
1e1b0fe66107
updated
 Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 
283diff
changeset | 1418 | |
| 33 | 1419 | \end{document}
 | 
| 1420 | ||
| 1421 | %%% Local Variables: | |
| 1422 | %%% mode: latex | |
| 1423 | %%% TeX-master: t | |
| 1424 | %%% End: | |
| 1425 |