doc-src/TutorialI/Misc/document/cases.tex
author nipkow
Sun, 06 Aug 2000 15:26:53 +0200
changeset 9541 d17c0b34d5c8
parent 9458 c613cd06d5cf
child 9673 1b2d4f995b13
permissions -rw-r--r--
*** empty log message ***
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
9541
d17c0b34d5c8 *** empty log message ***
nipkow
parents: 9458
diff changeset
     3
\isacommand{lemma}\ {"}(case\ xs\ of\ []\ {\isasymRightarrow}\ []\ |\ y\#ys\ {\isasymRightarrow}\ xs)\ =\ xs{"}\isanewline
d17c0b34d5c8 *** empty log message ***
nipkow
parents: 9458
diff changeset
     4
\isacommand{apply}(case\_tac\ xs)%
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}%
9458
c613cd06d5cf apply. -> by
nipkow
parents: 9145
diff changeset
    14
\isacommand{by}(auto)\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: