--- a/src/HOL/Lex/MaxChop.thy Thu Apr 22 13:03:46 1999 +0200
+++ b/src/HOL/Lex/MaxChop.thy Thu Apr 22 13:04:23 1999 +0200
@@ -4,7 +4,7 @@
Copyright 1998 TUM
*)
-MaxChop = MaxPrefix +
+MaxChop = MaxPrefix + Recdef +
types 'a chopper = "'a list => 'a list list * 'a list"