changeset 58310 | 91ea607a34d8 |
parent 58249 | 180f1b3508ed |
child 58889 | 5b7a9633cfa8 |
--- a/src/HOL/ex/Termination.thy Thu Sep 11 19:26:59 2014 +0200 +++ b/src/HOL/ex/Termination.thy Thu Sep 11 19:32:36 2014 +0200 @@ -118,7 +118,7 @@ subsection {* Simple examples with other datatypes than nat, e.g. trees and lists *} -datatype_new tree = Node | Branch tree tree +datatype tree = Node | Branch tree tree fun g_tree :: "tree * tree \<Rightarrow> tree" where