--- a/Nominal/Ex/TypeSchemes.thy Thu Dec 16 02:25:35 2010 +0000
+++ b/Nominal/Ex/TypeSchemes.thy Thu Dec 16 08:42:48 2010 +0000
@@ -9,6 +9,8 @@
(* defined as a single nominal datatype *)
+thm finite_set
+
nominal_datatype ty =
Var "name"
| Fun "ty" "ty"