src/HOL/HOLCF/Up.thy
changeset 58310 91ea607a34d8
parent 58249 180f1b3508ed
child 58880 0baae4311a9f
--- a/src/HOL/HOLCF/Up.thy	Thu Sep 11 19:26:59 2014 +0200
+++ b/src/HOL/HOLCF/Up.thy	Thu Sep 11 19:32:36 2014 +0200
@@ -13,7 +13,7 @@
 
 subsection {* Definition of new type for lifting *}
 
-datatype_new 'a u = Ibottom | Iup 'a
+datatype 'a u = Ibottom | Iup 'a
 
 type_notation (xsymbols)
   u  ("(_\<^sub>\<bottom>)" [1000] 999)