changeset 18578 | 68420ce82a0b |
parent 18491 | 1ce410ff9941 |
child 18579 | 002d371401f5 |
--- a/src/HOL/Nominal/Nominal.thy Wed Jan 04 19:53:39 2006 +0100 +++ b/src/HOL/Nominal/Nominal.thy Wed Jan 04 20:20:25 2006 +0100 @@ -195,6 +195,10 @@ shows "a\<sharp>{}" by (simp add: fresh_def supp_set_empty) +lemma fresh_singleton: + shows "a\<sharp>{x} = a\<sharp>x" + by (simp add: fresh_def supp_singleton) + lemma fresh_prod: fixes a :: "'x" and x :: "'a"