doc-src/TutorialI/Misc/document/cond_rewr.tex
author wenzelm
Wed, 02 Aug 2000 19:40:14 +0200
changeset 9502 50ec59aff389
parent 9458 c613cd06d5cf
child 9541 d17c0b34d5c8
permissions -rw-r--r--
adapted deriv;
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
8749
2665170f104a Adding generated files
nipkow
parents:
diff changeset
     1
\begin{isabelle}%
2665170f104a Adding generated files
nipkow
parents:
diff changeset
     2
%
2665170f104a Adding generated files
nipkow
parents:
diff changeset
     3
\begin{isamarkuptext}%
2665170f104a Adding generated files
nipkow
parents:
diff changeset
     4
So far all examples of rewrite rules were equations. The simplifier also
2665170f104a Adding generated files
nipkow
parents:
diff changeset
     5
accepts \emph{conditional} equations, for example%
2665170f104a Adding generated files
nipkow
parents:
diff changeset
     6
\end{isamarkuptext}%
2665170f104a Adding generated files
nipkow
parents:
diff changeset
     7
\isacommand{lemma}~hd\_Cons\_tl[simp]:~{"}xs~{\isasymnoteq}~[]~~{\isasymLongrightarrow}~~hd~xs~\#~tl~xs~=~xs{"}\isanewline
9458
c613cd06d5cf apply. -> by
nipkow
parents: 9145
diff changeset
     8
\isacommand{by}(case\_tac~xs,~simp,~simp)%
8749
2665170f104a Adding generated files
nipkow
parents:
diff changeset
     9
\begin{isamarkuptext}%
2665170f104a Adding generated files
nipkow
parents:
diff changeset
    10
\noindent
2665170f104a Adding generated files
nipkow
parents:
diff changeset
    11
Note the use of ``\ttindexboldpos{,}{$Isar}'' to string together a
2665170f104a Adding generated files
nipkow
parents:
diff changeset
    12
sequence of methods. Assuming that the simplification rule%
2665170f104a Adding generated files
nipkow
parents:
diff changeset
    13
\end{isamarkuptext}%
2665170f104a Adding generated files
nipkow
parents:
diff changeset
    14
~{"}(rev~xs~=~[])~=~(xs~=~[]){"}%
2665170f104a Adding generated files
nipkow
parents:
diff changeset
    15
\begin{isamarkuptext}%
2665170f104a Adding generated files
nipkow
parents:
diff changeset
    16
\noindent
2665170f104a Adding generated files
nipkow
parents:
diff changeset
    17
is present as well,%
2665170f104a Adding generated files
nipkow
parents:
diff changeset
    18
\end{isamarkuptext}%
2665170f104a Adding generated files
nipkow
parents:
diff changeset
    19
\isacommand{lemma}~{"}xs~{\isasymnoteq}~[]~{\isasymLongrightarrow}~hd(rev~xs)~\#~tl(rev~xs)~=~rev~xs{"}%
2665170f104a Adding generated files
nipkow
parents:
diff changeset
    20
\begin{isamarkuptext}%
2665170f104a Adding generated files
nipkow
parents:
diff changeset
    21
\noindent
8771
026f37a86ea7 *** empty log message ***
nipkow
parents: 8749
diff changeset
    22
is proved by plain simplification:
8749
2665170f104a Adding generated files
nipkow
parents:
diff changeset
    23
the conditional equation \isa{hd_Cons_tl} above
2665170f104a Adding generated files
nipkow
parents:
diff changeset
    24
can simplify \isa{hd(rev~xs)~\#~tl(rev~xs)} to \isa{rev xs}
2665170f104a Adding generated files
nipkow
parents:
diff changeset
    25
because the corresponding precondition \isa{rev xs \isasymnoteq\ []}
2665170f104a Adding generated files
nipkow
parents:
diff changeset
    26
simplifies to \isa{xs \isasymnoteq\ []}, which is exactly the local
2665170f104a Adding generated files
nipkow
parents:
diff changeset
    27
assumption of the subgoal.%
2665170f104a Adding generated files
nipkow
parents:
diff changeset
    28
\end{isamarkuptext}%
2665170f104a Adding generated files
nipkow
parents:
diff changeset
    29
\end{isabelle}%
9145
9f7b8de5bfaf updated;
wenzelm
parents: 8771
diff changeset
    30
%%% Local Variables:
9f7b8de5bfaf updated;
wenzelm
parents: 8771
diff changeset
    31
%%% mode: latex
9f7b8de5bfaf updated;
wenzelm
parents: 8771
diff changeset
    32
%%% TeX-master: "root"
9f7b8de5bfaf updated;
wenzelm
parents: 8771
diff changeset
    33
%%% End: