Adapted to new inductive package.
--- a/src/HOL/Finite.thy Tue Jun 30 20:49:49 1998 +0200
+++ b/src/HOL/Finite.thy Tue Jun 30 20:50:34 1998 +0200
@@ -6,7 +6,7 @@
Finite sets and their cardinality
*)
-Finite = Divides + Power +
+Finite = Divides + Power + Inductive +
consts Finites :: 'a set set
--- a/src/HOL/Sexp.thy Tue Jun 30 20:49:49 1998 +0200
+++ b/src/HOL/Sexp.thy Tue Jun 30 20:50:34 1998 +0200
@@ -6,7 +6,7 @@
S-expressions, general binary trees for defining recursive data structures
*)
-Sexp = Univ +
+Sexp = Univ + Inductive +
consts
sexp :: 'a item set