changeset 22492 | 43545e640877 |
parent 22418 | 49e2d9744ae1 |
child 22540 | e4817fa0f6a1 |
--- a/src/HOL/Nominal/Examples/Lam_Funs.thy Wed Mar 21 13:58:36 2007 +0100 +++ b/src/HOL/Nominal/Examples/Lam_Funs.thy Wed Mar 21 16:06:15 2007 +0100 @@ -90,7 +90,7 @@ lookup :: "(name\<times>lam) list \<Rightarrow> name \<Rightarrow> lam" where "lookup [] x = Var x" - "lookup ((y,T)#\<theta>) x = (if x=y then T else lookup \<theta> x)" +| "lookup ((y,T)#\<theta>) x = (if x=y then T else lookup \<theta> x)" lemma lookup_eqvt[eqvt]: fixes pi::"name prm"