doc-src/TutorialI/CTL/document/Base.tex
author paulson
Thu, 11 Jan 2001 12:12:01 +0100
changeset 10867 bda1701848cd
parent 10795 9e888d60d3e5
child 10983 59961d32b1ae
permissions -rw-r--r--
lcp's suggestions for CTL
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
10123
9469c039ff57 *** empty log message ***
nipkow
parents:
diff changeset
     1
%
9469c039ff57 *** empty log message ***
nipkow
parents:
diff changeset
     2
\begin{isabellebody}%
9469c039ff57 *** empty log message ***
nipkow
parents:
diff changeset
     3
\def\isabellecontext{Base}%
9469c039ff57 *** empty log message ***
nipkow
parents:
diff changeset
     4
%
10867
bda1701848cd lcp's suggestions for CTL
paulson
parents: 10795
diff changeset
     5
\isamarkupsection{Case Study: Verified Model Checking%
10395
7ef380745743 updated;
wenzelm
parents: 10362
diff changeset
     6
}
10123
9469c039ff57 *** empty log message ***
nipkow
parents:
diff changeset
     7
%
9469c039ff57 *** empty log message ***
nipkow
parents:
diff changeset
     8
\begin{isamarkuptext}%
10362
c6b197ccf1f1 *** empty log message ***
nipkow
parents: 10281
diff changeset
     9
\label{sec:VMC}
10867
bda1701848cd lcp's suggestions for CTL
paulson
parents: 10795
diff changeset
    10
This chapter ends with a case study concerning model checking for 
bda1701848cd lcp's suggestions for CTL
paulson
parents: 10795
diff changeset
    11
Computation Tree Logic (CTL), a temporal logic.
bda1701848cd lcp's suggestions for CTL
paulson
parents: 10795
diff changeset
    12
Model checking is a popular technique for the verification of finite
10795
9e888d60d3e5 minor edits to Chapters 1-3
paulson
parents: 10395
diff changeset
    13
state systems (implementations) with respect to temporal logic formulae
10867
bda1701848cd lcp's suggestions for CTL
paulson
parents: 10795
diff changeset
    14
(specifications) \cite{ClarkeGP-book,Huth-Ryan-book}. Its foundations are set theoretic
bda1701848cd lcp's suggestions for CTL
paulson
parents: 10795
diff changeset
    15
and this section will explore them in HOL\@. This is done in two steps.  First
10178
aecb5bf6f76f *** empty log message ***
nipkow
parents: 10133
diff changeset
    16
we consider a simple modal logic called propositional dynamic
10867
bda1701848cd lcp's suggestions for CTL
paulson
parents: 10795
diff changeset
    17
logic (PDL), which we then extend to the temporal logic CTL, which is
bda1701848cd lcp's suggestions for CTL
paulson
parents: 10795
diff changeset
    18
used in many real
10123
9469c039ff57 *** empty log message ***
nipkow
parents:
diff changeset
    19
model checkers. In each case we give both a traditional semantics (\isa{{\isasymTurnstile}}) and a
9469c039ff57 *** empty log message ***
nipkow
parents:
diff changeset
    20
recursive function \isa{mc} that maps a formula into the set of all states of
9469c039ff57 *** empty log message ***
nipkow
parents:
diff changeset
    21
the system where the formula is valid. If the system has a finite number of
10867
bda1701848cd lcp's suggestions for CTL
paulson
parents: 10795
diff changeset
    22
states, \isa{mc} is directly executable: it is a model checker, albeit an
bda1701848cd lcp's suggestions for CTL
paulson
parents: 10795
diff changeset
    23
inefficient one. The main proof obligation is to show that the semantics
10123
9469c039ff57 *** empty log message ***
nipkow
parents:
diff changeset
    24
and the model checker agree.
9469c039ff57 *** empty log message ***
nipkow
parents:
diff changeset
    25
10133
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    26
\underscoreon
10123
9469c039ff57 *** empty log message ***
nipkow
parents:
diff changeset
    27
10133
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    28
Our models are \emph{transition systems}, i.e.\ sets of \emph{states} with
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    29
transitions between them, as shown in this simple example:
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    30
\begin{center}
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    31
\unitlength.5mm
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    32
\thicklines
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    33
\begin{picture}(100,60)
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    34
\put(50,50){\circle{20}}
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    35
\put(50,50){\makebox(0,0){$p,q$}}
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    36
\put(61,55){\makebox(0,0)[l]{$s_0$}}
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    37
\put(44,42){\vector(-1,-1){26}}
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    38
\put(16,18){\vector(1,1){26}}
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    39
\put(57,43){\vector(1,-1){26}}
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    40
\put(10,10){\circle{20}}
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    41
\put(10,10){\makebox(0,0){$q,r$}}
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    42
\put(-1,15){\makebox(0,0)[r]{$s_1$}}
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    43
\put(20,10){\vector(1,0){60}}
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    44
\put(90,10){\circle{20}}
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    45
\put(90,10){\makebox(0,0){$r$}}
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    46
\put(98, 5){\line(1,0){10}}
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    47
\put(108, 5){\line(0,1){10}}
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    48
\put(108,15){\vector(-1,0){10}}
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    49
\put(91,21){\makebox(0,0)[bl]{$s_2$}}
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    50
\end{picture}
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    51
\end{center}
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    52
Each state has a unique name or number ($s_0,s_1,s_2$), and in each
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    53
state certain \emph{atomic propositions} ($p,q,r$) are true.
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    54
The aim of temporal logic is to formalize statements such as ``there is no
10186
499637e8f2c6 *** empty log message ***
nipkow
parents: 10178
diff changeset
    55
path starting from $s_2$ leading to a state where $p$ or $q$
499637e8f2c6 *** empty log message ***
nipkow
parents: 10178
diff changeset
    56
are true'', which is true, and ``on all paths starting from $s_0$ $q$ is always true'',
499637e8f2c6 *** empty log message ***
nipkow
parents: 10178
diff changeset
    57
which is false.
10123
9469c039ff57 *** empty log message ***
nipkow
parents:
diff changeset
    58
9469c039ff57 *** empty log message ***
nipkow
parents:
diff changeset
    59
Abstracting from this concrete example, we assume there is some type of
10281
9554ce1c2e54 *** empty log message ***
nipkow
parents: 10192
diff changeset
    60
states:%
10133
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    61
\end{isamarkuptext}%
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    62
\isacommand{typedecl}\ state%
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    63
\begin{isamarkuptext}%
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    64
\noindent
10281
9554ce1c2e54 *** empty log message ***
nipkow
parents: 10192
diff changeset
    65
Command \isacommand{typedecl} merely declares a new type but without
9554ce1c2e54 *** empty log message ***
nipkow
parents: 10192
diff changeset
    66
defining it (see also \S\ref{sec:typedecl}). Thus we know nothing
9554ce1c2e54 *** empty log message ***
nipkow
parents: 10192
diff changeset
    67
about the type other than its existence. That is exactly what we need
9554ce1c2e54 *** empty log message ***
nipkow
parents: 10192
diff changeset
    68
because \isa{state} really is an implicit parameter of our model.  Of
9554ce1c2e54 *** empty log message ***
nipkow
parents: 10192
diff changeset
    69
course it would have been more generic to make \isa{state} a type
9554ce1c2e54 *** empty log message ***
nipkow
parents: 10192
diff changeset
    70
parameter of everything but declaring \isa{state} globally as above
9554ce1c2e54 *** empty log message ***
nipkow
parents: 10192
diff changeset
    71
reduces clutter.  Similarly we declare an arbitrary but fixed
10867
bda1701848cd lcp's suggestions for CTL
paulson
parents: 10795
diff changeset
    72
transition system, i.e.\ a relation between states:%
10133
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    73
\end{isamarkuptext}%
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    74
\isacommand{consts}\ M\ {\isacharcolon}{\isacharcolon}\ {\isachardoublequote}{\isacharparenleft}state\ {\isasymtimes}\ state{\isacharparenright}set{\isachardoublequote}%
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    75
\begin{isamarkuptext}%
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    76
\noindent
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    77
Again, we could have made \isa{M} a parameter of everything.
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    78
Finally we introduce a type of atomic propositions%
10123
9469c039ff57 *** empty log message ***
nipkow
parents:
diff changeset
    79
\end{isamarkuptext}%
9469c039ff57 *** empty log message ***
nipkow
parents:
diff changeset
    80
\isacommand{typedecl}\ atom%
9469c039ff57 *** empty log message ***
nipkow
parents:
diff changeset
    81
\begin{isamarkuptext}%
9469c039ff57 *** empty log message ***
nipkow
parents:
diff changeset
    82
\noindent
10133
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    83
and a \emph{labelling function}%
10123
9469c039ff57 *** empty log message ***
nipkow
parents:
diff changeset
    84
\end{isamarkuptext}%
10133
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    85
\isacommand{consts}\ L\ {\isacharcolon}{\isacharcolon}\ {\isachardoublequote}state\ {\isasymRightarrow}\ atom\ set{\isachardoublequote}%
10123
9469c039ff57 *** empty log message ***
nipkow
parents:
diff changeset
    86
\begin{isamarkuptext}%
9469c039ff57 *** empty log message ***
nipkow
parents:
diff changeset
    87
\noindent
10133
e187dacd248f *** empty log message ***
nipkow
parents: 10123
diff changeset
    88
telling us which atomic propositions are true in each state.%
10123
9469c039ff57 *** empty log message ***
nipkow
parents:
diff changeset
    89
\end{isamarkuptext}%
9469c039ff57 *** empty log message ***
nipkow
parents:
diff changeset
    90
\end{isabellebody}%
9469c039ff57 *** empty log message ***
nipkow
parents:
diff changeset
    91
%%% Local Variables:
9469c039ff57 *** empty log message ***
nipkow
parents:
diff changeset
    92
%%% mode: latex
9469c039ff57 *** empty log message ***
nipkow
parents:
diff changeset
    93
%%% TeX-master: "root"
9469c039ff57 *** empty log message ***
nipkow
parents:
diff changeset
    94
%%% End: