
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 \<inter> bs = {} \<Longrightarrow> as \<sharp>* Abs_set bs x \<longleftrightarrow> as \<sharp>* x"
+  and   "as \<inter> bs = {} \<Longrightarrow> as \<sharp>* Abs_res bs x \<longleftrightarrow> as \<sharp>* x"
+  and   "cs \<inter> set ds = {} \<Longrightarrow> cs \<sharp>* Abs_lst ds x \<longleftrightarrow> cs \<sharp>* 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 \<longleftrightarrow> x = y"




