diff -r 540ad65e804c -r 147c920ed5f7 src/HOL/Nominal/Examples/Crary.thy --- a/src/HOL/Nominal/Examples/Crary.thy Mon Apr 14 21:44:51 2008 +0200 +++ b/src/HOL/Nominal/Examples/Crary.thy Mon Apr 14 21:44:53 2008 +0200 @@ -458,7 +458,7 @@ apply(perm_simp) done -lemma test2: +lemma test2b: assumes a: "x\(\,s,t) \ (x,T\<^isub>1)#\ \ App s (Var x) \ App t (Var x) : T\<^isub>2" shows "\x. x\\ \ (x,T\<^isub>1)#\ \ App s (Var x) \ App t (Var x) : T\<^isub>2" using a