| author | wenzelm |
| Thu, 27 Aug 1998 18:34:55 +0200 | |
| changeset 5395 | b890c27c93d6 |
| parent 1461 | 6bcb44e4d6e5 |
| child 9907 | 473a6604da94 |
| permissions | -rw-r--r-- |
| 1461 | 1 |
(* Title: ZF/Let |
| 1061 | 2 |
ID: $Id$ |
| 1461 | 3 |
Author: Lawrence C Paulson, Cambridge University Computer Laboratory |
| 1061 | 4 |
Copyright 1995 University of Cambridge |
5 |
||
6 |
Let expressions -- borrowed from HOL |
|
7 |
*) |
|
8 |
||
9 |
open Let; |
|
10 |
||
11 |
val [prem] = goalw thy |
|
12 |
[Let_def] "(!!x. x=t ==> P(u(x))) ==> P(let x=t in u(x))"; |
|
| 1461 | 13 |
by (rtac (refl RS prem) 1); |
| 1450 | 14 |
qed "LetI"; |