diff -r fafc461bdb9e -r eebc24b9cf39 Nominal/Nominal2_Abs.thy --- a/Nominal/Nominal2_Abs.thy Wed Feb 16 14:44:33 2011 +0000 +++ b/Nominal/Nominal2_Abs.thy Thu Feb 24 16:26:11 2011 +0000 @@ -768,6 +768,15 @@ unfolding fresh_star_def by(auto simp add: Abs_fresh_iff) +lemma Abs_fresh_star2: + fixes x::"'a::fs" + shows "as \ bs = {} \ as \* Abs_set bs x \ as \* x" + and "as \ bs = {} \ as \* Abs_res bs x \ as \* x" + and "cs \ set ds = {} \ cs \* Abs_lst ds x \ cs \* x" + unfolding fresh_star_def Abs_fresh_iff + by auto + + lemma Abs1_eq: fixes x::"'a::fs" shows "Abs_set {a} x = Abs_set {a} y \ x = y"