doc-src/TutorialI/Misc/document/let_rewr.tex
author wenzelm
Sun, 25 Jun 2000 23:46:39 +0200
changeset 9122 addbea344673
parent 8771 026f37a86ea7
child 9145 9f7b8de5bfaf
permissions -rw-r--r--
added state: 'a * 'b -> 'a * ('a * 'b);
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
\isacommand{lemma}~{"}(let~xs~=~[]~in~xs@ys@xs)~=~ys{"}\isanewline
2665170f104a Adding generated files
nipkow
parents:
diff changeset
     3
\isacommand{apply}(simp~add:~Let\_def)\isacommand{.}%
2665170f104a Adding generated files
nipkow
parents:
diff changeset
     4
\begin{isamarkuptext}%
2665170f104a Adding generated files
nipkow
parents:
diff changeset
     5
If, in a particular context, there is no danger of a combinatorial explosion
8771
026f37a86ea7 *** empty log message ***
nipkow
parents: 8749
diff changeset
     6
of nested \isa{let}s one could even add \isa{Let_def} permanently:%
8749
2665170f104a Adding generated files
nipkow
parents:
diff changeset
     7
\end{isamarkuptext}%
2665170f104a Adding generated files
nipkow
parents:
diff changeset
     8
\isacommand{theorems}~[simp]~=~Let\_def\end{isabelle}%