| changeset 58310 | 91ea607a34d8 | 
| parent 58249 | 180f1b3508ed | 
| child 58889 | 5b7a9633cfa8 | 
--- a/src/HOL/IMP/AExp.thy Thu Sep 11 19:26:59 2014 +0200 +++ b/src/HOL/IMP/AExp.thy Thu Sep 11 19:32:36 2014 +0200 @@ -9,7 +9,7 @@ type_synonym state = "vname \<Rightarrow> val" text_raw{*\snip{AExpaexpdef}{2}{1}{% *} -datatype_new aexp = N int | V vname | Plus aexp aexp +datatype aexp = N int | V vname | Plus aexp aexp text_raw{*}%endsnip*} text_raw{*\snip{AExpavaldef}{1}{2}{% *}