--- a/src/HOL/Datatype.thy Mon Aug 16 14:21:54 2004 +0200
+++ b/src/HOL/Datatype.thy Mon Aug 16 14:22:27 2004 +0200
@@ -5,7 +5,9 @@
header {* Datatypes *}
-theory Datatype = Datatype_Universe:
+theory Datatype
+import Datatype_Universe
+begin
subsection {* Representing primitive types *}