adapted example
authorblanchet
Wed, 05 Sep 2012 16:07:39 +0200
changeset 50181e075733fa8c2
parent 50180 c6ccaf6df93c
child 50182 68623861e0f2
adapted example
src/HOL/Codatatype/Examples/Misc_Data.thy
     1.1 --- a/src/HOL/Codatatype/Examples/Misc_Data.thy	Wed Sep 05 16:00:53 2012 +0200
     1.2 +++ b/src/HOL/Codatatype/Examples/Misc_Data.thy	Wed Sep 05 16:07:39 2012 +0200
     1.3 @@ -61,8 +61,7 @@
     1.4    IH1 'b 'a | IH2 'c
     1.5  *)
     1.6  
     1.7 -(* FIXME data 'b nofail1 = NF11 "'a \<times> 'b" | NF12 'b *)
     1.8 -data_raw nofail1: 'a = "'a \<times> 'b + 'b"
     1.9 +data 'b nofail1 = NF11 "'b nofail1 \<times> 'b" | NF12 'b
    1.10  data 'b nofail2 = NF2 "('b nofail2 \<times> 'b \<times> 'b nofail2 \<times> 'b) list"
    1.11  data 'b nofail3 = NF3 "'b \<times> ('b nofail3 \<times> 'b \<times> 'b nofail3 \<times> 'b) fset"
    1.12  data 'b nofail4 = NF4 "('b nofail3 \<times> ('b nofail3 \<times> 'b \<times> 'b nofail3 \<times> 'b) fset) list"