--- a/src/ZF/List.thy Wed Aug 31 17:34:12 1994 +0200
+++ b/src/ZF/List.thy Tue Sep 06 11:02:16 1994 +0200
@@ -30,7 +30,7 @@
datatype
- "list(A)" = "Nil" | "Cons" ("a:A", "l: list(A)")
+ "list(A)" = Nil | Cons ("a:A", "l: list(A)")
translations
--- a/src/ZF/ex/TF.thy Wed Aug 31 17:34:12 1994 +0200
+++ b/src/ZF/ex/TF.thy Tue Sep 06 11:02:16 1994 +0200
@@ -18,9 +18,9 @@
tree, forest, tree_forest :: "i=>i"
datatype
- "tree(A)" = "Tcons" ("a: A", "f: forest(A)")
+ "tree(A)" = Tcons ("a: A", "f: forest(A)")
and
- "forest(A)" = "Fnil" | "Fcons" ("t: tree(A)", "f: forest(A)")
+ "forest(A)" = Fnil | Fcons ("t: tree(A)", "f: forest(A)")
rules
TF_rec_def