src/HOL/Hyperreal/HyperDef.thy
changeset 19931 fb32b43e7f80
parent 19765 dfe940911617
child 20245 54db3583354f
--- a/src/HOL/Hyperreal/HyperDef.thy	Tue Jun 20 14:51:59 2006 +0200
+++ b/src/HOL/Hyperreal/HyperDef.thy	Tue Jun 20 15:53:44 2006 +0200
@@ -58,6 +58,9 @@
 by (rule FreeUltrafilterNat_mem [THEN freeultrafilter.finite])
 
 lemma FreeUltrafilterNat_not_finite: "x \<in> FreeUltrafilterNat ==> ~ finite x"
+thm FreeUltrafilterNat_mem
+thm freeultrafilter.infinite
+thm FreeUltrafilterNat_mem [THEN freeultrafilter.infinite]
 by (rule FreeUltrafilterNat_mem [THEN freeultrafilter.infinite])
 
 lemma FreeUltrafilterNat_empty [simp]: "{} \<notin> FreeUltrafilterNat"