ChengsongTanPhdThesis/Chapters/Bitcoded1.tex
author Chengsong
Mon, 22 Aug 2022 17:58:29 +0100
changeset 582 3e19073e91f4
parent 581 9db2500629be
child 585 4969ef817d92
permissions -rwxr-xr-x
chap3 done
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
532
cc54ce075db5 restructured
Chengsong
parents:
diff changeset
     1
% Chapter Template
cc54ce075db5 restructured
Chengsong
parents:
diff changeset
     2
cc54ce075db5 restructured
Chengsong
parents:
diff changeset
     3
% Main chapter title
538
8016a2480704 intro and chap2
Chengsong
parents: 537
diff changeset
     4
\chapter{Bit-coded Algorithm of Sulzmann and Lu}
532
cc54ce075db5 restructured
Chengsong
parents:
diff changeset
     5
cc54ce075db5 restructured
Chengsong
parents:
diff changeset
     6
\label{Bitcoded1} % Change X to a consecutive number; for referencing this chapter elsewhere, use \ref{ChapterX}
cc54ce075db5 restructured
Chengsong
parents:
diff changeset
     7
%Then we illustrate how the algorithm without bitcodes falls short for such aggressive 
cc54ce075db5 restructured
Chengsong
parents:
diff changeset
     8
%simplifications and therefore introduce our version of the bitcoded algorithm and 
cc54ce075db5 restructured
Chengsong
parents:
diff changeset
     9
%its correctness proof in 
cc54ce075db5 restructured
Chengsong
parents:
diff changeset
    10
%Chapter 3\ref{Chapter3}. 
564
Chengsong
parents: 543
diff changeset
    11
In this chapter, we are going to describe the bit-coded algorithm
Chengsong
parents: 543
diff changeset
    12
introduced by Sulzmann and Lu \parencite{Sulzmann2014} to address the growth problem of 
Chengsong
parents: 543
diff changeset
    13
regular expressions. 
579
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    14
We have implemented their algorithm in Scala, and found out inefficiencies
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    15
in their algorithm such as de-duplication not working properly and redundant
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    16
fixpoint construction. Their algorithm is improved and verified with the help of
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    17
formal proofs.
580
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
    18
\section{The Motivation Behind Using Bitcodes}
579
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    19
We first do a recap of what was going on 
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    20
in the lexer algorithm in Chapter \ref{Inj},
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    21
\begin{center}
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    22
\begin{tabular}{lcl}
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    23
	$\lexer \; r \; [] $ & $=$ & $\textit{if} \; (\nullable \; r)\; \textit{then}\;  \Some(\mkeps \; r) \; \textit{else} \; \None$\\
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    24
	$\lexer \; r \;c::s$ & $=$ & $\textit{case}\; (\lexer \; (r\backslash c) \; s) \;\textit{of}\; $\\
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    25
	& & $\quad \phantom{\mid}\; \None \implies \None$\\
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    26
	& & $\quad \mid           \Some(v) \implies \Some(\inj \; r\; c\; v)$
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    27
\end{tabular}
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    28
\end{center}
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    29
\noindent
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    30
The algorithm recursively calls $\lexer$ on 
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    31
each new character input,
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    32
and before starting a child call
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    33
it stores information of previous lexing steps
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    34
on a stack, in the form of regular expressions
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    35
and characters: $r_0$, $c_0$, $r_1$, $c_1$, etc.
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    36
Each descent into deeper recursive calls in $\lexer$
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    37
causes a new pair of $r_i, c_i$ to be pushed to the call stack.
580
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
    38
\begin{figure}[H]
579
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    39
\begin{tikzpicture}[->,>=stealth',shorten >=1pt,auto,thick] 
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    40
%\draw (-6,-6) grid (6,6);
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    41
\node  [ circle ] (r) at (-6, 5) {$r$};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    42
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    43
%\node (-4, 6) (c1) circle [radius = 0.3] {$c_1$};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    44
\node  [circle, minimum size = 0.1, draw] (c1) at (-4, 5.4) {$c_1$};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    45
%
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    46
%\node (-2, 5) (r1) circle [radius = 0.5] {$r_1$};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    47
\node  [minimum size = 0.5, circle, draw] (r1) at (-2, 5) {$r_1$};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    48
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    49
\node [minimum width = 2cm, rectangle, draw] (stack) at (0, 3) {Stack};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    50
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    51
\path
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    52
	(r)
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    53
        edge [->, >=stealth',shorten >=1pt] node[left] {} (r1);
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    54
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    55
\path   (r1)
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    56
	edge [bend right, dashed] node {saved} (stack);
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    57
\path   (c1)
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    58
	edge [bend right, dashed] node {} (stack);
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    59
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    60
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    61
\end{tikzpicture}
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    62
\caption{First Derivative Taken}
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    63
\end{figure}
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    64
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    65
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    66
580
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
    67
\begin{figure}[H]
579
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    68
\begin{tikzpicture}[->,>=stealth',shorten >=1pt,auto,thick] 
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    69
%\draw (-6,-6) grid (6,6);
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    70
\node  [ circle ] (r) at (-6, 5) {$r$};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    71
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    72
%\node (-4, 6) (c1) circle [radius = 0.3] {$c_1$};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    73
\node  [circle, minimum size = 0.1, ] (c1) at (-4, 5.4) {$c_1$};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    74
%
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    75
%\node (-2, 5) (r1) circle [radius = 0.5] {$r_1$};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    76
\node  [minimum size = 0.5, circle, ] (r1) at (-2, 5) {$r_1$};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    77
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    78
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    79
\node [circle, minimum size = 0.1, draw] (c2) at (0, 5.4) {$c_2$};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    80
%
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    81
%\node (2, 5) (r2) circle [radius = 0.5] {$r_2$};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    82
\node [circle, draw] (r2) at (2, 5) {$r_2$};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    83
\node [minimum width = 3cm, minimum height = 1cm, rectangle, draw] (stack) at (0, 2) {\large Stack};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    84
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    85
\path
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    86
	(r)
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    87
        edge [->, >=stealth',shorten >=1pt] node[left] {} (r1);
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    88
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    89
\path   (r2)
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    90
	edge [bend right, dashed] node {} (stack);
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    91
\path   (c2)
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    92
	edge [bend right, dashed] node {} (stack);
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    93
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    94
\path   (r1)
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    95
	edge [] node {} (r2);
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    96
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    97
\end{tikzpicture}
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    98
\caption{Second Derivative Taken}
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
    99
\end{figure}
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   100
\noindent
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   101
As the number of derivative steps increase,
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   102
the stack would increase:
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   103
580
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   104
\begin{figure}[H]
579
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   105
\begin{tikzpicture}[->,>=stealth',shorten >=1pt,auto,thick] 
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   106
%\draw (-6,-6) grid (6,6);
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   107
\node  [ circle ] (r) at (-6, 5) {$r$};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   108
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   109
%\node (-4, 6) (c1) circle [radius = 0.3] {$c_1$};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   110
\node  [circle, minimum size = 0.1, ] (c1) at (-4, 5.4) {$c_1$};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   111
%
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   112
%\node (-2, 5) (r1) circle [radius = 0.5] {$r_1$};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   113
\node  [minimum size = 0.5, circle, ] (r1) at (-2, 5) {$r_1$};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   114
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   115
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   116
\node [circle, minimum size = 0.1, ] (c2) at (0, 5.4) {$c_2$};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   117
%
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   118
%\node (2, 5) (r2) circle [radius = 0.5] {$r_2$};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   119
\node [circle, ] (r2) at (2, 5) {$r_2$};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   120
\node [minimum width = 4cm, minimum height = 2.5cm, rectangle, draw] (stack) at (0, 1) { \large Stack};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   121
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   122
\node [] (ldots) at (3.5, 5) {};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   123
%\node (6, 5) (rn) circle [radius = 0.5] {$r_n$};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   124
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   125
\node [minimum size = 0.5, circle, ] (rn) at (6, 5) {};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   126
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   127
\node (rldots) at ($(ldots)!.4!(rn)$) {\ldots};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   128
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   129
\path
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   130
	(r)
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   131
        edge [->, >=stealth',shorten >=1pt] node[left] {} (r1);
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   132
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   133
\path   (rldots)
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   134
	edge [bend left, dashed] node {} (stack);
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   135
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   136
\path   (r1)
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   137
	edge [] node {} (r2);
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   138
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   139
\path   (r2)
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   140
	edge [] node {} (ldots);
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   141
\path   (ldots)
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   142
	edge [bend left, dashed] node {} (stack);
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   143
\path   (5.03, 4.9)
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   144
	edge [bend left, dashed] node {} (stack);
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   145
\end{tikzpicture}
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   146
\caption{More Derivatives Taken}
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   147
\end{figure}
580
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   148
579
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   149
580
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   150
\begin{figure}[H]
579
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   151
\begin{tikzpicture}[->,>=stealth',shorten >=1pt,auto,thick] 
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   152
%\draw (-6,-6) grid (6,6);
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   153
\node  [radius = 0.5, circle, draw] (r) at (-6, 5) {$r$};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   154
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   155
%\node (-4, 6) (c1) circle [radius = 0.3] {$c_1$};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   156
\node  [circle, minimum size = 0.1, draw] (c1) at (-4, 5.4) {$c_1$};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   157
%
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   158
%\node (-2, 5) (r1) circle [radius = 0.5] {$r_1$};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   159
\node  [minimum size = 0.5, circle, draw] (r1) at (-2, 5) {$r_1$};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   160
%
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   161
%\node (0, 6)  (c2) circle [radius = 0.3] {$c_2$};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   162
\node [circle, minimum size = 0.1, draw] (c2) at (0, 5.4) {$c_2$};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   163
%
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   164
%\node (2, 5) (r2) circle [radius = 0.5] {$r_2$};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   165
\node [circle, draw] (r2) at (2, 5) {$r_2$};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   166
%
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   167
%
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   168
\node [] (ldots) at (4.5, 5) {};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   169
%\node (6, 5) (rn) circle [radius = 0.5] {$r_n$};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   170
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   171
\node [minimum size = 0.5, circle, draw] (rn) at (6, 5) {$r_n$};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   172
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   173
\node at ($(ldots)!.4!(rn)$) {\ldots};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   174
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   175
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   176
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   177
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   178
\node [minimum size = 6cm, rectangle, draw] (stack) at (0, 0) {\Huge Stack};
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   179
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   180
\path
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   181
	(r)
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   182
        edge [->, >=stealth',shorten >=1pt] node[left] {} (r1);
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   183
\path
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   184
	(r1)
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   185
        edge [] node {} (r2);
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   186
\path   (r2)
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   187
	edge [] node {} (ldots);
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   188
\path   (r)
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   189
	edge [dashed, bend right] node {} (stack);
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   190
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   191
\path   (r1)
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   192
	edge [dashed, ] node {} (stack);
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   193
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   194
\path   (c1)
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   195
	edge [dashed, bend right] node {} (stack);
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   196
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   197
\path   (c2)
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   198
	edge [dashed] node {} (stack);
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   199
\path   (4.5, 5)
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   200
	edge [dashed, bend left] node {} (stack);
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   201
\path   (4.9, 5)
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   202
	edge [dashed, bend left] node {} (stack);
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   203
\path   (5.3, 5)
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   204
	edge [dashed, bend left] node {} (stack);
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   205
\path (r2)
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   206
	edge [dashed, ] node {} (stack);
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   207
\path (rn)
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   208
	edge [dashed, bend left] node {} (stack);
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   209
\end{tikzpicture}
580
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   210
\caption{Before Injection Phase Starts}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   211
\end{figure}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   212
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   213
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   214
\noindent
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   215
After all derivatives have been taken, the stack grows to a maximum size
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   216
and the pair of regular expressions and characters $r_i, c_{i+1}$ 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   217
are then popped out and used in the injection phase.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   218
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   219
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   220
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   221
\begin{figure}[H]
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   222
\begin{tikzpicture}[->,>=stealth',shorten >=1pt,auto,thick] 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   223
%\draw (-6,-6) grid (6,6);
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   224
\node  [radius = 0.5, circle, ] (r) at (-6, 5) {$r$};
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   225
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   226
%\node (-4, 6) (c1) circle [radius = 0.3] {$c_1$};
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   227
\node  [circle, minimum size = 0.1, ] (c1) at (-4, 5.4) {$c_1$};
579
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   228
%
580
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   229
%\node (-2, 5) (r1) circle [radius = 0.5] {$r_1$};
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   230
\node  [minimum size = 0.5, circle, ] (r1) at (-2, 5) {$r_1$};
579
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   231
%
580
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   232
%\node (0, 6)  (c2) circle [radius = 0.3] {$c_2$};
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   233
\node [circle, minimum size = 0.1, ] (c2) at (0, 5.4) {$c_2$};
579
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   234
%
580
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   235
%\node (2, 5) (r2) circle [radius = 0.5] {$r_2$};
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   236
\node [circle, ] (r2) at (2, 5) {$r_2$};
579
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   237
%
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   238
%
580
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   239
\node [] (ldots) at (4.5, 5) {};
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   240
%\node (6, 5) (rn) circle [radius = 0.5] {$r_n$};
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   241
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   242
\node [minimum size = 0.5, circle, ] (rn) at (6, 5) {$r_n$};
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   243
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   244
\node at ($(ldots)!.4!(rn)$) {\ldots};
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   245
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   246
\node [minimum size = 0.5, circle, ] (vn) at (6, -5) {$v_n$};
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   247
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   248
\node [] (ldots2) at (3.5, -5) {};
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   249
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   250
\node  [minimum size = 0.5, circle, ] (v2) at (2, -5) {$v_2$};
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   251
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   252
\node at ($(ldots2)!.4!(v2)$) {\ldots};
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   253
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   254
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   255
\node [circle, ] (v1) at (-2, -5) {$v_1$};
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   256
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   257
\node  [radius = 0.5, circle, ] (v) at (-6, -5) {$v$};
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   258
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   259
\node [minimum size = 6cm, rectangle, draw] (stack) at (0, 0) {\Huge Stack};
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   260
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   261
\path
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   262
	(r)
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   263
        edge [->, >=stealth',shorten >=1pt] node[left] {} (r1);
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   264
\path
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   265
	(r1)
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   266
        edge [] node {} (r2);
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   267
\path   (r2)
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   268
	edge [] node {} (ldots);
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   269
\path   (rn)
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   270
	edge [] node {$\mkeps$} (vn);
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   271
\path   (vn) 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   272
	edge [] node {} (ldots2);
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   273
\path   (v2)
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   274
	edge [] node {$\inj \; r_1 \; c_2\;v_2$} (v1);
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   275
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   276
\path   (v1)
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   277
	edge [] node {$\inj \; r \; c_1 \; v_1$} (v);
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   278
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   279
\path (stack)
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   280
	edge [dashed] node {} (-4.2, -5.2);
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   281
\path (stack)
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   282
	edge [dashed] node {} (-4, -5.2);
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   283
\path (stack)
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   284
	edge [dashed] node {} (-0.1, -5.2);
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   285
\path (stack)
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   286
	edge [dashed] node {} (0.2, -5.26);
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   287
\path (stack)
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   288
	edge [dashed] node {} (3.2, -5);
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   289
\path (stack)
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   290
	edge [dashed] node {} (2.7, -5);
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   291
\path (stack)
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   292
	edge [dashed] node {} (3.7, -5);
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   293
\end{tikzpicture}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   294
\caption{Stored $r_i, c_{i+1}$ Used by $\inj$}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   295
\end{figure}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   296
\noindent
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   297
Storing all $r_i, c_{i+1}$ pairs recursively
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   298
allows the algorithm to work in an elegant way, at the expense of 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   299
storing quite a bit of verbose information.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   300
The stack seems to grow at least quadratically fast with respect
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   301
to the input (not taking into account the size bloat of $r_i$),
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   302
which can be inefficient and prone to stack overflow.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   303
\section{Bitcoded Algorithm}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   304
To address this,
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   305
Sulzmann and Lu chose to  define a new datatype 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   306
called \emph{annotated regular expression},
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   307
which condenses all the partial lexing information
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   308
(that was originally stored in $r_i, c_{i+1}$ pairs)
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   309
into bitcodes.
581
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   310
The bitcodes are then carried with the regular
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   311
expression, and augmented or moved around
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   312
as the lexing goes on.
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   313
It becomes unnecessary
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   314
to remember all the 
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   315
intermediate expresssions, but only the most recent one
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   316
with this bit-carrying regular expression.
580
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   317
Annotated regular expressions 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   318
are defined as the following 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   319
Isabelle datatype \footnote{ We use subscript notation to indicate
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   320
	that the bitcodes are auxiliary information that do not
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   321
interfere with the structure of the regular expressions }:
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   322
\begin{center}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   323
\begin{tabular}{lcl}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   324
  $\textit{a}$ & $::=$  & $\ZERO$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   325
                  & $\mid$ & $_{bs}\ONE$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   326
                  & $\mid$ & $_{bs}{\bf c}$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   327
                  & $\mid$ & $_{bs}\sum\,as$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   328
                  & $\mid$ & $_{bs}a_1\cdot a_2$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   329
                  & $\mid$ & $_{bs}a^*$
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   330
\end{tabular}    
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   331
\end{center}  
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   332
\noindent
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   333
where $bs$ stands for bit-codes, $a$  for $\mathbf{a}$nnotated regular
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   334
expressions and $as$ for lists of annotated regular expressions.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   335
The alternative constructor, written, $\sum$, has been generalised to 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   336
accept a list of annotated regular expressions rather than just two.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   337
Why is it generalised? This is because when we open up nested 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   338
alternatives, there could be more than two elements at the same level
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   339
after de-duplication, which can no longer be stored in a binary
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   340
constructor.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   341
Bits and bitcodes (lists of bits) are defined as:
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   342
\begin{center}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   343
		$b ::=   S \mid  Z \qquad
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   344
bs ::= [] \mid b::bs    
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   345
$
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   346
\end{center}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   347
\noindent
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   348
We use $S$ and $Z$ rather than $1$ and $0$ is to avoid
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   349
confusion with the regular expressions $\ZERO$ and $\ONE$.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   350
The idea is to use the attached bitcodes
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   351
to indicate which choice was made at a certain point
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   352
during lexing.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   353
For example,
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   354
$(_{Z}a+_{S}b) \backslash a$ gives us
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   355
$_{Z}\ONE + \ZERO$, this $Z$ bitcode will
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   356
later be used to decode that a left branch was
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   357
selected at the time when the part $a+b$ is being taken
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   358
derivative of.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   359
\subsection{A Bird's Eye View of the Bit-coded Lexer}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   360
Before we give out the rest of the functions and definitions 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   361
related to our
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   362
$\blexer$ (\emph{b}-itcoded lexer), we first provide a high-level
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   363
view of the algorithm, so the reader does not get lost in
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   364
the details.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   365
\begin{figure}[H]
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   366
\begin{tikzpicture}[->,>=stealth',shorten >=1pt,auto,thick] 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   367
%\draw (-6,-6) grid (6,6);
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   368
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   369
	\node [circle, draw] (r0) at (-6, 2) {$r$};
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   370
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   371
	\node  [radius = 0.5, circle, draw] (r) at (-6, 5) {$_{bs}a$};
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   372
	\path (r0)
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   373
		edge [] node {$\internalise$} (r);
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   374
%\node (-4, 6) (c1) circle [radius = 0.3] {$c_1$};
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   375
\node  [circle, minimum size = 0.1, draw] (c1) at (-4, 5.4) {$c_1$};
579
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   376
%
580
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   377
%\node (-2, 5) (r1) circle [radius = 0.5] {$r_1$};
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   378
\node  [minimum size = 1.0cm, circle, draw] (r1) at (-2, 5) {$_{bs_1}a_1$};
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   379
%
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   380
%\node (0, 6)  (c2) circle [radius = 0.3] {$c_2$};
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   381
\node [circle, minimum size = 0.1, draw] (c2) at (0, 5.4) {$c_2$};
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   382
%
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   383
%\node (2, 5) (r2) circle [radius = 0.5] {$r_2$};
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   384
\node [circle, draw, minimum size = 1.4cm] (r2) at (2, 5) {$_{bs_2}a_2$};
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   385
%
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   386
%
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   387
\node [] (ldots) at (4.5, 5) {};
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   388
%\node (6, 5) (rn) circle [radius = 0.5] {$r_n$};
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   389
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   390
\node [minimum size = 2.2cm, circle, draw] (rn) at (6, 5) {$_{bs_n}a_n$};
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   391
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   392
\node at ($(ldots)!.1!(rn)$) {\ldots};
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   393
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   394
\node [minimum size = 0.5, circle, ] (v) at (6, 2) {$v$};
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   395
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   396
%\node [] (v2) at (4, -5) {};
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   397
%
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   398
%\node [draw, cross out] (ldots2) at (5, -5) {};
579
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   399
%
580
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   400
%\node at ($(ldots2)!.4!(v2)$) {\ldots};
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   401
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   402
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   403
\node [align = center] (decode) at (6.6, 3.2) {$\bmkeps$\\$\decode$};
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   404
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   405
\path (c1)
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   406
	edge [dashed, bend left] node {} (r0);
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   407
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   408
\path (c2)
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   409
	edge [dashed, bend left] node {} (r0);
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   410
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   411
\path (r1)
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   412
	edge [dashed, bend right] node {} (r2);
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   413
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   414
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   415
\path
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   416
	(r)
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   417
        edge [dashed, bend right] node[left] {} (r1);
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   418
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   419
\path
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   420
	(r)
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   421
        edge [->, >=stealth',shorten >=1pt] node[left] {} (r1);
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   422
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   423
\path
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   424
	(r1)
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   425
        edge [] node {} (r2);
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   426
\path   (r2)
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   427
	edge [] node {} (ldots);
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   428
\path   (rn)
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   429
	edge [] node {} (v);
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   430
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   431
\path	(r0)
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   432
	edge [dashed, bend right] node {} (decode);
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   433
%\path	(v)
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   434
	%edge [] node {} (ldots2);
579
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   435
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   436
35df9cdd36ca more chap3
Chengsong
parents: 576
diff changeset
   437
580
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   438
\end{tikzpicture}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   439
\caption{Bird's Eye View of $\blexer$}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   440
\end{figure}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   441
\noindent
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   442
The plain regular expressions
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   443
are first ``lifted'' to an annotated regular expression,
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   444
with the function called \emph{internalise}.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   445
Then the annotated regular expression $_{bs}a$ will
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   446
go through successive derivatives with respect 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   447
to the input stream of characters $c_1, c_2$ etc.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   448
Each time a derivative is taken, the bitcodes
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   449
are moved around, discarded or augmented together 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   450
with the regular expression they are attached to.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   451
After all input has been consumed, the 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   452
bitcodes are collected by $\bmkeps$,
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   453
which traverses the nullable part of the regular expression
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   454
and collect the bitcodes along the way.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   455
The collected bitcodes are then $\decode$d with the guidance
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   456
of the input regular expression $r$.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   457
The most notable improvements of $\blexer$
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   458
over $\lexer$ are 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   459
\begin{itemize}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   460
	\item
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   461
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   462
		An absence of the second injection phase.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   463
	\item
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   464
		One need not store each pair of the 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   465
		intermediate regular expressions $_{bs_i}a_i$ and  $c_{i+1}$. 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   466
		The previous annotated regular expression $_{bs_i}a_i$'s information is passed
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   467
		on without loss to its successor $_{bs_{i+1}}a_{i+1}$,
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   468
		and $c_{i+1}$'s already contained in the strings in $L\;r$ \footnote{
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   469
		which can be easily recovered if we decode in the correct order}.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   470
	\item
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   471
		The simplification works much better--one can maintain correctness
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   472
		while applying quite strong simplifications, as we shall wee.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   473
\end{itemize}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   474
\noindent
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   475
In the next section we will 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   476
give the operations needed in $\blexer$,
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   477
with some remarks on the idea behind their definitions.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   478
\subsection{Operations in $\textit{Blexer}$}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   479
The first operation we define related to bit-coded regular expressions
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   480
is how we move bits to the inside of regular expressions.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   481
Called $\fuse$, this operation attaches bit-codes 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   482
to the front of an annotated regular expression:
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   483
\begin{center}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   484
\begin{tabular}{lcl}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   485
  $\textit{fuse}\;bs \; \ZERO$ & $\dn$ & $\ZERO$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   486
  $\textit{fuse}\;bs\; _{bs'}\ONE$ & $\dn$ &
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   487
     $_{bs @ bs'}\ONE$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   488
  $\textit{fuse}\;bs\;_{bs'}{\bf c}$ & $\dn$ &
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   489
     $_{bs@bs'}{\bf c}$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   490
  $\textit{fuse}\;bs\,_{bs'}\sum\textit{as}$ & $\dn$ &
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   491
     $_{bs@bs'}\sum\textit{as}$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   492
  $\textit{fuse}\;bs\; _{bs'}a_1\cdot a_2$ & $\dn$ &
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   493
     $_{bs@bs'}a_1 \cdot a_2$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   494
  $\textit{fuse}\;bs\,_{bs'}a^*$ & $\dn$ &
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   495
     $_{bs @ bs'}a^*$
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   496
\end{tabular}    
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   497
\end{center} 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   498
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   499
\noindent
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   500
With \emph{fuse} we are able to define the $\internalise$ function
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   501
that translates a ``standard'' regular expression into an
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   502
annotated regular expression.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   503
This function will be applied before we start
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   504
with the derivative phase of the algorithm.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   505
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   506
\begin{center}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   507
\begin{tabular}{lcl}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   508
  $(\ZERO)^\uparrow$ & $\dn$ & $\ZERO$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   509
  $(\ONE)^\uparrow$ & $\dn$ & $_{[]}\ONE$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   510
  $(c)^\uparrow$ & $\dn$ & $_{[]}{\bf c}$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   511
  $(r_1 + r_2)^\uparrow$ & $\dn$ &
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   512
  $_{[]}\sum[\textit{fuse}\,[Z]\,r_1^\uparrow,\,
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   513
  \textit{fuse}\,[S]\,r_2^\uparrow]$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   514
  $(r_1\cdot r_2)^\uparrow$ & $\dn$ &
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   515
         $_{[]}r_1^\uparrow \cdot r_2^\uparrow$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   516
  $(r^*)^\uparrow$ & $\dn$ &
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   517
         $_{[]}(r^\uparrow)^*$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   518
\end{tabular}    
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   519
\end{center}    
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   520
\noindent
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   521
We use an up arrow with postfix notation
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   522
to denote this operation
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   523
for convenience. 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   524
The opposite of $\textit{internalise}$ is
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   525
$\erase$, where all the bit-codes are removed,
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   526
and the alternative operator $\sum$ for annotated
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   527
regular expressions is transformed to the binary version 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   528
in plain regular expressions.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   529
\begin{center}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   530
	\begin{tabular}{lcl}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   531
		$\ZERO_\downarrow$ & $\dn$ & $\ZERO$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   532
		$( _{bs}\ONE )_\downarrow$ & $\dn$ & $\ONE$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   533
		$( _{bs}\mathbf{c} )_\downarrow$ & $\dn$ & $\mathbf{c}$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   534
		$( _{bs} a_1 \cdot a_2 )_\downarrow$ & $\dn$ & 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   535
		$ (a_1) _\downarrow \cdot  (a_2) _\downarrow$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   536
		$( _{bs} [])_\downarrow $ & $\dn$ & $\ZERO $\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   537
		$( _{bs} [a]  )_\downarrow$ & $\dn$ & $a_\downarrow$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   538
		$_{bs} \sum [a_1, \; a_2]$ & $\dn$ & $ (a_1) _\downarrow + ( a_2 ) _\downarrow $\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   539
		$(_{bs} \sum (a :: as))_\downarrow$ & $\dn$ & $ a_\downarrow + \; (_{[]} \sum as)_\downarrow$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   540
		$( _{bs} a^* )_\downarrow$ & $\dn$ & $(a_\downarrow)^*$
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   541
	\end{tabular}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   542
\end{center}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   543
\noindent
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   544
We also abbreviate the $\erase\; a$ operation
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   545
as $a_\downarrow$, for conciseness.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   546
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   547
Testing whether an annotated regular expression
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   548
contains the empty string in its lauguage requires
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   549
a dedicated function $\bnullable$.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   550
$\bnullable$ simply calls $\erase$ before $\nullable$.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   551
\begin{definition}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   552
		$\bnullable \; a \dn  \nullable \; (a_\downarrow)$
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   553
\end{definition}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   554
The function for collecting 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   555
bitcodes from a 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   556
(b)nullable regular expression is called $\bmkeps$.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   557
$\bmkeps$ is a variation of the $\textit{mkeps}$ function,
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   558
which follows the path $\mkeps$ takes to traverse the
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   559
$\nullable$ branches when visiting a regular expression,
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   560
but gives back bitcodes instead of a value.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   561
\begin{center}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   562
\begin{tabular}{lcl}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   563
  $\textit{bmkeps}\,(_{bs}\ONE)$ & $\dn$ & $bs$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   564
  $\textit{bmkeps}\,(_{bs}\sum a::\textit{as})$ & $\dn$ &
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   565
     $\textit{if}\;\textit{bnullable}\,a$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   566
  & &$\textit{then}\;bs\,@\,\textit{bmkeps}\,a$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   567
  & &$\textit{else}\;bs\,@\,\textit{bmkeps}\,(_{[]}\sum \textit{as})$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   568
  $\textit{bmkeps}\,(_{bs} a_1 \cdot a_2)$ & $\dn$ &
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   569
     $bs \,@\,\textit{bmkeps}\,a_1\,@\, \textit{bmkeps}\,a_2$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   570
  $\textit{bmkeps}\,(_{bs}a^*)$ & $\dn$ &
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   571
     $bs \,@\, [Z]$
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   572
\end{tabular}    
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   573
\end{center}    
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   574
\noindent
581
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   575
$\bmkeps$, just like $\mkeps$, 
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   576
visits a regular expression tree respecting
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   577
the POSIX rules. The difference, however, is that
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   578
it does not create values, but only bitcodes.
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   579
It traverses each child of the sequence regular expression
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   580
from left to right and creates a bitcode by stitching
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   581
together bitcodes obtained from the children expressions.
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   582
In the case of alternative regular expressions, 
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   583
it looks for the leftmost
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   584
$\nullable$ branch
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   585
to visit and ignores other siblings.
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   586
%Whenever there is some bitcodes attached to a
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   587
%node, it returns the bitcodes concatenated with whatever
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   588
%child recursive calls return.
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   589
The only time when $\bmkeps$ creates new bitcodes
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   590
is when it completes a star's iterations by attaching a $S$ to the end of the bitcode
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   591
list it returns.\\
580
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   592
The bitcodes extracted by $\bmkeps$ need to be 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   593
$\decode$d (with the guidance of a plain regular expression):
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   594
%\begin{definition}[Bitdecoding of Values]\mbox{}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   595
\begin{center}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   596
\begin{tabular}{@{}l@{\hspace{1mm}}c@{\hspace{1mm}}l@{}}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   597
  $\textit{decode}'\,bs\,(\ONE)$ & $\dn$ & $(\Empty, bs)$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   598
  $\textit{decode}'\,bs\,(c)$ & $\dn$ & $(\Char\,c, bs)$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   599
  $\textit{decode}'\,(Z\!::\!bs)\;(r_1 + r_2)$ & $\dn$ &
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   600
     $\textit{let}\,(v, bs_1) = \textit{decode}'\,bs\,r_1\;\textit{in}\;
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   601
       (\Left\,v, bs_1)$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   602
  $\textit{decode}'\,(S\!::\!bs)\;(r_1 + r_2)$ & $\dn$ &
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   603
     $\textit{let}\,(v, bs_1) = \textit{decode}'\,bs\,r_2\;\textit{in}\;
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   604
       (\Right\,v, bs_1)$\\                           
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   605
  $\textit{decode}'\,bs\;(r_1\cdot r_2)$ & $\dn$ &
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   606
        $\textit{let}\,(v_1, bs_1) = \textit{decode}'\,bs\,r_1\;\textit{in}$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   607
  & &   $\textit{let}\,(v_2, bs_2) = \textit{decode}'\,bs_1\,r_2$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   608
  & &   \hspace{35mm}$\textit{in}\;(\Seq\,v_1\,v_2, bs_2)$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   609
  $\textit{decode}'\,(Z\!::\!bs)\,(r^*)$ & $\dn$ & $(\Stars\,[], bs)$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   610
  $\textit{decode}'\,(S\!::\!bs)\,(r^*)$ & $\dn$ & 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   611
         $\textit{let}\,(v, bs_1) = \textit{decode}'\,bs\,r\;\textit{in}$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   612
  & &   $\textit{let}\,(\Stars\,vs, bs_2) = \textit{decode}'\,bs_1\,r^*$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   613
  & &   \hspace{35mm}$\textit{in}\;(\Stars\,v\!::\!vs, bs_2)$\bigskip\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   614
  
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   615
  $\textit{decode}\,bs\,r$ & $\dn$ &
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   616
     $\textit{let}\,(v, bs') = \textit{decode}'\,bs\,r\;\textit{in}$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   617
  & & $\textit{if}\;bs' = []\;\textit{then}\;\textit{Some}\,v\;
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   618
       \textit{else}\;\textit{None}$                       
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   619
\end{tabular}    
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   620
\end{center} 
537
Chengsong
parents: 536
diff changeset
   621
\noindent
580
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   622
The function $\decode'$ returns a pair consisting of 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   623
a partially decoded value and some leftover bit list that cannot
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   624
be decide yet.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   625
The function $\decode'$ succeeds if the left-over 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   626
bit-sequence is empty.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   627
$\decode$ is terminating as $\decode'$ is terminating.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   628
$\decode'$ is terminating 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   629
because at least one of $\decode'$'s parameters will go down in terms
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   630
of size.\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   631
The reverse operation of $\decode$ is $\code$.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   632
$\textit{code}$ encodes a value into a bitcode by converting
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   633
$\Left$ into $Z$, $\Right$ into $S$, and marks the start of any non-empty
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   634
star iteration by $S$. The border where a star iteration
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   635
terminates is marked by $Z$. 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   636
This coding is lossy, as it throws away the information about
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   637
characters, and does not encode the ``boundary'' between two
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   638
sequence values. Moreover, with only the bitcode we cannot even tell
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   639
whether the $S$s and $Z$s are for $\Left/\Right$ or $\Stars$.  
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   640
\begin{center}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   641
\begin{tabular}{lcl}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   642
  $\textit{code}(\Empty)$ & $\dn$ & $[]$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   643
  $\textit{code}(\Char\,c)$ & $\dn$ & $[]$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   644
  $\textit{code}(\Left\,v)$ & $\dn$ & $Z :: code(v)$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   645
  $\textit{code}(\Right\,v)$ & $\dn$ & $S :: code(v)$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   646
  $\textit{code}(\Seq\,v_1\,v_2)$ & $\dn$ & $code(v_1) \,@\, code(v_2)$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   647
  $\textit{code}(\Stars\,[])$ & $\dn$ & $[Z]$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   648
  $\textit{code}(\Stars\,(v\!::\!vs))$ & $\dn$ & $S :: code(v) \;@\;
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   649
                                                 code(\Stars\,vs)$
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   650
\end{tabular}    
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   651
\end{center} 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   652
\noindent
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   653
Assume we have a value $v$ and regular expression $r$
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   654
with $\vdash v:r$,
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   655
then we have the property that $\decode$ and $\code$ are
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   656
reverse operations of one another:
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   657
\begin{lemma}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   658
\[If \vdash v : r \; then \;\decode \; (\code \; v) \; r = \textit{Some}(v) \]
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   659
\end{lemma}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   660
\begin{proof}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   661
By proving a more general version of the lemma, on $\decode'$:
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   662
\[\vdash v : r \implies \decode' \; ((\code \; v) @ ds) \; r = (v, ds) \]
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   663
Then setting $ds$ to be $[]$ and unfolding $\decode$ definition,
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   664
we obtain the property.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   665
\end{proof}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   666
\noindent
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   667
Now we give out the central part of this lexing algorithm,
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   668
the $\bder$ function (stands for \emph{b}itcoded-derivative):
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   669
\begin{center}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   670
  \begin{tabular}{@{}lcl@{}}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   671
  $(\ZERO)\,\backslash c$ & $\dn$ & $\ZERO$\\  
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   672
  $(_{bs}\ONE)\,\backslash c$ & $\dn$ & $\ZERO$\\  
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   673
  $(_{bs}{\bf d})\,\backslash c$ & $\dn$ &
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   674
        $\textit{if}\;c=d\; \;\textit{then}\;
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   675
         _{bs}\ONE\;\textit{else}\;\ZERO$\\  
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   676
  $(_{bs}\sum \;\textit{as})\,\backslash c$ & $\dn$ &
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   677
  $_{bs}\sum\;(\textit{map} \; (\_\backslash c) \; as )$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   678
  $(_{bs}\;a_1\cdot a_2)\,\backslash c$ & $\dn$ &
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   679
     $\textit{if}\;\textit{bnullable}\,a_1$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   680
					       & &$\textit{then}\;_{bs}\sum\,[(_{[]}\,(a_1\,\backslash c)\cdot\,a_2),$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   681
					       & &$\phantom{\textit{then},\;_{bs}\sum\,}(\textit{fuse}\,(\textit{bmkeps}\,a_1)\,(a_2\,\backslash c))]$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   682
  & &$\textit{else}\;_{bs}\,(a_1\,\backslash c)\cdot a_2$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   683
  $(_{bs}a^*)\,\backslash c$ & $\dn$ &
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   684
      $_{bs}(\textit{fuse}\, [Z] \; r\,\backslash c)\cdot
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   685
       (_{[]}r^*))$
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   686
\end{tabular}    
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   687
\end{center}    
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   688
\noindent
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   689
For most time we use the infix notation $(\_\backslash\_)$ 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   690
to mean $\bder$ for brevity when
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   691
there is no danger of confusion with derivatives on plain regular expressions.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   692
For example, we write $( _{[]}r^* ) \backslash c$ instead of $\bder \;c \; _{[]}r^*$,
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   693
as the bitcodes at the front of $r^*$ indicates that it is 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   694
a bit-coded regular expression, not a plain one.\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   695
$\bder$ tells us how regular expressions can be recursively traversed,
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   696
where the bitcodes are augmented and carried around 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   697
when a derivative is taken.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   698
We give the intuition behind some of the more involved cases in 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   699
$\bder$. \\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   700
For example,
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   701
in the \emph{star} case,
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   702
a derivative on $_{bs}a^*$ means 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   703
that one more star iteratoin needs to be taken.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   704
we need to unfold it into a sequence,
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   705
and attach an additional bit $Z$ to the front of $r \backslash c$
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   706
as a record to indicate one new star iteration is unfolded.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   707
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   708
\noindent
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   709
\begin{center}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   710
  \begin{tabular}{@{}lcl@{}}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   711
  $(_{bs}a^*)\,\backslash c$ & $\dn$ &
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   712
  $_{bs}(\underbrace{\textit{fuse}\, [Z] \; a\,\backslash c}_{\text{One more iteration}})\cdot
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   713
       (_{[]}a^*))$
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   714
\end{tabular}    
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   715
\end{center}   
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   716
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   717
\noindent
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   718
This information will be recovered later by the $\decode$ function.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   719
The intuition is that the bit $Z$ will be decoded at the right location,
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   720
because we accumulate bits from left to right (a rigorous proof will be given
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   721
later).
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   722
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   723
%\begin{tikzpicture}[ > = stealth, % arrow head style
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   724
%        shorten > = 1pt, % don't touch arrow head to node
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   725
%        semithick % line style
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   726
%    ]
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   727
%
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   728
%    \tikzstyle{every state}=[
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   729
%        draw = black,
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   730
%        thin,
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   731
%        fill = cyan!29,
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   732
%        minimum size = 7mm
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   733
%    ]
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   734
%    \begin{scope}[node distance=1cm and 0cm, every node/.style=state]
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   735
%		\node (k) [rectangle split, rectangle split horizontal, rectangle split parts=2, rectangle split part fill={red!30,blue!20},]
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   736
%        {$bs$
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   737
%         \nodepart{two} $a^*$ };
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   738
%	 \node (l) [below =of k, rectangle split, rectangle split horizontal, rectangle split parts=2, rectangle split part fill={red!30,blue!20},]
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   739
%        { $bs$ + [Z]
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   740
%         \nodepart{two}  $(a\backslash c )\cdot a^*$ };
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   741
%    \end{scope}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   742
%    \path[->] 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   743
%	      (k) edge (l);
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   744
%\end{tikzpicture}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   745
%
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   746
%Pictorially the process looks like below.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   747
%Like before, the red region denotes
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   748
%previous lexing information (stored as bitcodes in $bs$).
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   749
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   750
%\begin{tikzpicture}[every node/.append style={draw, rounded corners, inner sep=10pt}]
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   751
%	\begin{scope}[node distance=1cm]   
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   752
%		\node (a) [rectangle split, rectangle split horizontal, rectangle split parts=2, rectangle split part fill={red!30,blue!20},]
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   753
%        {$bs$
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   754
%         \nodepart{two} $a^*$ };
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   755
%	 \node (b) [rectangle split, rectangle split horizontal, rectangle split parts=2, rectangle split part fill={red!30,blue!20},]
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   756
%        { $bs$ + [Z]
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   757
%         \nodepart{two}  $(a\backslash c )\cdot a^*$ };
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   758
%%\caption{term 1 \ref{term:1}'s matching configuration}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   759
% 	\end{scope}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   760
%\end{tikzpicture}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   761
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   762
\noindent
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   763
Another place the $\bder$ function differs
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   764
from derivatives on plain regular expressions
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   765
is the sequence case:
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   766
\begin{center}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   767
  \begin{tabular}{@{}lcl@{}}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   768
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   769
  $(_{bs}\;a_1\cdot a_2)\,\backslash c$ & $\dn$ &
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   770
     $\textit{if}\;\textit{bnullable}\,a_1$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   771
					       & &$\textit{then}\;_{bs}\sum\,[(_{[]}\,(a_1\,\backslash c)\cdot\,a_2),$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   772
					       & &$\phantom{\textit{then},\;_{bs}\sum\,}(\textit{fuse}\,(\textit{bmkeps}\,a_1)\,(a_2\,\backslash c))]$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   773
  & &$\textit{else}\;_{bs}\,(a_1\,\backslash c)\cdot a_2$
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   774
\end{tabular}    
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   775
\end{center}    
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   776
\noindent
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   777
The difference is that (when $a_1$ is $\bnullable$)
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   778
we use $\bmkeps$ to store the lexing information
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   779
in $a_1$ before collapsing 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   780
it (as it has been fully matched by string prior to $c$),
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   781
and attach the collected bit-codes to the front of $a_2$
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   782
before throwing away $a_1$. We assume that $\bmkeps$ 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   783
correctly extracts the bitcode for how $a_1$
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   784
matches the string prior to $c$ (more on this later).
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   785
The bitsequence $\textit{bs}$ which was initially 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   786
attached to the first element of the sequence
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   787
$a_1 \cdot a_2$, has now been 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   788
elevated to the top level of the $\sum$ constructor. 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   789
This is because this piece of information will be needed 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   790
whichever way the sequence is matched,
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   791
regardless of whether $c$ belongs to $a_1$ or $a_2$.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   792
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   793
In the injection-based lexer, $r_1$ is immediately thrown away in 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   794
subsequent derivatives on the right branch (when $r_1$ is $\nullable$),
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   795
depite $r_1$ potentially storing information of previous matches:
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   796
\begin{center}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   797
	$(r_1 \cdot r_2 )\backslash c = (r_1 \backslash c) \cdot r_2 + r_2 \backslash c$
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   798
\end{center}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   799
\noindent
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   800
this loss of information makes it necessary
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   801
to store on stack all the regular expressions'
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   802
``snapshots'' before they were
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   803
taken derivative of.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   804
So that the related information will be available 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   805
once the child recursive 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   806
call finishes.\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   807
The rest of the clauses of $\bder$ is rather similar to
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   808
$\der$. \\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   809
Generalising the derivative operation with bitcodes to strings, we have 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   810
\begin{center}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   811
	\begin{tabular}{@{}lcl@{}}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   812
		$a\backslash_s [] $ & $\dn$ & $a$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   813
		$a\backslash (c :: s) $ & $\dn$ & $(a \backslash c) \backslash_s s$
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   814
	\end{tabular}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   815
\end{center}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   816
\noindent
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   817
As we did earlier, we omit the $s$ subscript at $\backslash_s$ when there is no danger
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   818
of confusion.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   819
\subsection{Putting Things Together}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   820
Putting these operations altogether, we obtain a lexer with bit-coded regular expressions
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   821
as its internal data structures, which we call $\blexer$:
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   822
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   823
\begin{center}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   824
\begin{tabular}{lcl}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   825
  $\textit{blexer}\;r\,s$ & $\dn$ &
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   826
      $\textit{let}\;a = (r^\uparrow)\backslash s\;\textit{in}$\\                
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   827
  & & $\;\;\textit{if}\; \textit{bnullable}(a)$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   828
  & & $\;\;\textit{then}\;\textit{decode}\,(\textit{bmkeps}\,a)\,r$\\
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   829
  & & $\;\;\textit{else}\;\textit{None}$
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   830
\end{tabular}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   831
\end{center}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   832
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   833
\noindent
581
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   834
$\blexer$ first attaches bitcodes to a
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   835
plain regular expression, and then do successive derivatives
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   836
with respect to the input string $s$, and
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   837
then test whether the result is nullable.
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   838
If yes, then extract the bitcodes out of the nullable expression,
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   839
and decodes the bitcodes into a lexical value.
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   840
If there does not exists a match between $r$ and $s$ the lexer
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   841
outputs $\None$ indicating a failed lex.\\
580
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   842
Ausaf and Urban formally proved the correctness of the $\blexer$, namely
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   843
\begin{property}
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   844
$\blexer \;r \; s = \lexer \; r \; s$.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   845
\end{property}
581
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   846
\noindent
580
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   847
This was claimed but not formalised in Sulzmann and Lu's work.
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   848
We introduce the proof later, after we give all
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   849
the needed auxiliary functions and definitions.
581
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   850
\subsection{An Example $\blexer$ Run}
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   851
Before introducing the proof we shall first walk the reader 
580
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   852
through a concrete example of our $\blexer$ calculating the right 
e0f0a81f907b halfway chap3
Chengsong
parents: 579
diff changeset
   853
lexical information through bit-coded regular expressions.\\
581
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   854
Consider the regular expression $(aa)^* \cdot (b+c)$ matching the string $aab$.
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   855
We give again the bird's eye view of this particular example 
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   856
in each stage of the algorithm:
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   857
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   858
\tikzset{three sided/.style={
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   859
        draw=none,
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   860
        append after command={
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   861
            [-,shorten <= -0.5\pgflinewidth]
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   862
            ([shift={(-1.5\pgflinewidth,-0.5\pgflinewidth)}]\tikzlastnode.north east)
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   863
        edge([shift={( 0.5\pgflinewidth,-0.5\pgflinewidth)}]\tikzlastnode.north west) 
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   864
            ([shift={( 0.5\pgflinewidth,-0.5\pgflinewidth)}]\tikzlastnode.north west)
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   865
        edge([shift={( 0.5\pgflinewidth,+0.5\pgflinewidth)}]\tikzlastnode.south west)            
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   866
            ([shift={( 0.5\pgflinewidth,+0.5\pgflinewidth)}]\tikzlastnode.south west)
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   867
        edge([shift={(-1.0\pgflinewidth,+0.5\pgflinewidth)}]\tikzlastnode.south east)
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   868
        }
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   869
    }
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   870
}
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   871
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   872
\tikzset{three sided1/.style={
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   873
        draw=none,
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   874
        append after command={
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   875
            [-,shorten <= -0.5\pgflinewidth]
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   876
            ([shift={(1.5\pgflinewidth,-0.5\pgflinewidth)}]\tikzlastnode.north west)
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   877
        edge([shift={(-0.5\pgflinewidth,-0.5\pgflinewidth)}]\tikzlastnode.north east) 
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   878
            ([shift={(-0.5\pgflinewidth,-0.5\pgflinewidth)}]\tikzlastnode.north east)
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   879
        edge([shift={(-0.5\pgflinewidth,+0.5\pgflinewidth)}]\tikzlastnode.south east)            
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   880
            ([shift={(-0.5\pgflinewidth,+0.5\pgflinewidth)}]\tikzlastnode.south east)
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   881
        edge([shift={(1.0\pgflinewidth,+0.5\pgflinewidth)}]\tikzlastnode.south west)
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   882
        }
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   883
    }
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   884
}
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   885
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   886
\begin{figure}[H]
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   887
	\begin{tikzpicture}[->, >=stealth', shorten >= 1pt, auto, thick]
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   888
		\node [rectangle, draw] (r) at (-6, -1) {$(aa)^*(b+c)$};
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   889
		\node [rectangle, draw] (a) at (-6, 4)	  {$(aa)^*(_{Z}b + _{S}c)$};
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   890
		\path	(r)
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   891
			edge [] node {$\internalise$} (a);
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   892
		\node [rectangle, draw] (a1) at (-3, 1) {$(_{Z}(\ONE \cdot a) \cdot (aa)^*) (_{Z}b + _Sc)$};
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   893
		\path	(a)
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   894
			edge [] node {$\backslash a$} (a1);
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   895
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   896
		\node [rectangle, draw, three sided] (a21) at (-2.5, 4) {$(_{Z}\ONE \cdot (aa)^*)$};
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   897
		\node [rectangle, draw, three sided1] (a22) at (-0.8, 4) {$(_{Z}b + _{S}c)$};
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   898
		\path	(a1)
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   899
			edge [] node {$\backslash a$} (a21);
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   900
		\node [rectangle, draw] (a3) at (0.5, 2) {$_{ZS}(_{Z}\ONE + \ZERO)$};
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   901
		\path	(a22)
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   902
			edge [] node {$\backslash b$} (a3);
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   903
		\path	(a21)
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   904
			edge [dashed, bend right] node {} (a3);
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   905
		\node [rectangle, draw] (bs) at (2, 4) {$ZSZ$};
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   906
		\path	(a3)
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   907
			edge [below] node {$\bmkeps$} (bs);
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   908
		\node [rectangle, draw] (v) at (3, 0) {$\Seq \; (\Stars\; [\Seq \; a \; a]) \; (\Left \; b)$};
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   909
		\path 	(bs)
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   910
			edge [] node {$\decode$} (v);
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   911
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   912
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   913
	\end{tikzpicture}
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   914
	\caption{$\blexer \;\;\;\; (aa)^*(b+c) \;\;\;\; aab$}
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   915
\end{figure}
537
Chengsong
parents: 536
diff changeset
   916
\noindent
581
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   917
The one dashed arrow indicates that $_Z(\ONE \cdot (aa)^*)$
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   918
turned into $ZS$ after derivative w.r.t $b$
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   919
is taken, which calls $\bmkeps$ on the nuallable $_Z\ONE\cdot (aa)^*$
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   920
before processing $_Zb+_Sc$.\\
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   921
The annotated regular expressions
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   922
would look too cumbersome if we explicitly indicate all the
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   923
locations where bitcodes are attached.
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   924
For example,
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   925
$(aa)^*\cdot (b+c)$ would 
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   926
look like $_{[]}(_{[]}(_{[]}a \cdot _{[]}a)^*\cdot _{[]}(_{[]}b+_{[]}c))$ 
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   927
after 
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   928
internalise.
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   929
Therefore for readability we omit bitcodes if they are empty. 
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   930
This applies to all example annotated 
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   931
regular expressions in this thesis.\\
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   932
%and assume we have just read the first character $a$:
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   933
%\begin{center}
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   934
%\begin{tikzpicture}[every node/.append style={draw, rounded corners, inner sep=10pt}]
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   935
%    \node [rectangle split, rectangle split horizontal, rectangle split parts=2, rectangle split part fill={red!30,blue!20},]
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   936
%	    {$(_{[Z]}(\ONE \cdot a) \cdot (aa)^* )\cdot bc$ 
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   937
%	    \nodepart{two} $[Z] \iff \Seq \; (\Stars \; [\Seq\; a \; ??, \;??]) \; ??$};
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   938
%\end{tikzpicture}
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   939
%\end{center}
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   940
%\noindent
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   941
%We use the red area for (annotated) regular expressions and the blue 
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   942
%area the (partially calculated) bitcodes 
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   943
%and its corresponding (partial) values.
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   944
%The first derivative 
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   945
%generates a $Z$ bitcode to indicate
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   946
%a new iteration has been started.
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   947
%This bitcode is attached to the front of
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   948
%the unrolled star iteration $\ONE\cdot a$
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   949
%for later decoding.
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   950
%\begin{center}
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   951
%\begin{tikzpicture}[]
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   952
%    \node [rectangle split, rectangle split horizontal, 
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   953
%	    rectangle split parts=2, rectangle split part fill={red!30,blue!20}, draw, rounded corners, inner sep=10pt]
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   954
%	    (der2) at (0,0)
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   955
%	    {$(_{[Z]}(\ONE \cdot \ONE) \cdot (aa)^*) \cdot bc $ 
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   956
%	    \nodepart{two} $[Z] \iff \Seq \; (\Stars \; [\Seq \; a\;a, ??]) \; ??$};
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   957
%
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   958
%\node [draw=none, minimum size = 0.1, ] (r) at (-7, 0) {$a_1$};
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   959
%\path
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   960
%	(r)
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   961
%	edge [->, >=stealth',shorten >=1pt, above] node {$\backslash a$} (der2);
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   962
%%\caption{term 1 \ref{term:1}'s matching configuration}
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   963
%\end{tikzpicture}
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   964
%\end{center}
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   965
%\noindent
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   966
%After we take derivative with respect to 
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   967
%second input character $a$, the annotated
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   968
%regular expression has the second $a$ chopped off.
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   969
%The second derivative does not involve any 
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   970
%new bitcodes being generated, because
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   971
%there are no new iterations or bifurcations
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   972
%in the regular expression requiring any $S$ or $Z$ marker
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   973
%to indicate choices.
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   974
%\begin{center}
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   975
%\begin{tikzpicture}[every node/.append style={draw, rounded corners, inner sep=10pt}]
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   976
%    \node [rectangle split, rectangle split horizontal, rectangle split parts=2, rectangle split part fill={red!30,blue!20},]
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   977
%	    {$(_{[Z]}(\ONE \cdot \ONE) \cdot (aa)^*) \cdot (\ONE \cdot c) $ 
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   978
%	    \nodepart{two} $[Z] \iff \Seq \; (\Stars \; [\Seq \; a\;a, ??]) \; ??$};
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   979
%%\caption{term 1 \ref{term:1}'s matching configuration}
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   980
%\end{tikzpicture}
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   981
%\end{center}
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   982
%\noindent
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   983
%
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   984
%
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   985
%\begin{center}
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   986
%\begin{tikzpicture}[every node/.append style={draw, rounded corners, inner sep=10pt}]
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   987
%    \node [rectangle split, rectangle split horizontal, rectangle split parts=2, rectangle split part fill={red!30,blue!20},]
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   988
%	    {$\stackrel{Bitcoded}{\longrightarrow} \Seq(\Stars[\Char(a), \Char(a)], ???)$
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   989
%	\nodepart{two} $\Seq(\ldots, \Seq(\Char(b), \Char(c)))$  $\stackrel{Inj}{\longleftarrow}$};
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   990
%%\caption{term 1 \ref{term:1}'s matching configuration}
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   991
%\end{tikzpicture}
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   992
%\end{center}
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   993
%\noindent
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   994
%If we do this kind of "attachment"
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   995
%and each time augment the attached partially
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   996
%constructed value when taking off a 
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   997
%character:
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   998
%\begin{center}
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
   999
%\begin{tikzpicture}[every node/.append style={draw, rounded corners, inner sep=10pt}]
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1000
%	\node [rectangle split, rectangle split horizontal, rectangle split parts=2, rectangle split part fill={red!30,blue!20},] (spPoint)
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1001
%        {$\Seq(\Stars[\Char(a), \Char(a)], \ldots)$
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1002
%         \nodepart{two} Remaining: $b c$};
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1003
%\end{tikzpicture}\\
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1004
%$\downarrow$\\
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1005
%\begin{tikzpicture}[every node/.append style={draw, rounded corners, inner sep=10pt}]
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1006
%    \node [rectangle split, rectangle split horizontal, rectangle split parts=2, rectangle split part fill={red!30,blue!20},]
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1007
%        {$\Seq(\Stars[\Char(a), \Char(a)], \Seq(\Char(b), \ldots))$
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1008
%         \nodepart{two} Remaining: $c$};
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1009
%\end{tikzpicture}\\
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1010
%$\downarrow$\\
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1011
%\begin{tikzpicture}[every node/.append style={draw, rounded corners, inner sep=10pt}]
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1012
%    \node [rectangle split, rectangle split horizontal, rectangle split parts=2, rectangle split part fill={red!30,blue!20},]
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1013
%        {$\Seq(\Stars[\Char(a), \Char(a)], \Seq(\Char(b), \Char(c)))$
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1014
%         \nodepart{two} EOF};
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1015
%\end{tikzpicture}
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1016
%\end{center}
537
Chengsong
parents: 536
diff changeset
  1017
\noindent
581
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1018
In the next section we introduce the correctness proof
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1019
found by Ausaf and Urban
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1020
of the bitcoded lexer.
532
cc54ce075db5 restructured
Chengsong
parents:
diff changeset
  1021
%-----------------------------------
cc54ce075db5 restructured
Chengsong
parents:
diff changeset
  1022
%	SUBSECTION 1
cc54ce075db5 restructured
Chengsong
parents:
diff changeset
  1023
%-----------------------------------
581
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1024
\section{Correctness Proof of $\textit{Blexer}$}
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1025
Why is $\blexer$ correct?
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1026
In other words, why is it the case that 
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1027
$\blexer$ outputs the same value as $\lexer$?
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1028
Intuitively,
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1029
that is because 
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1030
\begin{itemize}
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1031
	\item
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1032
		$\blexer$ follows an almost identical
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1033
		path as that of $\lexer$, 
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1034
		for example $r_1, r_2, \ldots$ and $a_1, a_2, \ldots$ being produced,
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1035
		which are the same up to the application of $\erase$.
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1036
	\item
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1037
		The bit-encodings work properly,
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1038
		allowing the possibility of 
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1039
		pulling out the right lexical value from an
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1040
		annotated regular expression at 
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1041
		any stage of the algorithm.
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1042
\end{itemize}
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1043
We will elaborate on this, with the help of
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1044
some helper functions such as $\retrieve$ and
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1045
$\flex$.
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1046
\subsection{Specifications of Some Helper Functions}
542
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1047
The functions we introduce will give a more detailed glimpse into 
581
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1048
the lexing process, which is not be possible
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1049
using $\lexer$ or $\blexer$ alone.
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1050
\subsubsection{$\textit{Retrieve}$}
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1051
The first function we shall introduce is $\retrieve$.
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1052
Sulzmann and Lu gave its definition, and
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1053
Ausaf and Urban found
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1054
its usage in mechanised proofs.
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1055
Our bit-coded lexer ``retrieve''s the bitcodes using $\bmkeps$,
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1056
after all the derivatives has been taken:
532
cc54ce075db5 restructured
Chengsong
parents:
diff changeset
  1057
\begin{center}
542
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1058
\begin{tabular}{lcl}
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1059
	& & $\ldots$\\
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1060
  & & $\;\;\textit{if}\; \textit{bnullable}(a)$\\
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1061
  & & $\;\;\textit{then}\;\textit{decode}\,(\textit{bmkeps}\,a)\,r$\\
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1062
  & & $\ldots$
532
cc54ce075db5 restructured
Chengsong
parents:
diff changeset
  1063
\end{tabular}
cc54ce075db5 restructured
Chengsong
parents:
diff changeset
  1064
\end{center}
542
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1065
\noindent
581
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1066
$\bmkeps$ retrieves the value $v$'s
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1067
information in the format
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1068
of bitcodes, by travelling along the
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1069
path of the regular expression that corresponds to a POSIX match,
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1070
collecting all the bitcodes.
542
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1071
We know that this "retrieved" bitcode leads to the correct value after decoding,
581
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1072
which is $v_0$ in the injection-based lexing diagram.
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1073
As an observation we pointed at the beginning of this section,
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1074
the annotated regular expressions generated in successive derivative steps
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1075
in $\blexer$ after $\erase$ has the same structure 
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1076
as those appeared in $\lexer$.
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1077
We redraw the diagram below to visualise this fact.
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1078
We pretend that all the values are 
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1079
ready despite they are only calculated in $\lexer$.
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1080
In general we have $\vdash v_i:(a_i)_\downarrow$.
542
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1081
\vspace{20mm}
581
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1082
\begin{figure}[H]%\label{graph:injLexer}
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1083
\begin{center}
542
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1084
\begin{tikzcd}[
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1085
	every matrix/.append style = {name=p},
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1086
	remember picture, overlay,
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1087
	]
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1088
	a_0 \arrow[r, "\backslash c_0"]  \arrow[d] & a_1 \arrow[r, "\backslash c_1"] \arrow[d] & a_2 \arrow[r, dashed] \arrow[d] & a_n \arrow[d] \\
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1089
v_0           & v_1 \arrow[l,"inj_{r_0} c_0"]                & v_2 \arrow[l, "inj_{r_1} c_1"]              & v_n \arrow[l, dashed]         
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1090
\end{tikzcd}
581
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1091
\end{center}
542
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1092
\begin{tikzpicture}[
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1093
	remember picture, overlay,
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1094
E/.style = {ellipse, draw=blue, dashed,
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1095
            inner xsep=4mm,inner ysep=-4mm, rotate=90, fit=#1}
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1096
                        ]
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1097
\node[E = (p-1-1) (p-2-1)] {};
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1098
\node[E = (p-1-4) (p-2-4)] {};
581
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1099
\node[E = (p-1-2) (p-2-2)] {};
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1100
\node[E = (p-1-3) (p-2-3)] {};
542
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1101
\end{tikzpicture}
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1102
581
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1103
\end{figure}
542
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1104
\vspace{20mm}
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1105
\noindent
581
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1106
We encircle in the diagram  all the pairs $v_i, a_i$ to show that these values
582
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1107
and regular expressions share the same structure.
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1108
These pairs all contain adequate information to 
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1109
obtain the final lexing result.
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1110
For example, in the leftmost pair the 
581
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1111
lexical information is condensed in 
582
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1112
$v_0$, whereas for the rightmost pair,
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1113
the lexing result hides is in the bitcodes of $a_n$.\\
581
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1114
$\bmkeps$ is able to extract from $a_n$ the result
582
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1115
by looking for nullable parts of the regular expression.
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1116
However for regular expressions $a_i$ in general,
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1117
they might not necessarily be nullable.
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1118
For those regular expressions that are not nullable,
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1119
$\bmkeps$ will not work. 
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1120
Therefore they need some additional ``help'' 
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1121
finding the POSIX bit-encoding.
581
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1122
The most straightforward ``help'' comes from $a_i$'s corresponding
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1123
value $v_i$, and this suggests a function $f$ satisfying the
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1124
following properties:
542
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1125
\begin{itemize}
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1126
	\item
581
9db2500629be chap3 almost done
Chengsong
parents: 580
diff changeset
  1127
		$f \; a_i\;v_i = f \; a_n \; v_n = \bmkeps \; a_n$%\decode \; (\bmkeps \; a_n) \; (\erase \; a_0)$
542
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1128
	\item
582
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1129
		$f \; a_i\;v_i = f \; a_0 \; v_0 = \code \; v_0$ %\decode \;(\code \; v_0) \; (\erase \; a_0)$
542
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1130
\end{itemize}
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1131
\noindent
582
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1132
Sulzmann and Lu came up with a function satisfying 
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1133
the above
542
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1134
requirements, named \emph{retrieve}:
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1135
\begin{center}
582
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1136
\begin{tabular}{llcl}
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1137
	$\retrieve \; \, _{bs} \ONE$ & $   \Empty$ & $\dn$ & $\textit{bs}$\\
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1138
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1139
	$\retrieve \; \, _{bs} \mathbf{c}$ & $ (\Char \; c) $ & $\dn$ & $ \textit{bs}$\\
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1140
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1141
	$\retrieve \; \, _{bs} a_1 \cdot a_2$ & $   (\Seq \; v_1 \; v_2) $ & 
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1142
	$\dn$ &  $\textit{bs} \; @\;  (\retrieve \; a_1\; v_1)\; @ \;(\retrieve \; a_2 \; v_2)$\\
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1143
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1144
	$\retrieve \; \, _{bs} \Sigma (a :: \textit{as})$ & $   (\Left \; v) $ & 
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1145
	$\dn$ & $\textit{bs}\; @\; (\retrieve \; a \; v)$\\
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1146
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1147
	$\retrieve \; \, _{bs} \Sigma (a :: \textit{as})$ & $   (\Right \; v) $ & 
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1148
	$\dn$ & $\textit{bs}\; @\; (\retrieve \; (_{[]}\Sigma \textit{as}) \; v)$\\
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1149
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1150
	$\retrieve \; \, _{bs} a^* $ & $   (\Stars \; (v :: vs)) $ & $\dn$ & 
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1151
	$\textit{bs}\; @\; (\retrieve \; a \; v)\; @ \; 
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1152
	(\retrieve \; (_{[]} a^*) \; (\Stars \; vs) )$\\
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1153
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1154
	$\retrieve \; \, _{bs} a^* $ & $  (\Stars \; []) $ & $\dn$ & $\textit{bs} \; @ \; [Z]$
542
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1155
\end{tabular}
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1156
\end{center}
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1157
\noindent
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1158
As promised, $\retrieve$ collects the right bit-codes from the 
582
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1159
final derivative $a_n$, guided by $v_n$:
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1160
\begin{lemma}\label{bmkepsRetrieve}
542
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1161
	$\bnullable \; a \implies \bmkeps \; a = \retrieve \; a \; (\mkeps \; (\erase \; a))$
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1162
\end{lemma}
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1163
\begin{proof}
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1164
	By a routine induction on $a$.
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1165
\end{proof}
582
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1166
\noindent
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1167
The design of $\retrieve$ enables us to extract bitcodes
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1168
from both annotated regular expressions and values.
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1169
$\retrieve$ always ``sucks up'' all the information.
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1170
When more information is stored in the value, we would be able to
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1171
extract more from the value, and vice versa.
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1172
For example in star iterations, $\retrieve$ will be able to extract from $\Stars \; vs$
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1173
exactly the same bitcodes as $\code \; (\Stars \; vs)$:
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1174
\begin{lemma}
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1175
  If $\forall v \in vs. \vdash v : r$, and  $\code \; v = \retrieve \; (\internalise\; r) \; v$\\
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1176
  then $\code \; (\Stars \; vs) = \retrieve \; _{[]}((\internalise \;  r)^*) \; (\Stars \; vs)$
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1177
\end{lemma}\label{retrieveEncodeSTARS}
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1178
\begin{proof}
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1179
	By induction on the value list $vs$.
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1180
\end{proof}
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1181
\noindent
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1182
Similarly, when the value list does not hold information,
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1183
only the bitcodes plus some delimiter will be recorded:
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1184
\begin{center}
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1185
  $\retrieve \; _{bs}((\internalise \;  r)^*) \; (\Stars \; [] )  = bs @ [S]$.
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1186
\end{center}
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1187
In general, if we have a regular expression just internalised
542
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1188
and the lexing result value, we could $\retrieve$ the bitcdoes
582
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1189
that look as if we have en$\code$-ed the value as bitcodes:
542
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1190
\begin{lemma}
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1191
	$\vdash v : r \implies \retrieve \; (r)^\uparrow \; v = \code \; v$
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1192
\end{lemma}
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1193
\begin{proof}
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1194
	By induction on $r$.
582
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1195
	The star case uses lemma \ref{retrieveEncodeSTARS}.
542
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1196
\end{proof}
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1197
\noindent
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1198
The following property is more interesting, as
582
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1199
it provides a "bridge" between $a_0$ and $a_n $ in the
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1200
lexing diagram by linking adjacent regular expressions $a_i$ and
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1201
$a_{i+1}$.
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1202
The property says that one 
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1203
can retrieve the same bits from a derivative 
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1204
regular expression as those from 
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1205
before the derivative took place,
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1206
provided that the right values are used respectively:
542
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1207
\begin{lemma}\label{retrieveStepwise}
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1208
	$\vdash v : (r\backslash c) \implies \retrieve \; (r \backslash c)  \;  v= \retrieve \; r \; (\inj \; r\; c\; v)$
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1209
\end{lemma}
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1210
\begin{proof}
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1211
	By induction on $r$, where $v$ is allowed to be arbitrary.
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1212
	The induction principle is function $\erase$'s cases.
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1213
\end{proof}
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1214
\noindent
582
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1215
Before we move on to the next
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1216
helper function, we rewrite $\blexer$ in
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1217
the following way which makes later proofs more convenient:
542
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1218
\begin{lemma}\label{blexer_retrieve}
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1219
$\blexer \; r \; s = \decode  \; (\retrieve \; (\internalise \; r) \; (\mkeps \; (r \backslash s) )) \; r$
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1220
\end{lemma}
582
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1221
\begin{proof}
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1222
	Using lemma \ref{bmkepsRetrieve}.
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1223
\end{proof}
542
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1224
\noindent
582
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1225
$\retrieve$ allows connecting
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1226
between the intermediate 
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1227
results $a_i$ and $a_{i+1}$ in $\blexer$.
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1228
For plain regular expressions something similar is required.
542
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1229
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1230
\subsection{$\flex$}
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1231
Ausaf and Urban cleverly defined an auxiliary function called $\flex$ for $\lexer$,
532
cc54ce075db5 restructured
Chengsong
parents:
diff changeset
  1232
defined as
536
aff7bf93b9c7 comments addressed all
Chengsong
parents: 532
diff changeset
  1233
\begin{center}
582
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1234
\begin{tabular}{lcl}
536
aff7bf93b9c7 comments addressed all
Chengsong
parents: 532
diff changeset
  1235
$\flex \; r \; f \; [] \; v$       &  $=$ &   $f\; v$\\
582
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1236
$\flex \; r \; f \; (c :: s) \; v$ &  $=$ &   $\flex \; r \; (\lambda v. \, f (\inj \; r\; c\; v)) \;\; s \; v$
536
aff7bf93b9c7 comments addressed all
Chengsong
parents: 532
diff changeset
  1237
\end{tabular}
aff7bf93b9c7 comments addressed all
Chengsong
parents: 532
diff changeset
  1238
\end{center}
582
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1239
which accumulates the characters that need to be injected back, 
532
cc54ce075db5 restructured
Chengsong
parents:
diff changeset
  1240
and does the injection in a stack-like manner (last taken derivative first injected).
582
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1241
$\flex$ can calculate what $\lexer$ calculates, given the input regular expression
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1242
$r$, the identity function $id$, the input string $s$ and the value
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1243
$v_n= \mkeps \; (r\backslash s)$:
532
cc54ce075db5 restructured
Chengsong
parents:
diff changeset
  1244
\begin{lemma}
582
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1245
	$\flex \;\; r \;\; \textit{id}\;\; s \;\; (\mkeps \;(r\backslash s)) = \lexer \; r \; s$
532
cc54ce075db5 restructured
Chengsong
parents:
diff changeset
  1246
\end{lemma}
542
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1247
\begin{proof}
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1248
	By reverse induction on $s$.
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1249
\end{proof}
582
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1250
\noindent
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1251
The main advantage of using $\flex$
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1252
in addition to $\lexer$ is that
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1253
$\flex$ makes the value $v$ and function $f$
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1254
that manipulates the value  explicit parameters,
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1255
which ``exposes'' $\lexer$'s recursive call
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1256
arguments and allows us to ``set breakpoints'' and ``resume''
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1257
at any point during $\lexer$'s recursive calls.\\
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1258
The following stepwise property holds. 
532
cc54ce075db5 restructured
Chengsong
parents:
diff changeset
  1259
\begin{lemma}\label{flexStepwise}
582
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1260
	$\textit{flex} \;\; r \;\; f \;\; (s@[c]) \;\; v = \flex \;\; r \;\; f  \;\; s \;\; (\inj \; (r\backslash s) \; c \; v) $
532
cc54ce075db5 restructured
Chengsong
parents:
diff changeset
  1261
\end{lemma}
cc54ce075db5 restructured
Chengsong
parents:
diff changeset
  1262
\begin{proof}
582
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1263
	By induction on the shape of $r\backslash s$.
532
cc54ce075db5 restructured
Chengsong
parents:
diff changeset
  1264
\end{proof}
582
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1265
\noindent
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1266
With $\flex$ and $\retrieve$, 
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1267
we are ready to connect $\lexer$ and $\blexer$,
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1268
giving the correctness proof.
532
cc54ce075db5 restructured
Chengsong
parents:
diff changeset
  1269
542
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1270
%----------------------------------------------------------------------------------------
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1271
%	SECTION  correctness proof
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1272
%----------------------------------------------------------------------------------------
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1273
\section{Correctness of Bit-coded Algorithm (Without Simplification)}
582
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1274
$\flex$ and $\blexer$ essentially calculates the same thing.
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1275
\begin{lemma}\label{flex_retrieve}
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1276
	If $\vdash v: (r\backslash s)$, then\\
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1277
$\flex \; r \; \textit{id}\; s\; v = \decode \; (\retrieve \; (r\backslash s )\; v) \; r$
532
cc54ce075db5 restructured
Chengsong
parents:
diff changeset
  1278
\end{lemma}
cc54ce075db5 restructured
Chengsong
parents:
diff changeset
  1279
\begin{proof}
582
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1280
By induction on $s$. 
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1281
We prove the interesting case where
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1282
both $\flex$ and $\decode$ successfully terminates
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1283
with some value.
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1284
We take advantage of the stepwise properties  
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1285
both sides.
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1286
The induction tactic is reverse induction on string $s$.
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1287
The inductive hypothesis says that $\flex \; r \; id \;s \; v =
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1288
\decode \; (\retrieve \; (r\backslash s) \; v) \; r$ holds,
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1289
where $v$ can be any value satisfying 
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1290
the assumption $\vdash v: (r\backslash s)$.
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1291
The crucial point is to rewrite 
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1292
\[
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1293
	\retrieve \;\; (r \backslash (s@[c])) \;\; (\mkeps\; (r \backslash (s@[c]) ))
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1294
\]
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1295
as
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1296
\[
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1297
	\retrieve \;\; (r \backslash s) 
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1298
	\;\; (\inj \; (r \backslash s) \; c\;  \mkeps (r \backslash (s@[c])))
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1299
\]
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1300
using lemma \ref{retrieveStepwise}.
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1301
This enables us to equate 
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1302
\[
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1303
	\retrieve \; (r \backslash (s@[c])) \; (\mkeps \; (r \backslash (s@[c]) ))
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1304
\] 
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1305
with 
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1306
\[
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1307
\flex \; r \; \textit{id} \; s \; (\inj \; (r\backslash s) \; c\; (\mkeps (r\backslash s@[c])))
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1308
\]
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1309
using IH,
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1310
which in turn can be rewritten as
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1311
\[
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1312
	\flex \; r \; \textit{id} \; (s@[c]) \;  (\mkeps \; (r \backslash (s@[c])))
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1313
\].
532
cc54ce075db5 restructured
Chengsong
parents:
diff changeset
  1314
\end{proof}
582
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1315
\noindent
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1316
With this pivotal lemma we can now link $\flex$ and $\blexer$
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1317
and finally give the correctness of $\blexer$--it outputs the same result as $\lexer$:
542
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1318
\begin{theorem}
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1319
	$\blexer\; r \; s = \lexer \; r \; s$
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1320
\end{theorem}
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1321
\begin{proof}
582
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1322
	From \ref{flex_retrieve} we have that 
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1323
	$\textit{flex} \; r \; \textit{id} \; s \; \mkeps(r \backslash s)  = \blexer \; r \; s$,
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1324
	which immediately implies this theorem.
542
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1325
\end{proof}
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1326
\noindent
582
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1327
To piece things together and spell out the correctness
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1328
result of the bitcoded lexer more explicitly,
576
3e1b699696b6 thesis chap5
Chengsong
parents: 575
diff changeset
  1329
we use the fact from the previous chapter that
3e1b699696b6 thesis chap5
Chengsong
parents: 575
diff changeset
  1330
\[
582
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1331
	 (r, s) \rightarrow v \;\; \textit{iff} \;\; \lexer \; r \; s = v
576
3e1b699696b6 thesis chap5
Chengsong
parents: 575
diff changeset
  1332
\]
3e1b699696b6 thesis chap5
Chengsong
parents: 575
diff changeset
  1333
to obtain this corollary:
3e1b699696b6 thesis chap5
Chengsong
parents: 575
diff changeset
  1334
\begin{corollary}\label{blexerPOSIX}
582
3e19073e91f4 chap3 done
Chengsong
parents: 581
diff changeset
  1335
	$(r, s) \rightarrow v \;\; \textit{iff} \;\; \blexer \; r \; s = v$
576
3e1b699696b6 thesis chap5
Chengsong
parents: 575
diff changeset
  1336
\end{corollary}
542
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1337
Our main reason for wanting a bit-coded algorithm over 
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1338
the injection-based one is for its capabilities of allowing
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1339
more aggressive simplifications.
a7344c9afbaf chapter3 finished
Chengsong
parents: 538
diff changeset
  1340
We will elaborate on this in the next chapter.
532
cc54ce075db5 restructured
Chengsong
parents:
diff changeset
  1341
cc54ce075db5 restructured
Chengsong
parents:
diff changeset
  1342