src/HOL/Nitpick.thy
changeset 58152 6fe60a9a5bad
parent 57992 2371bff894f9
child 58310 91ea607a34d8
     1.1 --- a/src/HOL/Nitpick.thy	Wed Sep 03 00:06:23 2014 +0200
     1.2 +++ b/src/HOL/Nitpick.thy	Wed Sep 03 00:06:24 2014 +0200
     1.3 @@ -14,9 +14,9 @@
     1.4    "nitpick_params" :: thy_decl
     1.5  begin
     1.6  
     1.7 -datatype ('a, 'b) fun_box = FunBox "'a \<Rightarrow> 'b"
     1.8 -datatype ('a, 'b) pair_box = PairBox 'a 'b
     1.9 -datatype 'a word = Word "'a set"
    1.10 +datatype_new (dead 'a, dead 'b) fun_box = FunBox "'a \<Rightarrow> 'b"
    1.11 +datatype_new (dead 'a, dead 'b) pair_box = PairBox 'a 'b
    1.12 +datatype_new (dead 'a) word = Word "'a set"
    1.13  
    1.14  typedecl bisim_iterator
    1.15  typedecl unsigned_bit