| changeset 58310 | 91ea607a34d8 |
| parent 58152 | 6fe60a9a5bad |
| child 58889 | 5b7a9633cfa8 |
--- a/src/HOL/Record.thy Thu Sep 11 19:26:59 2014 +0200 +++ b/src/HOL/Record.thy Thu Sep 11 19:32:36 2014 +0200 @@ -79,7 +79,7 @@ subsection {* Operators and lemmas for types isomorphic to tuples *} -datatype_new (dead 'a, dead 'b, dead 'c) tuple_isomorphism = +datatype (dead 'a, dead 'b, dead 'c) tuple_isomorphism = Tuple_Isomorphism "'a \<Rightarrow> 'b \<times> 'c" "'b \<times> 'c \<Rightarrow> 'a" primrec