silly syntax bug
authorChristian Urban <urbanc@in.tum.de>
Wed, 30 Nov 2011 14:58:19 +0000
changeset 3057 d959bc9c800c
parent 3056 756f48abb40a
child 3058 a190b2b79cc8
silly syntax bug
Nominal/Ex/Height.thy
--- a/Nominal/Ex/Height.thy	Wed Nov 30 13:56:21 2011 +0000
+++ b/Nominal/Ex/Height.thy	Wed Nov 30 14:58:19 2011 +0000
@@ -24,7 +24,7 @@
   have ih: "height (e1[x::=e']) \<le> height e1 - 1 + height e'" by fact
   moreover
   have vc: "atom y \<sharp> x" "atom y \<sharp> e'" by fact+ (* usual variable convention *)
-  ultimately show "height ((Lam y e1)[x::=e']) \<le> height (Lam y e1) - 1 + height e'" by simp
+  ultimately show "height ((Lam [y].e1)[x::=e']) \<le> height (Lam [y].e1) - 1 + height e'" by simp
 next    
   case (App e1 e2)
   have ih1: "height (e1[x::=e']) \<le> (height e1) - 1 + height e'"