author | nipkow |
Wed, 19 Apr 2000 12:54:56 +0200 | |
changeset 8746 | ccbb5e0dccdf |
parent 8745 | 13b32661dde4 |
child 8771 | 026f37a86ea7 |
permissions | -rw-r--r-- |
8745 | 1 |
(*<*) |
2 |
theory let_rewr = Main:; |
|
3 |
(*>*) |
|
4 |
lemma "(let xs = [] in xs@ys@xs) = ys"; |
|
5 |
apply(simp add: Let_def).; |
|
6 |
||
7 |
text{* |
|
8 |
If, in a particular context, there is no danger of a combinatorial explosion |
|
9 |
of nested \texttt{let}s one could even add \texttt{Let_def} permanently: |
|
10 |
*} |
|
11 |
theorems [simp] = Let_def; |
|
12 |
(*<*) |
|
13 |
end |
|
14 |
(*>*) |