changeset 58249 | 180f1b3508ed |
parent 53991 | d8f7f3d998de |
child 58310 | 91ea607a34d8 |
--- a/src/HOL/ex/Fundefs.thy Tue Sep 09 17:51:07 2014 +0200 +++ b/src/HOL/ex/Fundefs.thy Tue Sep 09 20:51:36 2014 +0200 @@ -372,7 +372,7 @@ (* Simple Higher-Order Recursion *) -datatype 'a tree = +datatype_new 'a tree = Leaf 'a | Branch "'a tree list" @@ -423,7 +423,7 @@ (* Many equations (quadratic blowup) *) -datatype DT = +datatype_new DT = A | B | C | D | E | F | G | H | I | J | K | L | M | N | P | Q | R | S | T | U | V