diff -r 535fbed859da -r 43545e640877 src/HOL/Nominal/Examples/Crary.thy
--- 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"