--- a/src/HOL/Induct/Tree.thy Fri Jun 17 11:35:35 2005 +0200
+++ b/src/HOL/Induct/Tree.thy Fri Jun 17 16:12:49 2005 +0200
@@ -6,7 +6,7 @@
header {* Infinitely branching trees *}
-theory Tree = Main:
+theory Tree imports Main begin
datatype 'a tree =
Atom 'a