changeset 22492 | 43545e640877 |
parent 22421 | 51a18dd1ea86 |
child 22494 | b61306c7987a |
--- a/src/HOL/Nominal/Examples/Crary.thy Wed Mar 21 13:58:36 2007 +0100 +++ b/src/HOL/Nominal/Examples/Crary.thy Wed Mar 21 16:06:15 2007 +0100 @@ -340,7 +340,7 @@ lookup :: "(name\<times>trm) list \<Rightarrow> name \<Rightarrow> trm" 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"