src/HOL/HOLCF/Fixrec.thy
changeset 65380 ae93953746fc
parent 62175 8ffc4d0e652d
child 69597 ff784d5a5bfb
     1.1 --- a/src/HOL/HOLCF/Fixrec.thy	Tue Apr 04 21:45:54 2017 +0200
     1.2 +++ b/src/HOL/HOLCF/Fixrec.thy	Tue Apr 04 21:57:43 2017 +0200
     1.3 @@ -5,7 +5,7 @@
     1.4  section "Package for defining recursive functions in HOLCF"
     1.5  
     1.6  theory Fixrec
     1.7 -imports Plain_HOLCF
     1.8 +imports Cprod Sprod Ssum Up One Tr Fix
     1.9  keywords "fixrec" :: thy_decl
    1.10  begin
    1.11  
    1.12 @@ -139,7 +139,7 @@
    1.13    match_TT :: "tr \<rightarrow> 'c match \<rightarrow> 'c match"
    1.14  where
    1.15    "match_TT = (\<Lambda> x k. If x then k else fail)"
    1.16 - 
    1.17 +
    1.18  definition
    1.19    match_FF :: "tr \<rightarrow> 'c match \<rightarrow> 'c match"
    1.20  where