doc-src/TutorialI/Misc/document/cases.tex
author wenzelm
Mon, 28 Aug 2000 15:13:55 +0200
changeset 9698 f0740137a65d
parent 9673 1b2d4f995b13
child 9717 699de91b15e2
permissions -rw-r--r--
updated;
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
\isanewline
9673
1b2d4f995b13 updated;
wenzelm
parents: 9541
diff changeset
     3
\isacommand{lemma}\ {\isachardoublequote}{\isacharparenleft}case\ xs\ of\ {\isacharbrackleft}{\isacharbrackright}\ {\isasymRightarrow}\ {\isacharbrackleft}{\isacharbrackright}\ {\isacharbar}\ y{\isacharhash}ys\ {\isasymRightarrow}\ xs{\isacharparenright}\ {\isacharequal}\ xs{\isachardoublequote}\isanewline
1b2d4f995b13 updated;
wenzelm
parents: 9541
diff changeset
     4
\isacommand{apply}{\isacharparenleft}case{\isacharunderscore}tac\ xs{\isacharparenright}%
8749
2665170f104a Adding generated files
nipkow
parents:
diff changeset
     5
\begin{isamarkuptxt}%
8771
026f37a86ea7 *** empty log message ***
nipkow
parents: 8749
diff changeset
     6
\noindent
026f37a86ea7 *** empty log message ***
nipkow
parents: 8749
diff changeset
     7
results in the proof state
8749
2665170f104a Adding generated files
nipkow
parents:
diff changeset
     8
\begin{isabellepar}%
2665170f104a Adding generated files
nipkow
parents:
diff changeset
     9
~1.~xs~=~[]~{\isasymLongrightarrow}~(case~xs~of~[]~{\isasymRightarrow}~[]~|~y~\#~ys~{\isasymRightarrow}~xs)~=~xs\isanewline
2665170f104a Adding generated files
nipkow
parents:
diff changeset
    10
~2.~{\isasymAnd}a~list.~xs=a\#list~{\isasymLongrightarrow}~(case~xs~of~[]~{\isasymRightarrow}~[]~|~y\#ys~{\isasymRightarrow}~xs)~=~xs%
8771
026f37a86ea7 *** empty log message ***
nipkow
parents: 8749
diff changeset
    11
\end{isabellepar}%
026f37a86ea7 *** empty log message ***
nipkow
parents: 8749
diff changeset
    12
which is solved automatically:%
8749
2665170f104a Adding generated files
nipkow
parents:
diff changeset
    13
\end{isamarkuptxt}%
9673
1b2d4f995b13 updated;
wenzelm
parents: 9541
diff changeset
    14
\isacommand{by}{\isacharparenleft}auto{\isacharparenright}\isanewline
8749
2665170f104a Adding generated files
nipkow
parents:
diff changeset
    15
\end{isabelle}%
9145
9f7b8de5bfaf updated;
wenzelm
parents: 8771
diff changeset
    16
%%% Local Variables:
9f7b8de5bfaf updated;
wenzelm
parents: 8771
diff changeset
    17
%%% mode: latex
9f7b8de5bfaf updated;
wenzelm
parents: 8771
diff changeset
    18
%%% TeX-master: "root"
9f7b8de5bfaf updated;
wenzelm
parents: 8771
diff changeset
    19
%%% End: