==================== FINAL INTERFACE ==================== 2017-05-02 18:35:52.010911 UTC interface liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf:Language.Fixpoint.Types.Errors [orphan module] [family instance module] 8002 interface hash: 98702fe6c8c26d0a09a58c97eb6ae27f ABI hash: d4d50638f5ff32bb3bc70ba4c9bb3ab8 export-list hash: c4470aa04bce431d939b34bcb1af3229 orphan hash: 8eef979b573f3e0cba4b98395c1509c0 flag hash: 94fce8d5fce2cde0a8505506fc47ec8c sig of: Nothing used TH splices: False where exports: Language.Fixpoint.Types.Errors.catError Language.Fixpoint.Types.Errors.catErrors Language.Fixpoint.Types.Errors.colorResult Language.Fixpoint.Types.Errors.die Language.Fixpoint.Types.Errors.err Language.Fixpoint.Types.Errors.errFreeVarInConstraint Language.Fixpoint.Types.Errors.errFreeVarInQual Language.Fixpoint.Types.Errors.errIllScopedKVar Language.Fixpoint.Types.Errors.exit Language.Fixpoint.Types.Errors.resultDoc Language.Fixpoint.Types.Spans.dummySpan Language.Fixpoint.Types.Spans.sourcePosElts Language.Fixpoint.Types.Errors.Error Language.Fixpoint.Types.Errors.Error1|{errLoc errMsg} Language.Fixpoint.Types.Errors.FixResult{Language.Fixpoint.Types.Errors.Crash Language.Fixpoint.Types.Errors.Safe Language.Fixpoint.Types.Errors.Unsafe} Language.Fixpoint.Types.Spans.SrcSpan{Language.Fixpoint.Types.Spans.SS sp_start sp_stop} module dependencies: Language.Fixpoint.Misc Language.Fixpoint.Types.PrettyPrint Language.Fixpoint.Types.Spans package dependencies: ansi-terminal-0.6.2.3@ansi-terminal-0.6.2.3-4HPxin1iv6RAndS8lH3nzo array-0.5.1.1@array-0.5.1.1 async-2.1.1@async-2.1.1-4n6HEMPJR2eJK0JpvCfuPK base-4.9.1.0 binary-0.8.3.0@binary-0.8.3.0 boxes-0.1.4@boxes-0.1.4-6YjYnmNJvyiGUQgGc0o5m bytestring-0.10.8.1@bytestring-0.10.8.1 cereal-0.5.4.0@cereal-0.5.4.0-BsAGxfp8yAs3CiRo2E875e cmdargs-0.10.17@cmdargs-0.10.17-IWa8ygdJhnJBShkQXN8V9I containers-0.5.7.1@containers-0.5.7.1 deepseq-1.4.2.0@deepseq-1.4.2.0 directory-1.3.0.0@directory-1.3.0.0 filepath-1.4.1.1@filepath-1.4.1.1 ghc-prim-0.5.0.0 hashable-1.2.6.0@hashable-1.2.6.0-3EXxoqeEgbfAKr6aGkye6x integer-gmp-1.0.0.1 located-base-0.1.1.0@located-base-0.1.1.0-HUdCVrbsrYd4xCcb0zuvg3 parsec-3.1.11@parsec-3.1.11-113irVHGgd88sRnywByDNw pretty-1.1.3.3@pretty-1.1.3.3 process-1.4.3.0@process-1.4.3.0 split-0.2.3.1@split-0.2.3.1-FWyXC6nhV0H3AfM8IzrEFk stm-2.4.4.1@stm-2.4.4.1-JQn4hNPyYjP5m9AcbI88Ve syb-0.6@syb-0.6-IcoSwlPi2Nx4zSqMmorFPS text-1.2.2.1@text-1.2.2.1-Ji7hMs2U4BkBwavd4taEVR time-1.6.0.1@time-1.6.0.1 unix-2.7.2.1@unix-2.7.2.1 unordered-containers-0.2.8.0@unordered-containers-0.2.8.0-1XEErQCPPPc2SEtcHHNx9o orphans: base-4.9.1.0:GHC.Base base-4.9.1.0:GHC.Float binary-0.8.3.0@binary-0.8.3.0:Data.Binary.Generic bytestring-0.10.8.1@bytestring-0.10.8.1:Data.ByteString.Builder hashable-1.2.6.0@hashable-1.2.6.0-3EXxoqeEgbfAKr6aGkye6x:Data.Hashable.Generic liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf:Language.Fixpoint.Types.Spans stm-2.4.4.1@stm-2.4.4.1-JQn4hNPyYjP5m9AcbI88Ve:Control.Monad.STM syb-0.6@syb-0.6-IcoSwlPi2Nx4zSqMmorFPS:Data.Generics.Instances text-1.2.2.1@text-1.2.2.1-Ji7hMs2U4BkBwavd4taEVR:Data.Text text-1.2.2.1@text-1.2.2.1-Ji7hMs2U4BkBwavd4taEVR:Data.Text.Lazy text-1.2.2.1@text-1.2.2.1-Ji7hMs2U4BkBwavd4taEVR:Data.Text.Show time-1.6.0.1@time-1.6.0.1:Data.Time.Calendar.Gregorian time-1.6.0.1@time-1.6.0.1:Data.Time.Format.Parse time-1.6.0.1@time-1.6.0.1:Data.Time.LocalTime.LocalTime family instance modules: base-4.9.1.0:Control.Applicative base-4.9.1.0:Data.Complex base-4.9.1.0:Data.Either base-4.9.1.0:Data.Functor.Compose base-4.9.1.0:Data.Functor.Const base-4.9.1.0:Data.Functor.Identity base-4.9.1.0:Data.Functor.Product base-4.9.1.0:Data.Functor.Sum base-4.9.1.0:Data.List.NonEmpty base-4.9.1.0:Data.Monoid base-4.9.1.0:Data.Semigroup base-4.9.1.0:Data.Type.Equality base-4.9.1.0:Data.Version base-4.9.1.0:Data.Void base-4.9.1.0:GHC.Exts base-4.9.1.0:GHC.Generics base-4.9.1.0:GHC.IO.Exception base-4.9.1.0:GHC.TypeLits containers-0.5.7.1@containers-0.5.7.1:Data.IntMap.Base containers-0.5.7.1@containers-0.5.7.1:Data.IntSet.Base containers-0.5.7.1@containers-0.5.7.1:Data.Map.Base containers-0.5.7.1@containers-0.5.7.1:Data.Sequence containers-0.5.7.1@containers-0.5.7.1:Data.Set.Base liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf:Language.Fixpoint.Types.Spans pretty-1.1.3.3@pretty-1.1.3.3:Text.PrettyPrint.Annotated.HughesPJ pretty-1.1.3.3@pretty-1.1.3.3:Text.PrettyPrint.HughesPJ text-1.2.2.1@text-1.2.2.1-Ji7hMs2U4BkBwavd4taEVR:Data.Text text-1.2.2.1@text-1.2.2.1-Ji7hMs2U4BkBwavd4taEVR:Data.Text.Lazy unordered-containers-0.2.8.0@unordered-containers-0.2.8.0-1XEErQCPPPc2SEtcHHNx9o:Data.HashMap.Base unordered-containers-0.2.8.0@unordered-containers-0.2.8.0-1XEErQCPPPc2SEtcHHNx9o:Data.HashSet import -/ base-4.9.1.0:Control.Exception a76dd9666251322fe34dbcca3a0817bf import -/ base-4.9.1.0:Control.Exception.Base 1e106916283856f4d9caeddab92cd861 import -/ base-4.9.1.0:Data.Data da440c60016500822a3d4307ca5dea66 import -/ base-4.9.1.0:Data.Foldable 3e0b6967a1da89945d0e2d47266337a2 import -/ base-4.9.1.0:Data.Function 7aca86bfbd92366def5f260e30cb2628 import -/ base-4.9.1.0:Data.Functor 5ab1dc703df5b482e77efb697833ca3c import -/ base-4.9.1.0:Data.Traversable 556020d7cf3c4a34a774600512918a37 import -/ base-4.9.1.0:Data.Typeable 9257e47d10882145c67c5b489965cfb7 import -/ base-4.9.1.0:Data.Typeable.Internal 0e9bdefa4325a0112d8e73b5e1e1f85d import -/ base-4.9.1.0:GHC.Base c4231c43c07e46080a26bf94094c7aa1 import -/ base-4.9.1.0:GHC.Exception e38fa3e73d54022fb9e3ce06477dfd07 import -/ base-4.9.1.0:GHC.Generics 1dbec2bc7dd1c5bd8c89ed857eaed19b import -/ base-4.9.1.0:GHC.Show a027f5ac24879eaba752f44aa90fe511 import -/ base-4.9.1.0:Prelude 22dd289b8469a8fa8dc81cab7b237771 import -/ base-4.9.1.0:System.IO c9de64c5f5407c4cf1c52500c4d15200 import -/ binary-0.8.3.0@binary-0.8.3.0:Data.Binary 68bf10cd9cced43ad785ce79fc9157c3 import -/ binary-0.8.3.0@binary-0.8.3.0:Data.Binary.Class 74e43ac8c719b63390fb5224488bc2fa import -/ cereal-0.5.4.0@cereal-0.5.4.0-BsAGxfp8yAs3CiRo2E875e:Data.Serialize bfa0e727b662cbdba896c0b5c0142f5d import -/ deepseq-1.4.2.0@deepseq-1.4.2.0:Control.DeepSeq 0a99763cf6016b16bbf55422778a79b2 import -/ ghc-prim-0.5.0.0:GHC.Classes 0bdf3d057a415ec1b84a7b1994efbe47 import -/ ghc-prim-0.5.0.0:GHC.Types 89f8de4f08018c9177c98d979eae0e45 import -/ integer-gmp-1.0.0.1:GHC.Integer.Type 318df275d77dcdb18e0006d8d7870c2a import -/ Language.Fixpoint.Misc 268edc2be2657e56d9ac2e0e5f861c66 exports: 0d4209a369f77ae55113ca41b56281c2 Angry 0406db6b91563022a2bf052b37197c99 Happy dffacf5eff5611c151451a048c5fcc38 ListNE 245082d2e65bed4e03d6c17463d8b79a Moods 91b7fe939c9c0ffb716510227cc5d3ce Sad b91f086668a9bcac55cb0c0c49f4e9a1 import -/ Language.Fixpoint.Types.PrettyPrint 9f8ba54128c047c2f5df631a58152645 exports: 8280ba96c3b943538085a23e8c114f93 Fixpoint cc7bdd91c6c79c1473a4d48904d3bc29 PPrint f926efd2d44310d1ff99c4868d82bc97 pprint 3b1416a258327e319f3edde9b9e2d64e pprintTidy 51116c55bcc153b0498f02ab688dd904 toFix adc72af29f82382843f845a7caada087 import -/ Language.Fixpoint.Types.Spans 914694383547ac6e05961eac2448df52 exports: 7fe5850227a6e738b3508defc057da0b Loc 5c898e316073c02ed4de00d3c857e47e SS 0b969b36fbbffcb664c45ed3cb72e84a SrcSpan 78175b19733acaa6a468bb3dc2117709 dummySpan 0a9a460d1a0c849b90ebbbabded90215 sourcePosElts 206f4217a89e76ad2874ab86ab0ff653 sp_start 66a78cde7fda67c47ad8854704384b7a sp_stop 2a61f2810d77eadb616ccfe78300b944 srcSpan e14e72943b218bf137bbcd00f821afa2 import -/ pretty-1.1.3.3@pretty-1.1.3.3:Text.PrettyPrint.Annotated.HughesPJ 2ab5df7927668b2067e0d9d162c2deef import -/ pretty-1.1.3.3@pretty-1.1.3.3:Text.PrettyPrint.HughesPJ 0c3d66734497c26d70ab123829dd1cb4 import -/ syb-0.6@syb-0.6-IcoSwlPi2Nx4zSqMmorFPS:Data.Generics ea99a8062a9608312218ffd7309b5391 addDependentFile "/usr/local/lib/ghc-8.0.2/include/ghcversion.h" addDependentFile ".stack-work/dist/x86_64-osx/Cabal-1.24.2.0/build/autogen/cabal_macros.h" 123fb36a4b195c04060a482ae5ce2b02 $c5QH7u8Lpk3uJNrpiH7MMq0 :: Data.Data.Constr e9b83f5db20d4eae4fd7d98891ce4eaf $cL6YnlH531FFI7owCmZmx3C :: Data.Data.Constr 79bf23f7be31553edccd57e71433b1b4 $cL7WXoOZlMdJygnLl3hGdW :: Data.Data.Constr bbcb7910102e76dd87f9706483b3612e $fBinaryFixResult :: Data.Binary.Class.Binary a => Data.Binary.Class.Binary (Language.Fixpoint.Types.Errors.FixResult a) DFunId {- Arity: 1, Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun: @ a ($dBinary :: Data.Binary.Class.Binary a). @ (Language.Fixpoint.Types.Errors.FixResult a) (Language.Fixpoint.Types.Errors.$fBinaryFixResult_$cput @ a $dBinary) (Language.Fixpoint.Types.Errors.$fBinaryFixResult_$cget @ a $dBinary) (Language.Fixpoint.Types.Errors.$fBinaryFixResult_$cputList @ a $dBinary) -} bbcb7910102e76dd87f9706483b3612e $fBinaryFixResult1 :: Data.Binary.Class.Binary a => forall r. Data.ByteString.Internal.ByteString -> Data.Binary.Get.Internal.Success (Language.Fixpoint.Types.Errors.FixResult a) r -> Data.Binary.Get.Internal.Decoder r {- Arity: 3, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (3, True, False) (\ @ a (w :: Data.Binary.Class.Binary a) @ r (w1 :: Data.ByteString.Internal.ByteString) (w2 :: Data.Binary.Get.Internal.Success (Language.Fixpoint.Types.Errors.FixResult a) r) -> case w1 of ww { Data.ByteString.Internal.PS ww1 ww2 ww3 ww4 -> Language.Fixpoint.Types.Errors.$w$cget @ a w @ r ww1 ww2 ww3 ww4 w2 }) -} c84219e2718c456da63f9877bb354550 $fBinaryFixResult2 :: (GHC.Classes.Ord word, GHC.Num.Num word, Data.Bits.Bits word) => word -> word -> forall r. Data.ByteString.Internal.ByteString -> Data.Binary.Get.Internal.Success (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Safe" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1 a1) r -> Data.Binary.Get.Internal.Decoder r {- Arity: 7, HasNoCafRefs, Strictness: , Unfolding: InlineRule (7, True, True) (\ @ word @ a1 ($dOrd :: GHC.Classes.Ord word) ($dNum :: GHC.Num.Num word) ($dBits :: Data.Bits.Bits word) (eta :: word) (eta1 :: word) @ r (eta2 :: Data.ByteString.Internal.ByteString) (eta3 :: Data.Binary.Get.Internal.Success (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Safe" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1 a1) r) -> eta3 eta2 (GHC.Generics.U1 @ a1) `cast` (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "Safe" 'GHC.Generics.PrefixI 'GHC.Types.False>_P _R) _N)) -} bbcb7910102e76dd87f9706483b3612e $fBinaryFixResult3 :: Language.Fixpoint.Types.Errors.FixResult a -> (GHC.Generics.:+:) (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Crash" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R [a]) GHC.Generics.:*: GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R GHC.Base.String))) (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Safe" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1 GHC.Generics.:+: GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Unsafe" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict) (GHC.Generics.K1 GHC.Generics.R [a]))) x {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (1, True, False) (\ @ a @ x (x1 :: Language.Fixpoint.Types.Errors.FixResult a) -> case x1 of wild { Language.Fixpoint.Types.Errors.Crash g1 g2 -> GHC.Generics.L1 @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Crash" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R [a]) GHC.Generics.:*: GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R GHC.Base.String))) @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Safe" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1 GHC.Generics.:+: GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Unsafe" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict) (GHC.Generics.K1 GHC.Generics.R [a]))) @ x (GHC.Generics.:*: @ (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R [a])) @ (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R GHC.Base.String)) @ x g1 `cast` (Trans (Sym (GHC.Generics.N:K1[0] _P <[a]>_R _P)) (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy>_P _R) _N)) g2 `cast` (Trans (Sym (GHC.Generics.N:K1[0] _P _R _P)) (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy>_P _R) _N))) `cast` (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "Crash" 'GHC.Generics.PrefixI 'GHC.Types.False>_P _R) _N) Language.Fixpoint.Types.Errors.Safe -> Language.Fixpoint.Types.Errors.$fBinaryFixResult4 @ a @ x Language.Fixpoint.Types.Errors.Unsafe g1 -> GHC.Generics.R1 @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Crash" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R [a]) GHC.Generics.:*: GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R GHC.Base.String))) @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Safe" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1 GHC.Generics.:+: GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Unsafe" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict) (GHC.Generics.K1 GHC.Generics.R [a]))) @ x (GHC.Generics.R1 @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Safe" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1) @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Unsafe" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict) (GHC.Generics.K1 GHC.Generics.R [a]))) @ x g1 `cast` (Trans (Sym (GHC.Generics.N:K1[0] _P <[a]>_R _P)) (Trans (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict>_P _R)) (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "Unsafe" 'GHC.Generics.PrefixI 'GHC.Types.False>_P _R)) _N))) }) -} eb9f7330583e2954e03bb2e863c0c2d0 $fBinaryFixResult4 :: (GHC.Generics.:+:) (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Crash" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R [a]) GHC.Generics.:*: GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R GHC.Base.String))) (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Safe" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1 GHC.Generics.:+: GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Unsafe" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict) (GHC.Generics.K1 GHC.Generics.R [a]))) x {- HasNoCafRefs, Strictness: m2, Unfolding: (\ @ a @ x -> GHC.Generics.R1 @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Crash" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R [a]) GHC.Generics.:*: GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R GHC.Base.String))) @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Safe" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1 GHC.Generics.:+: GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Unsafe" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict) (GHC.Generics.K1 GHC.Generics.R [a]))) @ x (Language.Fixpoint.Types.Errors.$fBinaryFixResult5 @ x @ a)) -} 3ff001c00007bab1b5d157f59dc1423c $fBinaryFixResult5 :: (GHC.Generics.:+:) (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Safe" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1) (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Unsafe" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict) (GHC.Generics.K1 GHC.Generics.R [a]))) x {- HasNoCafRefs, Strictness: m1, Unfolding: (\ @ x @ a -> GHC.Generics.L1 @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Safe" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1) @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Unsafe" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict) (GHC.Generics.K1 GHC.Generics.R [a]))) @ x (GHC.Generics.U1 @ x) `cast` (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "Safe" 'GHC.Generics.PrefixI 'GHC.Types.False>_P _R) _N)) -} ccacc4448b538a0c330328891488d844 $fBinaryFixResult6 :: (GHC.Num.Num w, Data.Bits.Bits w, Data.Binary.Class.Binary w) => w -> w -> GHC.Generics.C1 ('GHC.Generics.MetaCons "Safe" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1 a1 -> Data.Binary.Put.Put {- Arity: 6, HasNoCafRefs, Strictness: m, Inline: INLINE[0], Unfolding: InlineRule (6, True, False) (\ @ w @ a1 (w1 :: GHC.Num.Num w) (w2 :: Data.Bits.Bits w) (w3 :: Data.Binary.Class.Binary w) (w4 :: w) (w5 :: w) (w6 :: GHC.Generics.C1 ('GHC.Generics.MetaCons "Safe" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1 a1) -> case w4 of code { DEFAULT -> (Data.Binary.Put.PairS @ () GHC.Tuple.() (let { ds :: Data.ByteString.Builder.Internal.Builder = case (Data.Binary.Class.put @ w w3 code) `cast` (Data.Binary.Put.N:PutM[0] <()>_N) of wild { Data.Binary.Put.PairS ds2 w8 -> w8 } } in (\ @ r (eta :: Data.ByteString.Builder.Internal.BuildStep r) -> ds `cast` (Data.ByteString.Builder.Internal.N:Builder[0]) @ r (case w6 of tpl { DEFAULT -> \ (range :: Data.ByteString.Builder.Internal.BufferRange) -> eta range })) `cast` (Sym (Data.ByteString.Builder.Internal.N:Builder[0])))) `cast` (Sym (Data.Binary.Put.N:PutM[0]) <()>_N) }) -} bbcb7910102e76dd87f9706483b3612e $fBinaryFixResult_$cget :: Data.Binary.Class.Binary a => Data.Binary.Get.Internal.Get (Language.Fixpoint.Types.Errors.FixResult a) {- Arity: 3, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Errors.$fBinaryFixResult1 `cast` (forall (a :: <*>_N). _R ->_R Sym (Data.Binary.Get.Internal.N:Get[0] _R)) -} bbcb7910102e76dd87f9706483b3612e $fBinaryFixResult_$cput :: Data.Binary.Class.Binary a => Language.Fixpoint.Types.Errors.FixResult a -> Data.Binary.Put.Put {- Arity: 2, Strictness: , Unfolding: (\ @ a ($dBinary :: Data.Binary.Class.Binary a) (eta :: Language.Fixpoint.Types.Errors.FixResult a) -> Data.Binary.Generic.$w$cgput @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Crash" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 [a]) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 GHC.Base.String))) @ (GHC.Generics.C1 ('GHC.Generics.MetaCons "Safe" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1 GHC.Generics.:+: GHC.Generics.C1 ('GHC.Generics.MetaCons "Unsafe" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict) (GHC.Generics.Rec0 [a]))) (\ @ w1 @ a1 (w2 :: GHC.Num.Num w1)[OneShot] (w3 :: Data.Bits.Bits w1)[OneShot] (w4 :: Data.Binary.Class.Binary w1)[OneShot] (w5 :: w1)[OneShot] (w6 :: w1)[OneShot] (w7 :: GHC.Generics.C1 ('GHC.Generics.MetaCons "Crash" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 [a]) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 GHC.Base.String)) a1)[OneShot] -> case w5 of code { DEFAULT -> (Data.Binary.Put.PairS @ () GHC.Tuple.() (let { ds1 :: Data.ByteString.Builder.Internal.Builder = case w7 `cast` (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "Crash" 'GHC.Generics.PrefixI 'GHC.Types.False>_P _R _N) of ww { GHC.Generics.:*: ww1 ww2 -> let { ds2 :: Data.ByteString.Builder.Internal.Builder = case Data.Binary.Class.$w$cputList ww2 `cast` (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy>_P _R _N) (GHC.Generics.N:K1[0] _P <[GHC.Types.Char]>_R _P)) of ww4 { (#,#) ww5 ww6 -> ww6 } } in let { ds :: Data.ByteString.Builder.Internal.Builder = case (Data.Binary.Class.putList @ a $dBinary ww1 `cast` (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy>_P _R _N) (GHC.Generics.N:K1[0] _P <[a]>_R _P))) `cast` (Data.Binary.Put.N:PutM[0] <()>_N) of wild { Data.Binary.Put.PairS ds3 w11 -> w11 } } in (\ @ r (eta1 :: Data.ByteString.Builder.Internal.BuildStep r) -> ds `cast` (Data.ByteString.Builder.Internal.N:Builder[0]) @ r (ds2 `cast` (Data.ByteString.Builder.Internal.N:Builder[0]) @ r eta1)) `cast` (Sym (Data.ByteString.Builder.Internal.N:Builder[0])) } } in let { ds :: Data.ByteString.Builder.Internal.Builder = case (Data.Binary.Class.put @ w1 w4 code) `cast` (Data.Binary.Put.N:PutM[0] <()>_N) of wild { Data.Binary.Put.PairS ds2 w8 -> w8 } } in (\ @ r (eta1 :: Data.ByteString.Builder.Internal.BuildStep r) -> ds `cast` (Data.ByteString.Builder.Internal.N:Builder[0]) @ r (ds1 `cast` (Data.ByteString.Builder.Internal.N:Builder[0]) @ r eta1)) `cast` (Sym (Data.ByteString.Builder.Internal.N:Builder[0])))) `cast` (Sym (Data.Binary.Put.N:PutM[0]) <()>_N) }) `cast` (Sym (Data.Binary.Generic.N:GSumPut[0] _N)) (Data.Binary.Generic.$fGSumPut:+:_$cputSum @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Safe" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1) @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Unsafe" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict) (GHC.Generics.Rec0 [a]))) Language.Fixpoint.Types.Errors.$fBinaryFixResult6 `cast` (Sym (Data.Binary.Generic.N:GSumPut[0] _N)) (\ @ w1 @ a1 (w2 :: GHC.Num.Num w1)[OneShot] (w3 :: Data.Bits.Bits w1)[OneShot] (w4 :: Data.Binary.Class.Binary w1)[OneShot] (w5 :: w1)[OneShot] (w6 :: w1)[OneShot] (w7 :: GHC.Generics.C1 ('GHC.Generics.MetaCons "Unsafe" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict) (GHC.Generics.Rec0 [a])) a1)[OneShot] -> case w5 of code { DEFAULT -> (Data.Binary.Put.PairS @ () GHC.Tuple.() (let { ds1 :: Data.ByteString.Builder.Internal.Builder = case (Data.Binary.Class.putList @ a $dBinary w7 `cast` (Trans (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "Unsafe" 'GHC.Generics.PrefixI 'GHC.Types.False>_P _R) (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict>_P _R) _N) (GHC.Generics.N:K1[0] _P <[a]>_R _P))) `cast` (Data.Binary.Put.N:PutM[0] <()>_N) of wild { Data.Binary.Put.PairS ds w' -> w' } } in let { ds :: Data.ByteString.Builder.Internal.Builder = case (Data.Binary.Class.put @ w1 w4 code) `cast` (Data.Binary.Put.N:PutM[0] <()>_N) of wild { Data.Binary.Put.PairS ds2 w8 -> w8 } } in (\ @ r (eta1 :: Data.ByteString.Builder.Internal.BuildStep r) -> ds `cast` (Data.ByteString.Builder.Internal.N:Builder[0]) @ r (ds1 `cast` (Data.ByteString.Builder.Internal.N:Builder[0]) @ r eta1)) `cast` (Sym (Data.ByteString.Builder.Internal.N:Builder[0])))) `cast` (Sym (Data.Binary.Put.N:PutM[0]) <()>_N) }) `cast` (Sym (Data.Binary.Generic.N:GSumPut[0] _N))) `cast` (Sym (Data.Binary.Generic.N:GSumPut[0] _N)) 1## 2## @ GHC.Prim.Any (Language.Fixpoint.Types.Errors.$fBinaryFixResult3 @ a @ GHC.Prim.Any eta)) -} bbcb7910102e76dd87f9706483b3612e $fBinaryFixResult_$cputList :: Data.Binary.Class.Binary a => [Language.Fixpoint.Types.Errors.FixResult a] -> Data.Binary.Put.Put {- Arity: 1, Strictness: -} bbcb7910102e76dd87f9706483b3612e $fBinaryFixResult_$cto :: GHC.Generics.Rep (Language.Fixpoint.Types.Errors.FixResult a) x -> Language.Fixpoint.Types.Errors.FixResult a {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: (\ @ a @ x (ds :: GHC.Generics.Rep (Language.Fixpoint.Types.Errors.FixResult a) x) -> case ds `cast` (Trans (Sub (Language.Fixpoint.Types.Errors.Rep_FixResult[0] _N)) (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaData "FixResult" "Language.Fixpoint.Types.Errors" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.False>_P _R) _N) of wild { GHC.Generics.L1 ds1 -> case ds1 `cast` (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "Crash" 'GHC.Generics.PrefixI 'GHC.Types.False>_P _R _N) of wild1 { GHC.Generics.:*: ds2 ds3 -> Language.Fixpoint.Types.Errors.Crash @ a ds2 `cast` (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy>_P _R _N) (GHC.Generics.N:K1[0] _P <[a]>_R _P)) ds3 `cast` (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy>_P _R _N) (GHC.Generics.N:K1[0] _P _R _P)) } GHC.Generics.R1 ds1 -> case ds1 of wild1 { GHC.Generics.L1 ds2 -> case ds2 of tpl { DEFAULT -> Language.Fixpoint.Types.Errors.Safe @ a } GHC.Generics.R1 ds2 -> Language.Fixpoint.Types.Errors.$WUnsafe @ a ds2 `cast` (Trans (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "Unsafe" 'GHC.Generics.PrefixI 'GHC.Types.False>_P _R) (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict>_P _R) _N) (GHC.Generics.N:K1[0] _P <[a]>_R _P)) } }) -} bbcb7910102e76dd87f9706483b3612e $fDataFixResult :: Data.Data.Data a => Data.Data.Data (Language.Fixpoint.Types.Errors.FixResult a) DFunId {- Arity: 1, Strictness: , Inline: [ALWAYS] CONLIKE, Unfolding: DFun: @ a ($dData :: Data.Data.Data a). @ (Language.Fixpoint.Types.Errors.FixResult a) (Language.Fixpoint.Types.Errors.$fDataFixResult_$cp1Data @ a $dData) (Language.Fixpoint.Types.Errors.$fDataFixResult_$cgfoldl @ a $dData) (Language.Fixpoint.Types.Errors.$fDataFixResult_$cgunfold @ a $dData) (Language.Fixpoint.Types.Errors.$fDataFixResult_$ctoConstr @ a $dData) (Language.Fixpoint.Types.Errors.$fDataFixResult_$cdataTypeOf @ a $dData) (Language.Fixpoint.Types.Errors.$fDataFixResult_$cdataCast1 @ a $dData) (Language.Fixpoint.Types.Errors.$fDataFixResult_$cdataCast2 @ a $dData) (Language.Fixpoint.Types.Errors.$fDataFixResult_$cgmapT @ a $dData) (Language.Fixpoint.Types.Errors.$fDataFixResult_$cgmapQl @ a $dData) (Language.Fixpoint.Types.Errors.$fDataFixResult_$cgmapQr @ a $dData) (Language.Fixpoint.Types.Errors.$fDataFixResult_$cgmapQ @ a $dData) (Language.Fixpoint.Types.Errors.$fDataFixResult_$cgmapQi @ a $dData) (Language.Fixpoint.Types.Errors.$fDataFixResult_$cgmapM @ a $dData) (Language.Fixpoint.Types.Errors.$fDataFixResult_$cgmapMp @ a $dData) (Language.Fixpoint.Types.Errors.$fDataFixResult_$cgmapMo @ a $dData) -} 06239c8d661ed0b3419ea4c148fb0451 $fDataFixResult1 :: g -> Data.Data.Qi u g {- Arity: 1, HasNoCafRefs, Unfolding: (\ @ u @ g (ds :: g) -> Language.Fixpoint.Types.Errors.$fDataFixResult2 @ g @ u) -} c8efd382dedda0a83f9c1c343f136241 $fDataFixResult10 :: Data.Data.DataRep {- Strictness: m1, Unfolding: (Data.Data.AlgRep Language.Fixpoint.Types.Errors.$fDataFixResult11) -} d255d085c5c5e11d7efffa21781c4192 $fDataFixResult11 :: [Data.Data.Constr] {- Strictness: m2, Unfolding: (GHC.Types.: @ Data.Data.Constr Language.Fixpoint.Types.Errors.$cL7WXoOZlMdJygnLl3hGdW Language.Fixpoint.Types.Errors.$fDataFixResult12) -} 320f0818518bacfd8de795ae68478c7e $fDataFixResult12 :: [Data.Data.Constr] {- Strictness: m2, Unfolding: (GHC.Types.: @ Data.Data.Constr Language.Fixpoint.Types.Errors.$c5QH7u8Lpk3uJNrpiH7MMq0 Language.Fixpoint.Types.Errors.$fDataFixResult13) -} e972516ae97ee23e300cf0e0b0cf1d48 $fDataFixResult13 :: [Data.Data.Constr] {- Strictness: m2, Unfolding: (GHC.Types.: @ Data.Data.Constr Language.Fixpoint.Types.Errors.$cL6YnlH531FFI7owCmZmx3C (GHC.Types.[] @ Data.Data.Constr)) -} e0c637332a296cd6defda87f47e86b32 $fDataFixResult14 :: [GHC.Types.Char] {- Unfolding: (GHC.CString.unpackCString# "FixResult"#) -} 716c56307fdb6f76d7c0a56310a79cb5 $fDataFixResult2 :: Data.Data.Qi u g {- HasNoCafRefs, Unfolding: (\ @ g @ u -> Data.Data.Qi @ * @ u @ g Language.Fixpoint.Types.Errors.$fDataFixResult3 (GHC.Base.Nothing @ u)) -} 6654b9d4f72f894dbad6d3b1bba85b20 $fDataFixResult3 :: GHC.Types.Int {- HasNoCafRefs, Strictness: m, Unfolding: (GHC.Types.I# 0#) -} 82c43fc16ea012b65e7ef1401919a268 $fDataFixResult4 :: g -> [u] -> [u] {- Arity: 2, HasNoCafRefs, Unfolding: (\ @ u @ g (ds :: g) (eta :: [u]) -> eta) -} aae20824da423c9d9a94e0b60baab670 $fDataFixResult5 :: g -> r -> r {- Arity: 2, HasNoCafRefs, Unfolding: (\ @ r @ g (ds :: g) (eta :: r) -> eta) -} bbcb7910102e76dd87f9706483b3612e $fDataFixResult6 :: Data.Data.Data a => (forall b. Data.Data.Data b => b -> b) -> Language.Fixpoint.Types.Errors.FixResult a -> Data.Data.ID (Language.Fixpoint.Types.Errors.FixResult a) {- Arity: 3, Strictness: , Unfolding: (\ @ a ($dData :: Data.Data.Data a) (ds :: forall b. Data.Data.Data b => b -> b) (eta :: Language.Fixpoint.Types.Errors.FixResult a) -> Language.Fixpoint.Types.Errors.$fDataFixResult_$cgfoldl @ a $dData @ Data.Data.ID (\ @ d @ b ($dData1 :: Data.Data.Data d) (ds1 :: Data.Data.ID (d -> b)) (x :: d) -> ds1 `cast` (Data.Data.N:ID[0] b>_R) (ds @ d $dData1 x)) `cast` (forall (d :: <*>_N) (b :: <*>_N). _R ->_R b)>_R ->_R _R ->_R Sym (Data.Data.N:ID[0] _R)) Language.Fixpoint.Types.Errors.$fDataFixResult7 `cast` (forall (g :: <*>_N). _R ->_R Sym (Data.Data.N:ID[0] _R)) eta) -} 222af81af6ffca39122131939dfab49b $fDataFixResult7 :: g -> g {- Arity: 1, HasNoCafRefs, Unfolding: (\ @ g (tpl :: g) -> tpl) -} 4b90c508570a3914ca73aa7534026a9e $fDataFixResult8 :: Data.Typeable.Internal.TypeRep {- Unfolding: (case Data.Typeable.Internal.typeRepFingerprints (GHC.Types.[] @ Data.Typeable.Internal.TypeRep) (GHC.Types.[] @ Data.Typeable.Internal.TypeRep) of kt_fps { DEFAULT -> case GHC.Fingerprint.fingerprintFingerprints (GHC.Types.: @ GHC.Fingerprint.Type.Fingerprint Language.Fixpoint.Types.Errors.$fDataFixResult9 kt_fps) of dt { GHC.Fingerprint.Type.Fingerprint dt1 dt2 -> Data.Typeable.Internal.TypeRep dt1 dt2 Language.Fixpoint.Types.Errors.$tcFixResult (GHC.Types.[] @ Data.Typeable.Internal.TypeRep) (GHC.Types.[] @ Data.Typeable.Internal.TypeRep) } }) -} 4102094b16c6049fb9adbadb40b4ca28 $fDataFixResult9 :: GHC.Fingerprint.Type.Fingerprint {- HasNoCafRefs, Unfolding: (GHC.Fingerprint.Type.Fingerprint 5355333826724544256## 5408947706589206649##) -} bbcb7910102e76dd87f9706483b3612e $fDataFixResult_$cdataCast1 :: Data.Data.Data a => forall (t :: * -> *) (c :: * -> *). Data.Typeable.Internal.Typeable t => (forall d. Data.Data.Data d => c (t d)) -> GHC.Base.Maybe (c (Language.Fixpoint.Types.Errors.FixResult a)) {- Arity: 3, Strictness: , Unfolding: (\ @ a ($dData :: Data.Data.Data a) @ (t :: * -> *) @ (c :: * -> *) ($dTypeable :: Data.Typeable.Internal.Typeable t) (f :: forall d. Data.Data.Data d => c (t d)) -> case $dTypeable `cast` (Data.Typeable.Internal.N:Typeable[0] <* -> *>_N _N) (GHC.Prim.proxy# @ (* -> *) @ t) of wild { Data.Typeable.Internal.TypeRep dt dt1 ds2 ds3 ds4 -> case Language.Fixpoint.Types.Errors.$fDataFixResult8 of wild1 { Data.Typeable.Internal.TypeRep dt2 dt3 ds5 ds6 ds7 -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.eqWord# dt dt2) of wild2 { GHC.Types.False -> GHC.Base.Nothing @ (c (Language.Fixpoint.Types.Errors.FixResult a)) GHC.Types.True -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.eqWord# dt1 dt3) of wild4 { GHC.Types.False -> GHC.Base.Nothing @ (c (Language.Fixpoint.Types.Errors.FixResult a)) GHC.Types.True -> GHC.Base.Just @ (c (Language.Fixpoint.Types.Errors.FixResult a)) (f @ a $dData) `cast` (_R (UnsafeCo nominal t Language.Fixpoint.Types.Errors.FixResult _N)) } } } }) -} bbcb7910102e76dd87f9706483b3612e $fDataFixResult_$cdataCast2 :: Data.Data.Data a => forall (t :: * -> * -> *) (c :: * -> *). Data.Typeable.Internal.Typeable t => (forall d e. (Data.Data.Data d, Data.Data.Data e) => c (t d e)) -> GHC.Base.Maybe (c (Language.Fixpoint.Types.Errors.FixResult a)) {- Arity: 3, HasNoCafRefs, Strictness: , Unfolding: InlineRule (3, True, True) (\ @ a ($dData :: Data.Data.Data a) @ (t :: * -> * -> *) @ (c :: * -> *) ($dTypeable :: Data.Typeable.Internal.Typeable t) (ds :: forall d e. (Data.Data.Data d, Data.Data.Data e) => c (t d e)) -> GHC.Base.Nothing @ (c (Language.Fixpoint.Types.Errors.FixResult a))) -} bbcb7910102e76dd87f9706483b3612e $fDataFixResult_$cdataTypeOf :: Data.Data.Data a => Language.Fixpoint.Types.Errors.FixResult a -> Data.Data.DataType {- Arity: 2, Strictness: m, Unfolding: InlineRule (2, True, True) (\ @ a ($dData :: Data.Data.Data a) (ds :: Language.Fixpoint.Types.Errors.FixResult a) -> Language.Fixpoint.Types.Errors.$t1UFU5oZ4U0l5IUwxNr3Y0y) -} bbcb7910102e76dd87f9706483b3612e $fDataFixResult_$cgfoldl :: Data.Data.Data a => forall (c :: * -> *). (forall d b. Data.Data.Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> Language.Fixpoint.Types.Errors.FixResult a -> c (Language.Fixpoint.Types.Errors.FixResult a) {- Arity: 1, Strictness: , Unfolding: (\ @ a ($dData :: Data.Data.Data a) @ (c :: * -> *) -> let { $dData1 :: Data.Data.Data [a] = Data.Data.$fData[] @ a $dData } in \ (k1 :: forall d b. Data.Data.Data d => c (d -> b) -> d -> c b) (z :: forall g. g -> c g) (ds :: Language.Fixpoint.Types.Errors.FixResult a) -> case ds of wild { Language.Fixpoint.Types.Errors.Crash a1 a2 -> k1 @ GHC.Base.String @ (Language.Fixpoint.Types.Errors.FixResult a) Data.Data.$fData[]_$s$fData[] (k1 @ [a] @ (GHC.Base.String -> Language.Fixpoint.Types.Errors.FixResult a) $dData1 (z @ ([a] -> GHC.Base.String -> Language.Fixpoint.Types.Errors.FixResult a) (Language.Fixpoint.Types.Errors.Crash @ a)) a1) a2 Language.Fixpoint.Types.Errors.Safe -> z @ (Language.Fixpoint.Types.Errors.FixResult a) (Language.Fixpoint.Types.Errors.Safe @ a) Language.Fixpoint.Types.Errors.Unsafe a1 -> k1 @ [a] @ (Language.Fixpoint.Types.Errors.FixResult a) $dData1 (z @ ([a] -> Language.Fixpoint.Types.Errors.FixResult a) (Language.Fixpoint.Types.Errors.$WUnsafe @ a)) a1 }) -} bbcb7910102e76dd87f9706483b3612e $fDataFixResult_$cgmapM :: Data.Data.Data a => forall (m :: * -> *). GHC.Base.Monad m => (forall d. Data.Data.Data d => d -> m d) -> Language.Fixpoint.Types.Errors.FixResult a -> m (Language.Fixpoint.Types.Errors.FixResult a) {- Arity: 3, Strictness: , Unfolding: (\ @ a ($dData :: Data.Data.Data a) @ (m :: * -> *) ($dMonad :: GHC.Base.Monad m) (ds :: forall d. Data.Data.Data d => d -> m d) -> Language.Fixpoint.Types.Errors.$fDataFixResult_$cgfoldl @ a $dData @ m (\ @ d @ b ($dData1 :: Data.Data.Data d) (c :: m (d -> b)) (x :: d) -> let { lvl23 :: m d = ds @ d $dData1 x } in GHC.Base.>>= @ m $dMonad @ (d -> b) @ b c (\ (c' :: d -> b) -> GHC.Base.>>= @ m $dMonad @ d @ b lvl23 (\ (x' :: d) -> GHC.Base.return @ m $dMonad @ b (c' x')))) (\ @ g -> GHC.Base.return @ m $dMonad @ g)) -} bbcb7910102e76dd87f9706483b3612e $fDataFixResult_$cgmapMo :: Data.Data.Data a => forall (m :: * -> *). GHC.Base.MonadPlus m => (forall d. Data.Data.Data d => d -> m d) -> Language.Fixpoint.Types.Errors.FixResult a -> m (Language.Fixpoint.Types.Errors.FixResult a) {- Arity: 4, Strictness: , Unfolding: (\ @ a ($dData :: Data.Data.Data a) @ (m :: * -> *) ($dMonadPlus :: GHC.Base.MonadPlus m) (ds :: forall d. Data.Data.Data d => d -> m d) (eta :: Language.Fixpoint.Types.Errors.FixResult a) -> let { $dMonad :: GHC.Base.Monad m = GHC.Base.$p2MonadPlus @ m $dMonadPlus } in let { lvl23 :: m (Language.Fixpoint.Types.Errors.FixResult a) = GHC.Base.mzero @ m $dMonadPlus @ (Language.Fixpoint.Types.Errors.FixResult a) } in GHC.Base.>>= @ m $dMonad @ (Language.Fixpoint.Types.Errors.FixResult a, GHC.Types.Bool) @ (Language.Fixpoint.Types.Errors.FixResult a) (Language.Fixpoint.Types.Errors.$fDataFixResult_$cgfoldl @ a $dData @ (Data.Data.Mp m) (\ @ d @ b ($dData1 :: Data.Data.Data d) (ds1 :: Data.Data.Mp m (d -> b)) (y :: d) -> let { lvl24 :: m d = ds @ d $dData1 y } in GHC.Base.>>= @ m $dMonad @ (d -> b, GHC.Types.Bool) @ (b, GHC.Types.Bool) ds1 `cast` (Data.Data.N:Mp[0] _R b>_N) (\ (ds2 :: (d -> b, GHC.Types.Bool)) -> case ds2 of wild { (,) h b1 -> case b1 of wild1 { GHC.Types.False -> GHC.Base.mplus @ m $dMonadPlus @ (b, GHC.Types.Bool) (GHC.Base.>>= @ m $dMonad @ d @ (b, GHC.Types.Bool) lvl24 (\ (y' :: d) -> GHC.Base.return @ m $dMonad @ (b, GHC.Types.Bool) (h y', GHC.Types.True))) (GHC.Base.return @ m $dMonad @ (b, GHC.Types.Bool) (h y, GHC.Types.False)) GHC.Types.True -> GHC.Base.return @ m $dMonad @ (b, GHC.Types.Bool) (h y, GHC.Types.True) } })) `cast` (forall (d :: <*>_N) (b :: <*>_N). _R ->_R b)>_R ->_R _R ->_R Sym (Data.Data.N:Mp[0] _R _N)) (\ @ g (g1 :: g) -> GHC.Base.return @ m $dMonad @ (g, GHC.Types.Bool) (g1, GHC.Types.False)) `cast` (forall (g :: <*>_N). _R ->_R Sym (Data.Data.N:Mp[0] _R _N)) eta) `cast` (Data.Data.N:Mp[0] _R _N) (\ (ds1 :: (Language.Fixpoint.Types.Errors.FixResult a, GHC.Types.Bool)) -> case ds1 of wild { (,) x' b -> case b of wild1 { GHC.Types.False -> lvl23 GHC.Types.True -> GHC.Base.return @ m $dMonad @ (Language.Fixpoint.Types.Errors.FixResult a) x' } })) -} bbcb7910102e76dd87f9706483b3612e $fDataFixResult_$cgmapMp :: Data.Data.Data a => forall (m :: * -> *). GHC.Base.MonadPlus m => (forall d. Data.Data.Data d => d -> m d) -> Language.Fixpoint.Types.Errors.FixResult a -> m (Language.Fixpoint.Types.Errors.FixResult a) {- Arity: 4, Strictness: , Unfolding: (\ @ a ($dData :: Data.Data.Data a) @ (m :: * -> *) ($dMonadPlus :: GHC.Base.MonadPlus m) (ds :: forall d. Data.Data.Data d => d -> m d) (eta :: Language.Fixpoint.Types.Errors.FixResult a) -> let { $dMonad :: GHC.Base.Monad m = GHC.Base.$p2MonadPlus @ m $dMonadPlus } in let { lvl23 :: m (Language.Fixpoint.Types.Errors.FixResult a) = GHC.Base.mzero @ m $dMonadPlus @ (Language.Fixpoint.Types.Errors.FixResult a) } in GHC.Base.>>= @ m $dMonad @ (Language.Fixpoint.Types.Errors.FixResult a, GHC.Types.Bool) @ (Language.Fixpoint.Types.Errors.FixResult a) (Language.Fixpoint.Types.Errors.$fDataFixResult_$cgfoldl @ a $dData @ (Data.Data.Mp m) (\ @ d @ b ($dData1 :: Data.Data.Data d) (ds1 :: Data.Data.Mp m (d -> b)) (y :: d) -> let { lvl24 :: m d = ds @ d $dData1 y } in GHC.Base.>>= @ m $dMonad @ (d -> b, GHC.Types.Bool) @ (b, GHC.Types.Bool) ds1 `cast` (Data.Data.N:Mp[0] _R b>_N) (\ (ds2 :: (d -> b, GHC.Types.Bool)) -> case ds2 of wild { (,) h b1 -> GHC.Base.mplus @ m $dMonadPlus @ (b, GHC.Types.Bool) (GHC.Base.>>= @ m $dMonad @ d @ (b, GHC.Types.Bool) lvl24 (\ (y' :: d) -> GHC.Base.return @ m $dMonad @ (b, GHC.Types.Bool) (h y', GHC.Types.True))) (GHC.Base.return @ m $dMonad @ (b, GHC.Types.Bool) (h y, b1)) })) `cast` (forall (d :: <*>_N) (b :: <*>_N). _R ->_R b)>_R ->_R _R ->_R Sym (Data.Data.N:Mp[0] _R _N)) (\ @ g (g1 :: g) -> GHC.Base.return @ m $dMonad @ (g, GHC.Types.Bool) (g1, GHC.Types.False)) `cast` (forall (g :: <*>_N). _R ->_R Sym (Data.Data.N:Mp[0] _R _N)) eta) `cast` (Data.Data.N:Mp[0] _R _N) (\ (ds1 :: (Language.Fixpoint.Types.Errors.FixResult a, GHC.Types.Bool)) -> case ds1 of wild { (,) x' b -> case b of wild1 { GHC.Types.False -> lvl23 GHC.Types.True -> GHC.Base.return @ m $dMonad @ (Language.Fixpoint.Types.Errors.FixResult a) x' } })) -} bbcb7910102e76dd87f9706483b3612e $fDataFixResult_$cgmapQ :: Data.Data.Data a => forall u. (forall d. Data.Data.Data d => d -> u) -> Language.Fixpoint.Types.Errors.FixResult a -> [u] {- Arity: 3, Strictness: , Unfolding: (\ @ a ($dData :: Data.Data.Data a) @ u (ds :: forall d. Data.Data.Data d => d -> u) (eta :: Language.Fixpoint.Types.Errors.FixResult a) -> (Language.Fixpoint.Types.Errors.$fDataFixResult_$cgfoldl @ a $dData @ (Data.Data.Qr [u]) (\ @ d @ b ($dData1 :: Data.Data.Data d) (ds1 :: Data.Data.Qr [u] (d -> b)) (x :: d) (r1 :: [u]) -> ds1 `cast` (Data.Data.N:Qr[0] <*>_N <[u]>_R b>_P) (GHC.Types.: @ u (ds @ d $dData1 x) r1)) `cast` (forall (d :: <*>_N) (b :: <*>_N). _R ->_R b)>_R ->_R _R ->_R Sym (Data.Data.N:Qr[0] <*>_N <[u]>_R _P)) (Language.Fixpoint.Types.Errors.$fDataFixResult4 @ u) `cast` (forall (g :: <*>_N). _R ->_R Sym (Data.Data.N:Qr[0] <*>_N <[u]>_R _P)) eta) `cast` (Data.Data.N:Qr[0] <*>_N <[u]>_R _P) (GHC.Types.[] @ u)) -} bbcb7910102e76dd87f9706483b3612e $fDataFixResult_$cgmapQi :: Data.Data.Data a => forall u. GHC.Types.Int -> (forall d. Data.Data.Data d => d -> u) -> Language.Fixpoint.Types.Errors.FixResult a -> u {- Arity: 4, Strictness: , Unfolding: (\ @ a ($dData :: Data.Data.Data a) @ u (ds :: GHC.Types.Int) (ds1 :: forall d. Data.Data.Data d => d -> u) (eta :: Language.Fixpoint.Types.Errors.FixResult a) -> case Language.Fixpoint.Types.Errors.$fDataFixResult_$cgfoldl @ a $dData @ (Data.Data.Qi u) (\ @ d @ b ($dData1 :: Data.Data.Data d) (ds2 :: Data.Data.Qi u (d -> b)) (a1 :: d) -> case ds2 of wild { Data.Data.Qi i' q -> Data.Data.Qi @ * @ u @ b (case i' of wild1 { GHC.Types.I# x -> GHC.Types.I# (GHC.Prim.+# x 1#) }) (case ds of wild1 { GHC.Types.I# x -> case i' of wild2 { GHC.Types.I# y -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# x y) of wild3 { GHC.Types.False -> q GHC.Types.True -> GHC.Base.Just @ u (ds1 @ d $dData1 a1) } } }) }) (Language.Fixpoint.Types.Errors.$fDataFixResult1 @ u) eta of wild { Data.Data.Qi ds2 q -> Data.Maybe.fromJust @ u q }) -} bbcb7910102e76dd87f9706483b3612e $fDataFixResult_$cgmapQl :: Data.Data.Data a => forall r r'. (r -> r' -> r) -> r -> (forall d. Data.Data.Data d => d -> r') -> Language.Fixpoint.Types.Errors.FixResult a -> r {- Arity: 4, Strictness: , Unfolding: (\ @ a ($dData :: Data.Data.Data a) @ r @ r' (ds :: r -> r' -> r) (ds1 :: r) (ds2 :: forall d. Data.Data.Data d => d -> r') -> let { g :: Language.Fixpoint.Types.Errors.FixResult a -> Data.Data.CONST r (Language.Fixpoint.Types.Errors.FixResult a) = Language.Fixpoint.Types.Errors.$fDataFixResult_$cgfoldl @ a $dData @ (Data.Data.CONST r) (\ @ d @ b ($dData1 :: Data.Data.Data d) (c :: Data.Data.CONST r (d -> b)) (x :: d) -> ds c `cast` (Data.Data.N:CONST[0] <*>_N _R b>_P) (ds2 @ d $dData1 x)) `cast` (forall (d :: <*>_N) (b :: <*>_N). _R ->_R b)>_R ->_R _R ->_R Sym (Data.Data.N:CONST[0] <*>_N _R _P)) (\ @ g1 (ds3 :: g1) -> ds1) `cast` (forall (g1 :: <*>_N). _R ->_R Sym (Data.Data.N:CONST[0] <*>_N _R _P)) } in (\ (x :: Language.Fixpoint.Types.Errors.FixResult a) -> g x) `cast` (_R ->_R Data.Data.N:CONST[0] <*>_N _R _P)) -} bbcb7910102e76dd87f9706483b3612e $fDataFixResult_$cgmapQr :: Data.Data.Data a => forall r r'. (r' -> r -> r) -> r -> (forall d. Data.Data.Data d => d -> r') -> Language.Fixpoint.Types.Errors.FixResult a -> r {- Arity: 5, Strictness: , Unfolding: (\ @ a ($dData :: Data.Data.Data a) @ r @ r' (ds :: r' -> r -> r) (ds1 :: r) (ds2 :: forall d. Data.Data.Data d => d -> r') (eta :: Language.Fixpoint.Types.Errors.FixResult a) -> (Language.Fixpoint.Types.Errors.$fDataFixResult_$cgfoldl @ a $dData @ (Data.Data.Qr r) (\ @ d @ b ($dData1 :: Data.Data.Data d) (ds3 :: Data.Data.Qr r (d -> b)) (x :: d) (r1 :: r) -> ds3 `cast` (Data.Data.N:Qr[0] <*>_N _R b>_P) (ds (ds2 @ d $dData1 x) r1)) `cast` (forall (d :: <*>_N) (b :: <*>_N). _R ->_R b)>_R ->_R _R ->_R Sym (Data.Data.N:Qr[0] <*>_N _R _P)) (Language.Fixpoint.Types.Errors.$fDataFixResult5 @ r) `cast` (forall (g :: <*>_N). _R ->_R Sym (Data.Data.N:Qr[0] <*>_N _R _P)) eta) `cast` (Data.Data.N:Qr[0] <*>_N _R _P) ds1) -} bbcb7910102e76dd87f9706483b3612e $fDataFixResult_$cgmapT :: Data.Data.Data a => (forall b. Data.Data.Data b => b -> b) -> Language.Fixpoint.Types.Errors.FixResult a -> Language.Fixpoint.Types.Errors.FixResult a {- Arity: 3, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Errors.$fDataFixResult6 `cast` (forall (a :: <*>_N). _R ->_R b -> b>_R ->_R _R ->_R Data.Data.N:ID[0] _R) -} bbcb7910102e76dd87f9706483b3612e $fDataFixResult_$cgunfold :: Data.Data.Data a => forall (c :: * -> *). (forall b r. Data.Data.Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Data.Data.Constr -> c (Language.Fixpoint.Types.Errors.FixResult a) {- Arity: 1, Strictness: , Unfolding: (\ @ a ($dData :: Data.Data.Data a) @ (c :: * -> *) -> let { $dData1 :: Data.Data.Data [a] = Data.Data.$fData[] @ a $dData } in \ (k1 :: forall b r. Data.Data.Data b => c (b -> r) -> c r) (z :: forall r. r -> c r) (c1 :: Data.Data.Constr) -> case c1 of ww { Data.Data.Constr ww1 ww2 ww3 ww4 ww5 -> case ww1 of wild { DEFAULT -> case Data.Data.constrIndex1 ww5 ret_ty (c (Language.Fixpoint.Types.Errors.FixResult a)) of {} Data.Data.AlgConstr idx -> case idx of wild1 { GHC.Types.I# ds -> case ds of ds1 { DEFAULT -> k1 @ [a] @ (Language.Fixpoint.Types.Errors.FixResult a) $dData1 (z @ ([a] -> Language.Fixpoint.Types.Errors.FixResult a) (Language.Fixpoint.Types.Errors.$WUnsafe @ a)) 1# -> k1 @ GHC.Base.String @ (Language.Fixpoint.Types.Errors.FixResult a) Data.Data.$fData[]_$s$fData[] (k1 @ [a] @ (GHC.Base.String -> Language.Fixpoint.Types.Errors.FixResult a) $dData1 (z @ ([a] -> GHC.Base.String -> Language.Fixpoint.Types.Errors.FixResult a) (Language.Fixpoint.Types.Errors.Crash @ a))) 2# -> z @ (Language.Fixpoint.Types.Errors.FixResult a) (Language.Fixpoint.Types.Errors.Safe @ a) } } } }) -} bbcb7910102e76dd87f9706483b3612e $fDataFixResult_$cp1Data :: Data.Data.Data a => Data.Typeable.Internal.Typeable (Language.Fixpoint.Types.Errors.FixResult a) {- Arity: 1, Strictness: , Unfolding: (\ @ a ($dData :: Data.Data.Data a) -> let { ds :: Data.Typeable.Internal.TypeRep = case Language.Fixpoint.Types.Errors.$fDataFixResult8 of wild { Data.Typeable.Internal.TypeRep dt dt1 tc ks trs -> let { types :: [Data.Typeable.Internal.TypeRep] = GHC.Base.++ @ Data.Typeable.Internal.TypeRep trs (GHC.Types.: @ Data.Typeable.Internal.TypeRep ((Data.Data.$p1Data @ a $dData) `cast` (Data.Typeable.Internal.N:Typeable[0] <*>_N _N) (GHC.Prim.proxy# @ * @ a)) (GHC.Types.[] @ Data.Typeable.Internal.TypeRep)) } in case Data.Typeable.Internal.typeRepFingerprints ks types of kt_fps { DEFAULT -> case GHC.Fingerprint.fingerprintFingerprints (GHC.Types.: @ GHC.Fingerprint.Type.Fingerprint (Data.Typeable.Internal.tyConFingerprint tc) kt_fps) of dt2 { GHC.Fingerprint.Type.Fingerprint dt3 dt4 -> Data.Typeable.Internal.TypeRep dt3 dt4 tc ks types } } } } in (\ (wild :: GHC.Prim.Proxy# (Language.Fixpoint.Types.Errors.FixResult a)) -> ds) `cast` (Sym (Data.Typeable.Internal.N:Typeable[0] <*>_N _N))) -} bbcb7910102e76dd87f9706483b3612e $fDataFixResult_$ctoConstr :: Data.Data.Data a => Language.Fixpoint.Types.Errors.FixResult a -> Data.Data.Constr {- Arity: 2, Strictness: , Unfolding: InlineRule (2, True, False) (\ @ a ($dData :: Data.Data.Data a) (ds :: Language.Fixpoint.Types.Errors.FixResult a) -> case ds of wild { Language.Fixpoint.Types.Errors.Crash ds1 ds2 -> Language.Fixpoint.Types.Errors.$cL7WXoOZlMdJygnLl3hGdW Language.Fixpoint.Types.Errors.Safe -> Language.Fixpoint.Types.Errors.$c5QH7u8Lpk3uJNrpiH7MMq0 Language.Fixpoint.Types.Errors.Unsafe ds1 -> Language.Fixpoint.Types.Errors.$cL6YnlH531FFI7owCmZmx3C }) -} d0173fd74c0fa26b5149cb3e367aede0 $fEqError :: GHC.Classes.Eq Language.Fixpoint.Types.Errors.Error DFunId {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Errors.Error Language.Fixpoint.Types.Errors.$fEqError_$c== Language.Fixpoint.Types.Errors.$fEqError_$c/= -} af80a035f9731b203491b28daa7a8cc7 $fEqError1 :: GHC.Classes.Eq Language.Fixpoint.Types.Errors.Error1 DFunId {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Errors.Error1 Language.Fixpoint.Types.Errors.$fEqError1_$c== Language.Fixpoint.Types.Errors.$fEqError1_$c/= -} af80a035f9731b203491b28daa7a8cc7 $fEqError1_$c/= :: Language.Fixpoint.Types.Errors.Error1 -> Language.Fixpoint.Types.Errors.Error1 -> GHC.Types.Bool {- Arity: 2, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (2, True, False) (\ (w :: Language.Fixpoint.Types.Errors.Error1) (w1 :: Language.Fixpoint.Types.Errors.Error1) -> case w of ww { Language.Fixpoint.Types.Errors.Error1 ww1 ww2 -> case ww1 of ww3 { Language.Fixpoint.Types.Spans.SS ww4 ww5 -> case ww4 of ww6 { Text.Parsec.Pos.SourcePos ww7 ww8 ww9 -> case ww5 of ww10 { Text.Parsec.Pos.SourcePos ww11 ww12 ww13 -> case w1 of ww14 { Language.Fixpoint.Types.Errors.Error1 ww15 ww16 -> case ww15 of ww17 { Language.Fixpoint.Types.Spans.SS ww18 ww19 -> case ww18 of ww20 { Text.Parsec.Pos.SourcePos ww21 ww22 ww23 -> case ww19 of ww24 { Text.Parsec.Pos.SourcePos ww25 ww26 ww27 -> Language.Fixpoint.Types.Errors.$w$c/= ww7 ww8 ww9 ww11 ww12 ww13 ww2 ww21 ww22 ww23 ww25 ww26 ww27 ww16 } } } } } } } }) -} af80a035f9731b203491b28daa7a8cc7 $fEqError1_$c== :: Language.Fixpoint.Types.Errors.Error1 -> Language.Fixpoint.Types.Errors.Error1 -> GHC.Types.Bool {- Arity: 2, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (2, True, False) (\ (w :: Language.Fixpoint.Types.Errors.Error1) (w1 :: Language.Fixpoint.Types.Errors.Error1) -> case w of ww { Language.Fixpoint.Types.Errors.Error1 ww1 ww2 -> case ww1 of ww3 { Language.Fixpoint.Types.Spans.SS ww4 ww5 -> case ww4 of ww6 { Text.Parsec.Pos.SourcePos ww7 ww8 ww9 -> case ww5 of ww10 { Text.Parsec.Pos.SourcePos ww11 ww12 ww13 -> case w1 of ww14 { Language.Fixpoint.Types.Errors.Error1 ww15 ww16 -> case ww15 of ww17 { Language.Fixpoint.Types.Spans.SS ww18 ww19 -> case ww18 of ww20 { Text.Parsec.Pos.SourcePos ww21 ww22 ww23 -> case ww19 of ww24 { Text.Parsec.Pos.SourcePos ww25 ww26 ww27 -> Language.Fixpoint.Types.Errors.$w$c== ww7 ww8 ww9 ww11 ww12 ww13 ww2 ww21 ww22 ww23 ww25 ww26 ww27 ww16 } } } } } } } }) -} 549abdde6554422383d7367002775622 $fEqError2 :: [Language.Fixpoint.Types.Errors.Error1] -> [Language.Fixpoint.Types.Errors.Error1] -> GHC.Types.Bool {- Arity: 2, Unfolding: (GHC.Classes.$fEq[]_$c== @ Language.Fixpoint.Types.Errors.Error1 Language.Fixpoint.Types.Errors.$fEqError1) -} d0173fd74c0fa26b5149cb3e367aede0 $fEqError_$c/= :: Language.Fixpoint.Types.Errors.Error -> Language.Fixpoint.Types.Errors.Error -> GHC.Types.Bool {- Arity: 2, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Errors.$fEqError_$s$fEq[]_$c/= `cast` (Sym (Language.Fixpoint.Types.Errors.N:Error[0]) ->_R Sym (Language.Fixpoint.Types.Errors.N:Error[0]) ->_R _R) -} d0173fd74c0fa26b5149cb3e367aede0 $fEqError_$c== :: Language.Fixpoint.Types.Errors.Error -> Language.Fixpoint.Types.Errors.Error -> GHC.Types.Bool {- Arity: 2, Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Errors.$fEqError2 `cast` (Sym (Language.Fixpoint.Types.Errors.N:Error[0]) ->_R Sym (Language.Fixpoint.Types.Errors.N:Error[0]) ->_R _R) -} 98539841d28332c7b9fc76d21d58c7a5 $fEqError_$s$fEq[]_$c/= :: [Language.Fixpoint.Types.Errors.Error1] -> [Language.Fixpoint.Types.Errors.Error1] -> GHC.Types.Bool {- Arity: 2, Strictness: , Inline: INLINE (sat-args=2), Unfolding: InlineRule (2, False, False) (\ (x :: [Language.Fixpoint.Types.Errors.Error1]) (y :: [Language.Fixpoint.Types.Errors.Error1]) -> GHC.Classes.not (GHC.Classes.$fEq[]_$c== @ Language.Fixpoint.Types.Errors.Error1 Language.Fixpoint.Types.Errors.$fEqError1 x y)) -} bbcb7910102e76dd87f9706483b3612e $fEqFixResult :: GHC.Classes.Eq a => GHC.Classes.Eq (Language.Fixpoint.Types.Errors.FixResult a) DFunId {- Arity: 1, HasNoCafRefs, Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun: @ a ($dEq :: GHC.Classes.Eq a). @ (Language.Fixpoint.Types.Errors.FixResult a) (Language.Fixpoint.Types.Errors.$fEqFixResult_$c== @ a $dEq) (Language.Fixpoint.Types.Errors.$fEqFixResult_$c/= @ a $dEq) -} bbcb7910102e76dd87f9706483b3612e $fEqFixResult_$c/= :: GHC.Classes.Eq a => Language.Fixpoint.Types.Errors.FixResult a -> Language.Fixpoint.Types.Errors.FixResult a -> GHC.Types.Bool {- Arity: 3, HasNoCafRefs, Strictness: , Inline: INLINE (sat-args=2), Unfolding: InlineRule (3, False, False) (\ @ a ($dEq :: GHC.Classes.Eq a) (x :: Language.Fixpoint.Types.Errors.FixResult a) (y :: Language.Fixpoint.Types.Errors.FixResult a) -> GHC.Classes.not (Language.Fixpoint.Types.Errors.$fEqFixResult_$c== @ a $dEq x y)) -} bbcb7910102e76dd87f9706483b3612e $fEqFixResult_$c== :: GHC.Classes.Eq a => Language.Fixpoint.Types.Errors.FixResult a -> Language.Fixpoint.Types.Errors.FixResult a -> GHC.Types.Bool {- Arity: 3, HasNoCafRefs, Strictness: , Unfolding: (\ @ a ($dEq :: GHC.Classes.Eq a) (ds :: Language.Fixpoint.Types.Errors.FixResult a) (ds1 :: Language.Fixpoint.Types.Errors.FixResult a) -> case ds of wild { Language.Fixpoint.Types.Errors.Crash xs ds2 -> case ds1 of wild1 { DEFAULT -> GHC.Types.False Language.Fixpoint.Types.Errors.Crash ys ds3 -> GHC.Classes.$fEq[]_$c== @ a $dEq xs ys } Language.Fixpoint.Types.Errors.Safe -> case ds1 of wild1 { DEFAULT -> GHC.Types.False Language.Fixpoint.Types.Errors.Safe -> GHC.Types.True } Language.Fixpoint.Types.Errors.Unsafe xs -> case ds1 of wild1 { DEFAULT -> GHC.Types.False Language.Fixpoint.Types.Errors.Unsafe ys -> GHC.Classes.$fEq[]_$c== @ a $dEq xs ys } }) -} d0173fd74c0fa26b5149cb3e367aede0 $fExceptionError :: GHC.Exception.Exception Language.Fixpoint.Types.Errors.Error DFunId {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Errors.Error Language.Fixpoint.Types.Errors.$fExceptionError_$cp1Exception Language.Fixpoint.Types.Errors.$fShowError Language.Fixpoint.Types.Errors.$fExceptionError_$ctoException Language.Fixpoint.Types.Errors.$fExceptionError_$cfromException Language.Fixpoint.Types.Errors.$fExceptionError_$cdisplayException -} af80a035f9731b203491b28daa7a8cc7 $fExceptionError1 :: Language.Fixpoint.Types.Errors.Error1 -> GHC.Show.ShowS {- Arity: 2, Unfolding: (\ (w :: Language.Fixpoint.Types.Errors.Error1) (w1 :: GHC.Base.String) -> case w of ww { Language.Fixpoint.Types.Errors.Error1 ww1 ww2 -> Language.Fixpoint.Types.Errors.$w$cshowsPrec 0# ww1 ww2 w1 }) -} d0173fd74c0fa26b5149cb3e367aede0 $fExceptionError10 :: GHC.Prim.Proxy# Language.Fixpoint.Types.Errors.Error -> Data.Typeable.Internal.TypeRep {- Arity: 1, Strictness: , Unfolding: InlineRule (1, True, True) (\ (wild :: GHC.Prim.Proxy# Language.Fixpoint.Types.Errors.Error) -> Language.Fixpoint.Types.Errors.$fExceptionError8) -} 2f7c3fabe9b75c1929b7fd3a7cfba7f5 $fExceptionError2 :: [GHC.Types.Char] {- Unfolding: (GHC.CString.unpackCString# "Error1 {"#) -} 1da2b8f155107a64324e1dec23b0049b $fExceptionError3 :: [GHC.Types.Char] {- Unfolding: (GHC.CString.unpackCString# "}"#) -} 6033fabd18e334dd184ddfdb92fca219 $fExceptionError4 :: [GHC.Types.Char] {- Unfolding: (GHC.CString.unpackCString# "errMsg = "#) -} cbd4d8f1522d38eeede019d6f42febaf $fExceptionError5 :: [GHC.Types.Char] {- Unfolding: (GHC.CString.unpackCString# ", "#) -} 0fa9945b1102511480572de92c437e0f $fExceptionError6 :: [GHC.Types.Char] {- Unfolding: (GHC.CString.unpackCString# "errLoc = "#) -} 212461829aca42474a31d5edae59dff7 $fExceptionError7 :: [GHC.Types.Char] {- Unfolding: (GHC.CString.unpackCString# "Error "#) -} ffde507dca6293491b9141a79c15f11d $fExceptionError8 :: Data.Typeable.Internal.TypeRep {- Unfolding: (case Data.Typeable.Internal.typeRepFingerprints (GHC.Types.[] @ Data.Typeable.Internal.TypeRep) (GHC.Types.[] @ Data.Typeable.Internal.TypeRep) of kt_fps { DEFAULT -> case GHC.Fingerprint.fingerprintFingerprints (GHC.Types.: @ GHC.Fingerprint.Type.Fingerprint Language.Fixpoint.Types.Errors.$fExceptionError9 kt_fps) of dt { GHC.Fingerprint.Type.Fingerprint dt1 dt2 -> Data.Typeable.Internal.TypeRep dt1 dt2 Language.Fixpoint.Types.Errors.$tcError (GHC.Types.[] @ Data.Typeable.Internal.TypeRep) (GHC.Types.[] @ Data.Typeable.Internal.TypeRep) } }) -} 57c935148a80439471ea9f3c90c2e6a2 $fExceptionError9 :: GHC.Fingerprint.Type.Fingerprint {- HasNoCafRefs, Unfolding: (GHC.Fingerprint.Type.Fingerprint 5573639981624302606## 15596646033556386062##) -} d0173fd74c0fa26b5149cb3e367aede0 $fExceptionError_$cdisplayException :: Language.Fixpoint.Types.Errors.Error -> GHC.Base.String {- Arity: 1, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Errors.$fExceptionError_$cshow -} d0173fd74c0fa26b5149cb3e367aede0 $fExceptionError_$cfromException :: GHC.Exception.SomeException -> GHC.Base.Maybe Language.Fixpoint.Types.Errors.Error {- Arity: 1, Strictness: , Unfolding: (\ (eta :: GHC.Exception.SomeException) -> case eta of wild { GHC.Exception.SomeException e10 $dException1 e2 -> case (GHC.Exception.$p1Exception @ e10 $dException1) `cast` (Data.Typeable.Internal.N:Typeable[0] <*>_N _N) (GHC.Prim.proxy# @ * @ e10) of wild1 { Data.Typeable.Internal.TypeRep dt dt1 ds2 ds3 ds4 -> case Language.Fixpoint.Types.Errors.$fExceptionError8 of wild2 { Data.Typeable.Internal.TypeRep dt2 dt3 ds5 ds6 ds7 -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.eqWord# dt dt2) of wild3 { GHC.Types.False -> GHC.Base.Nothing @ Language.Fixpoint.Types.Errors.Error GHC.Types.True -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.eqWord# dt1 dt3) of wild4 { GHC.Types.False -> GHC.Base.Nothing @ Language.Fixpoint.Types.Errors.Error GHC.Types.True -> GHC.Base.Just @ Language.Fixpoint.Types.Errors.Error e2 `cast` (UnsafeCo representational e10 Language.Fixpoint.Types.Errors.Error) } } } } }) -} d0173fd74c0fa26b5149cb3e367aede0 $fExceptionError_$cp1Exception :: Data.Typeable.Internal.Typeable Language.Fixpoint.Types.Errors.Error {- Arity: 1, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Errors.$fExceptionError10 `cast` (Sym (Data.Typeable.Internal.N:Typeable[0] <*>_N _N)) -} d0173fd74c0fa26b5149cb3e367aede0 $fExceptionError_$cshow :: Language.Fixpoint.Types.Errors.Error -> GHC.Base.String {- Arity: 1, Strictness: , Unfolding: InlineRule (1, True, False) (\ (x :: Language.Fixpoint.Types.Errors.Error) -> GHC.Base.augment @ GHC.Types.Char (\ @ b (c :: GHC.Types.Char -> b -> b)[OneShot] (n :: b)[OneShot] -> GHC.Base.foldr @ GHC.Types.Char @ b c n Language.Fixpoint.Types.Errors.$fExceptionError7) (GHC.Show.showList__ @ Language.Fixpoint.Types.Errors.Error1 Language.Fixpoint.Types.Errors.$fExceptionError1 x `cast` (Language.Fixpoint.Types.Errors.N:Error[0]) (GHC.Types.[] @ GHC.Types.Char))) -} d0173fd74c0fa26b5149cb3e367aede0 $fExceptionError_$ctoException :: Language.Fixpoint.Types.Errors.Error -> GHC.Exception.SomeException {- Arity: 1 -} d0173fd74c0fa26b5149cb3e367aede0 $fExceptionFixResult :: GHC.Exception.Exception (Language.Fixpoint.Types.Errors.FixResult Language.Fixpoint.Types.Errors.Error) DFunId {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ (Language.Fixpoint.Types.Errors.FixResult Language.Fixpoint.Types.Errors.Error) Language.Fixpoint.Types.Errors.$fExceptionFixResult_$cp1Exception Language.Fixpoint.Types.Errors.$fExceptionFixResult_$cp2Exception Language.Fixpoint.Types.Errors.$fExceptionFixResult_$ctoException Language.Fixpoint.Types.Errors.$fExceptionFixResult_$cfromException Language.Fixpoint.Types.Errors.$fExceptionFixResult_$cdisplayException -} b6a016449452a5dccb1e42c65e1773ec $fExceptionFixResult1 :: [GHC.Types.Char] {- Unfolding: (GHC.CString.unpackAppendCString# "[]"# (GHC.Types.[] @ GHC.Types.Char)) -} 37a00411a0e51cc54c8690870d208045 $fExceptionFixResult2 :: [GHC.Types.Char] {- Unfolding: (GHC.CString.unpackCString# "Unsafe "#) -} 5d9ecc38f9ed55f7342918655713aec4 $fExceptionFixResult3 :: [GHC.Types.Char] {- Unfolding: (GHC.CString.unpackCString# "Safe"#) -} 654db0be44ed9a81db9705fd90ce2df1 $fExceptionFixResult4 :: [GHC.Types.Char] {- HasNoCafRefs, Unfolding: (GHC.Types.: @ GHC.Types.Char GHC.Show.shows6 (GHC.Types.[] @ GHC.Types.Char)) -} edb78071bc92c5dc1f235c356cecab8c $fExceptionFixResult5 :: [GHC.Types.Char] {- Unfolding: (GHC.CString.unpackCString# "Crash "#) -} 20c58c3a8eb8e9c39a22a9ed77f9dccc $fExceptionFixResult6 :: Data.Typeable.Internal.TypeRep {- Unfolding: (case Language.Fixpoint.Types.Errors.$fDataFixResult8 of wild { Data.Typeable.Internal.TypeRep dt dt1 tc ks trs -> let { types :: [Data.Typeable.Internal.TypeRep] = GHC.Base.++ @ Data.Typeable.Internal.TypeRep trs Language.Fixpoint.Types.Errors.$fExceptionFixResult7 } in case Data.Typeable.Internal.typeRepFingerprints ks types of kt_fps { DEFAULT -> case GHC.Fingerprint.fingerprintFingerprints (GHC.Types.: @ GHC.Fingerprint.Type.Fingerprint (Data.Typeable.Internal.tyConFingerprint tc) kt_fps) of dt2 { GHC.Fingerprint.Type.Fingerprint dt3 dt4 -> Data.Typeable.Internal.TypeRep dt3 dt4 tc ks types } } }) -} e6dae518c5f59536740a3ac4d809ff74 $fExceptionFixResult7 :: [Data.Typeable.Internal.TypeRep] {- Unfolding: (GHC.Types.: @ Data.Typeable.Internal.TypeRep Language.Fixpoint.Types.Errors.$fExceptionError8 (GHC.Types.[] @ Data.Typeable.Internal.TypeRep)) -} d0173fd74c0fa26b5149cb3e367aede0 $fExceptionFixResult8 :: GHC.Prim.Proxy# (Language.Fixpoint.Types.Errors.FixResult Language.Fixpoint.Types.Errors.Error) -> Data.Typeable.Internal.TypeRep {- Arity: 1, Strictness: , Unfolding: InlineRule (1, True, True) (\ (wild :: GHC.Prim.Proxy# (Language.Fixpoint.Types.Errors.FixResult Language.Fixpoint.Types.Errors.Error)) -> Language.Fixpoint.Types.Errors.$fExceptionFixResult6) -} d0173fd74c0fa26b5149cb3e367aede0 $fExceptionFixResult_$cdisplayException :: Language.Fixpoint.Types.Errors.FixResult Language.Fixpoint.Types.Errors.Error -> GHC.Base.String {- Arity: 1, Strictness: , Unfolding: (\ (x :: Language.Fixpoint.Types.Errors.FixResult Language.Fixpoint.Types.Errors.Error) -> case x of wild { Language.Fixpoint.Types.Errors.Crash b1 b2 -> GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Errors.$fExceptionFixResult5 (GHC.Show.showList__ @ Language.Fixpoint.Types.Errors.Error Language.Fixpoint.Types.Errors.$fShowError2 b1 (GHC.Types.: @ GHC.Types.Char GHC.Show.showSpace1 (GHC.Types.: @ GHC.Types.Char GHC.Show.shows6 (GHC.Show.showLitString b2 Language.Fixpoint.Types.Errors.$fExceptionFixResult4)))) Language.Fixpoint.Types.Errors.Safe -> Language.Fixpoint.Types.Errors.$fExceptionFixResult3 Language.Fixpoint.Types.Errors.Unsafe b1 -> GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Errors.$fExceptionFixResult2 (case b1 of wild1 { [] -> Language.Fixpoint.Types.Errors.$fExceptionFixResult1 : x1 xs -> GHC.Types.: @ GHC.Types.Char GHC.Show.showList__2 (GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Errors.$fExceptionError7 (let { s :: GHC.Base.String = Language.Fixpoint.Types.Errors.$fExceptionFixResult_showl xs } in case x1 `cast` (Language.Fixpoint.Types.Errors.N:Error[0]) of wild2 { [] -> GHC.CString.unpackAppendCString# "[]"# s : x2 xs1 -> GHC.Types.: @ GHC.Types.Char GHC.Show.showList__2 (case x2 of ww { Language.Fixpoint.Types.Errors.Error1 ww1 ww2 -> Language.Fixpoint.Types.Errors.$w$cshowsPrec 0# ww1 ww2 (let { lvl23 :: [GHC.Types.Char] = GHC.Types.: @ GHC.Types.Char GHC.Show.showList__1 s } in letrec { showl1 :: [Language.Fixpoint.Types.Errors.Error1] -> GHC.Base.String {- Arity: 1, Strictness: -} = \ (ds2 :: [Language.Fixpoint.Types.Errors.Error1]) -> case ds2 of wild3 { [] -> lvl23 : y ys -> GHC.Types.: @ GHC.Types.Char GHC.Show.shows5 (case y of ww3 { Language.Fixpoint.Types.Errors.Error1 ww4 ww5 -> Language.Fixpoint.Types.Errors.$w$cshowsPrec 0# ww4 ww5 (showl1 ys) }) } } in showl1 xs1) }) })) }) }) -} d0173fd74c0fa26b5149cb3e367aede0 $fExceptionFixResult_$cfromException :: GHC.Exception.SomeException -> GHC.Base.Maybe (Language.Fixpoint.Types.Errors.FixResult Language.Fixpoint.Types.Errors.Error) {- Arity: 1, Strictness: , Unfolding: (\ (eta :: GHC.Exception.SomeException) -> case eta of wild { GHC.Exception.SomeException e10 $dException1 e2 -> case (GHC.Exception.$p1Exception @ e10 $dException1) `cast` (Data.Typeable.Internal.N:Typeable[0] <*>_N _N) (GHC.Prim.proxy# @ * @ e10) of wild1 { Data.Typeable.Internal.TypeRep dt dt1 ds2 ds3 ds4 -> case Language.Fixpoint.Types.Errors.$fExceptionFixResult6 of wild2 { Data.Typeable.Internal.TypeRep dt2 dt3 ds5 ds6 ds7 -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.eqWord# dt dt2) of wild3 { GHC.Types.False -> GHC.Base.Nothing @ (Language.Fixpoint.Types.Errors.FixResult Language.Fixpoint.Types.Errors.Error) GHC.Types.True -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.eqWord# dt1 dt3) of wild4 { GHC.Types.False -> GHC.Base.Nothing @ (Language.Fixpoint.Types.Errors.FixResult Language.Fixpoint.Types.Errors.Error) GHC.Types.True -> GHC.Base.Just @ (Language.Fixpoint.Types.Errors.FixResult Language.Fixpoint.Types.Errors.Error) e2 `cast` (UnsafeCo representational e10 (Language.Fixpoint.Types.Errors.FixResult Language.Fixpoint.Types.Errors.Error)) } } } } }) -} d0173fd74c0fa26b5149cb3e367aede0 $fExceptionFixResult_$cp1Exception :: Data.Typeable.Internal.Typeable (Language.Fixpoint.Types.Errors.FixResult Language.Fixpoint.Types.Errors.Error) {- Arity: 1, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Errors.$fExceptionFixResult8 `cast` (Sym (Data.Typeable.Internal.N:Typeable[0] <*>_N _N)) -} d0173fd74c0fa26b5149cb3e367aede0 $fExceptionFixResult_$cp2Exception :: GHC.Show.Show (Language.Fixpoint.Types.Errors.FixResult Language.Fixpoint.Types.Errors.Error) {- Unfolding: (Language.Fixpoint.Types.Errors.$fShowFixResult @ Language.Fixpoint.Types.Errors.Error Language.Fixpoint.Types.Errors.$fShowError) -} d0173fd74c0fa26b5149cb3e367aede0 $fExceptionFixResult_$ctoException :: Language.Fixpoint.Types.Errors.FixResult Language.Fixpoint.Types.Errors.Error -> GHC.Exception.SomeException {- Arity: 1 -} d0173fd74c0fa26b5149cb3e367aede0 $fExceptionFixResult_showl :: [Language.Fixpoint.Types.Errors.Error] -> GHC.Base.String {- Arity: 1, Strictness: -} af80a035f9731b203491b28daa7a8cc7 $fFixpointError1 :: Language.Fixpoint.Types.PrettyPrint.Fixpoint Language.Fixpoint.Types.Errors.Error1 DFunId {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Errors.Error1 Language.Fixpoint.Types.Errors.$fFixpointError1_$spprint Language.Fixpoint.Types.Errors.$fFixpointError1_$s$dmsimplify -} af80a035f9731b203491b28daa7a8cc7 $fFixpointError1_$cpprintPrec :: GHC.Types.Int -> Language.Fixpoint.Types.PrettyPrint.Tidy -> Language.Fixpoint.Types.Errors.Error1 -> Text.PrettyPrint.HughesPJ.Doc {- Arity: 3, Strictness: , Unfolding: InlineRule (1, True, True) (\ (ds :: GHC.Types.Int) (eta :: Language.Fixpoint.Types.PrettyPrint.Tidy) (eta1 :: Language.Fixpoint.Types.Errors.Error1) -> Language.Fixpoint.Types.Errors.$fFixpointError1_$cpprintTidy eta eta1) -} af80a035f9731b203491b28daa7a8cc7 $fFixpointError1_$cpprintTidy :: Language.Fixpoint.Types.PrettyPrint.Tidy -> Language.Fixpoint.Types.Errors.Error1 -> Text.PrettyPrint.HughesPJ.Doc {- Arity: 2, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (2, True, False) (\ (w :: Language.Fixpoint.Types.PrettyPrint.Tidy) (w1 :: Language.Fixpoint.Types.Errors.Error1) -> case w1 of ww { Language.Fixpoint.Types.Errors.Error1 ww1 ww2 -> Language.Fixpoint.Types.Errors.$w$cpprintTidy ww1 ww2 }) -} af80a035f9731b203491b28daa7a8cc7 $fFixpointError1_$s$dmsimplify :: Language.Fixpoint.Types.Errors.Error1 -> Language.Fixpoint.Types.Errors.Error1 {- Arity: 1, HasNoCafRefs, Strictness: m, Unfolding: InlineRule (-1, True, True) (GHC.Base.id @ Language.Fixpoint.Types.Errors.Error1) -} af80a035f9731b203491b28daa7a8cc7 $fFixpointError1_$spprint :: Language.Fixpoint.Types.Errors.Error1 -> Text.PrettyPrint.HughesPJ.Doc {- Arity: 1, Unfolding: InlineRule (0, True, False) (Language.Fixpoint.Types.Errors.$fFixpointError1_$cpprintPrec Language.Fixpoint.Types.PrettyPrint.pprint1 Language.Fixpoint.Types.PrettyPrint.Full) -} 17cfa4bffb0c0e801616ddd8bb33c157 $fFixpointError1_s :: GHC.Base.String {- Unfolding: (GHC.CString.unpackCString# ": Error"#) -} d2160546de8fd4d76ad238876901d231 $fFixpointError2 :: Text.PrettyPrint.HughesPJ.Doc {- Unfolding: (case GHC.List.$wlenAcc @ GHC.Types.Char Language.Fixpoint.Types.Errors.$fFixpointError1_s 0# of ww2 { DEFAULT -> (Text.PrettyPrint.Annotated.HughesPJ.TextBeside @ () (Text.PrettyPrint.Annotated.HughesPJ.NoAnnot @ () Language.Fixpoint.Types.Errors.$fFixpointError3 ww2) (Text.PrettyPrint.Annotated.HughesPJ.Empty @ ())) `cast` (Sym (Text.PrettyPrint.HughesPJ.N:Doc[0])) }) -} 605459bcfe0aa97f4f1b24bb11cec6b1 $fFixpointError3 :: Text.PrettyPrint.Annotated.HughesPJ.TextDetails {- Unfolding: (Text.PrettyPrint.Annotated.HughesPJ.Str Language.Fixpoint.Types.Errors.$fFixpointError1_s) -} bbcb7910102e76dd87f9706483b3612e $fFoldableFixResult :: Data.Foldable.Foldable Language.Fixpoint.Types.Errors.FixResult DFunId {- Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Errors.FixResult Language.Fixpoint.Types.Errors.$fFoldableFixResult_$cfold Language.Fixpoint.Types.Errors.$fFoldableFixResult_$cfoldMap Language.Fixpoint.Types.Errors.$fFoldableFixResult_$cfoldr Language.Fixpoint.Types.Errors.$fFoldableFixResult_$cfoldr' Language.Fixpoint.Types.Errors.$fFoldableFixResult_$cfoldl Language.Fixpoint.Types.Errors.$fFoldableFixResult_$cfoldl' Language.Fixpoint.Types.Errors.$fFoldableFixResult_$cfoldr1 Language.Fixpoint.Types.Errors.$fFoldableFixResult_$cfoldl1 Language.Fixpoint.Types.Errors.$fFoldableFixResult_$ctoList Language.Fixpoint.Types.Errors.$fFoldableFixResult_$cnull Language.Fixpoint.Types.Errors.$fFoldableFixResult_$clength Language.Fixpoint.Types.Errors.$fFoldableFixResult_$celem Language.Fixpoint.Types.Errors.$fFoldableFixResult_$cmaximum Language.Fixpoint.Types.Errors.$fFoldableFixResult_$cminimum Language.Fixpoint.Types.Errors.$fFoldableFixResult_$csum Language.Fixpoint.Types.Errors.$fFoldableFixResult_$cproduct -} bbcb7910102e76dd87f9706483b3612e $fFoldableFixResult1 :: GHC.Num.Num a => Language.Fixpoint.Types.Errors.FixResult a -> Data.Monoid.Product a {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: (\ @ a ($dNum :: GHC.Num.Num a) (ds :: Language.Fixpoint.Types.Errors.FixResult a) -> case ds of wild { Language.Fixpoint.Types.Errors.Crash a1 a2 -> let { f1 :: a -> a -> a = GHC.Num.* @ a $dNum } in let { z :: a = GHC.Num.fromInteger @ a $dNum Data.Monoid.$fMonoidProduct1 } in letrec { go :: [a] -> Data.Monoid.Product a {- Arity: 1, Strictness: -} = \ (ds1 :: [a]) -> case ds1 of wild1 { [] -> z `cast` (Sym (Data.Monoid.N:Product[0] _R)) : y ys -> (f1 y (go ys) `cast` (Data.Monoid.N:Product[0] _R)) `cast` (Sym (Data.Monoid.N:Product[0] _R)) } } in go a1 Language.Fixpoint.Types.Errors.Safe -> (Data.Monoid.$fMonoidProduct2 @ a $dNum) `cast` (Sym (Data.Monoid.N:Product[0] _R)) Language.Fixpoint.Types.Errors.Unsafe a1 -> let { f1 :: a -> a -> a = GHC.Num.* @ a $dNum } in let { z :: a = GHC.Num.fromInteger @ a $dNum Data.Monoid.$fMonoidProduct1 } in letrec { go :: [a] -> Data.Monoid.Product a {- Arity: 1, Strictness: -} = \ (ds1 :: [a]) -> case ds1 of wild1 { [] -> z `cast` (Sym (Data.Monoid.N:Product[0] _R)) : y ys -> (f1 y (go ys) `cast` (Data.Monoid.N:Product[0] _R)) `cast` (Sym (Data.Monoid.N:Product[0] _R)) } } in go a1 }) -} bbcb7910102e76dd87f9706483b3612e $fFoldableFixResult2 :: GHC.Num.Num a => Language.Fixpoint.Types.Errors.FixResult a -> Data.Monoid.Sum a {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: (\ @ a ($dNum :: GHC.Num.Num a) (ds :: Language.Fixpoint.Types.Errors.FixResult a) -> case ds of wild { Language.Fixpoint.Types.Errors.Crash a1 a2 -> let { f1 :: a -> a -> a = GHC.Num.+ @ a $dNum } in let { z :: a = GHC.Num.fromInteger @ a $dNum Data.Monoid.$fMonoidSum1 } in letrec { go :: [a] -> Data.Monoid.Sum a {- Arity: 1, Strictness: -} = \ (ds1 :: [a]) -> case ds1 of wild1 { [] -> z `cast` (Sym (Data.Monoid.N:Sum[0] _R)) : y ys -> (f1 y (go ys) `cast` (Data.Monoid.N:Sum[0] _R)) `cast` (Sym (Data.Monoid.N:Sum[0] _R)) } } in go a1 Language.Fixpoint.Types.Errors.Safe -> (Data.Monoid.$fMonoidSum2 @ a $dNum) `cast` (Sym (Data.Monoid.N:Sum[0] _R)) Language.Fixpoint.Types.Errors.Unsafe a1 -> let { f1 :: a -> a -> a = GHC.Num.+ @ a $dNum } in let { z :: a = GHC.Num.fromInteger @ a $dNum Data.Monoid.$fMonoidSum1 } in letrec { go :: [a] -> Data.Monoid.Sum a {- Arity: 1, Strictness: -} = \ (ds1 :: [a]) -> case ds1 of wild1 { [] -> z `cast` (Sym (Data.Monoid.N:Sum[0] _R)) : y ys -> (f1 y (go ys) `cast` (Data.Monoid.N:Sum[0] _R)) `cast` (Sym (Data.Monoid.N:Sum[0] _R)) } } in go a1 }) -} 34e59159e833d5de5274bc0ec11340ce $fFoldableFixResult3 :: a {- Strictness: x -} 9d8b81b00c86e8e402184d30b64a0c52 $fFoldableFixResult4 :: a {- Strictness: x -} 34f4ba7851562235670c849d012ec7b7 $fFoldableFixResult5 :: a -> (GHC.Types.Int -> GHC.Types.Int) -> GHC.Types.Int -> GHC.Types.Int {- Arity: 3, HasNoCafRefs, Unfolding: (\ @ a (x :: a) (k1 :: GHC.Types.Int -> GHC.Types.Int)[OneShot] (z :: GHC.Types.Int) -> case z of wild { GHC.Types.I# x1 -> k1 (GHC.Types.I# (GHC.Prim.+# x1 1#)) }) -} d55a13118bceb1ec3882ecbe2317286e $fFoldableFixResult6 :: a -> GHC.Types.Bool -> GHC.Types.Bool {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: InlineRule (2, True, True) (\ @ a (ds :: a) (ds1 :: GHC.Types.Bool) -> GHC.Types.False) -} 8d69d17293faae3cefa8dd6357737c01 $fFoldableFixResult7 :: a {- Strictness: x -} 47333df0c7c28f6db6c18858bbdc641d $fFoldableFixResult8 :: a {- Strictness: x -} bbcb7910102e76dd87f9706483b3612e $fFoldableFixResult_$celem :: GHC.Classes.Eq a => a -> Language.Fixpoint.Types.Errors.FixResult a -> GHC.Types.Bool {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: (\ @ a ($dEq :: GHC.Classes.Eq a) (eta :: a) -> let { f :: a -> GHC.Types.Bool = GHC.Classes.== @ a $dEq eta } in letrec { go :: [a] -> Data.Monoid.Any {- Arity: 1, Strictness: -} = \ (ds :: [a]) -> case ds of wild { [] -> GHC.Types.False `cast` (Sym (Data.Monoid.N:Any[0])) : y ys -> case f y of wild1 { GHC.Types.False -> go ys GHC.Types.True -> GHC.Types.True `cast` (Sym (Data.Monoid.N:Any[0])) } } } in letrec { go1 :: [a] -> Data.Monoid.Any {- Arity: 1, Strictness: -} = \ (ds :: [a]) -> case ds of wild { [] -> GHC.Types.False `cast` (Sym (Data.Monoid.N:Any[0])) : y ys -> case f y of wild1 { GHC.Types.False -> go1 ys GHC.Types.True -> GHC.Types.True `cast` (Sym (Data.Monoid.N:Any[0])) } } } in (\ (ds :: Language.Fixpoint.Types.Errors.FixResult a) -> case ds of wild { Language.Fixpoint.Types.Errors.Crash a1 a2 -> go1 a1 Language.Fixpoint.Types.Errors.Safe -> GHC.Types.False `cast` (Sym (Data.Monoid.N:Any[0])) Language.Fixpoint.Types.Errors.Unsafe a1 -> go a1 }) `cast` (_R ->_R Data.Monoid.N:Any[0])) -} bbcb7910102e76dd87f9706483b3612e $fFoldableFixResult_$cfold :: GHC.Base.Monoid m => Language.Fixpoint.Types.Errors.FixResult m -> m {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: InlineRule (1, True, False) (\ @ m ($dMonoid :: GHC.Base.Monoid m) (eta :: Language.Fixpoint.Types.Errors.FixResult m) -> Language.Fixpoint.Types.Errors.$fFoldableFixResult_$cfoldMap @ m @ m $dMonoid (GHC.Base.id @ m) eta) -} bbcb7910102e76dd87f9706483b3612e $fFoldableFixResult_$cfoldMap :: GHC.Base.Monoid m => (a -> m) -> Language.Fixpoint.Types.Errors.FixResult a -> m {- Arity: 3, HasNoCafRefs, Strictness: , Unfolding: (\ @ m @ a ($dMonoid :: GHC.Base.Monoid m) (f :: a -> m) (ds :: Language.Fixpoint.Types.Errors.FixResult a) -> case ds of wild { Language.Fixpoint.Types.Errors.Crash a1 a2 -> let { f1 :: m -> m -> m = GHC.Base.mappend @ m $dMonoid } in let { z :: m = GHC.Base.mempty @ m $dMonoid } in letrec { go :: [a] -> m {- Arity: 1, Strictness: -} = \ (ds1 :: [a]) -> case ds1 of wild1 { [] -> z : y ys -> f1 (f y) (go ys) } } in go a1 Language.Fixpoint.Types.Errors.Safe -> GHC.Base.mempty @ m $dMonoid Language.Fixpoint.Types.Errors.Unsafe a1 -> let { f1 :: m -> m -> m = GHC.Base.mappend @ m $dMonoid } in let { z :: m = GHC.Base.mempty @ m $dMonoid } in letrec { go :: [a] -> m {- Arity: 1, Strictness: -} = \ (ds1 :: [a]) -> case ds1 of wild1 { [] -> z : y ys -> f1 (f y) (go ys) } } in go a1 }) -} bbcb7910102e76dd87f9706483b3612e $fFoldableFixResult_$cfoldl :: (b -> a -> b) -> b -> Language.Fixpoint.Types.Errors.FixResult a -> b {- Arity: 3, HasNoCafRefs, Strictness: , Unfolding: (\ @ b @ a (f :: b -> a -> b) (z :: b) (t1 :: Language.Fixpoint.Types.Errors.FixResult a) -> case t1 of wild { Language.Fixpoint.Types.Errors.Crash a1 a2 -> letrec { go :: [a] -> b -> b {- Arity: 2, Strictness: -} = \ (ds :: [a]) (eta :: b) -> case ds of wild1 { [] -> eta : y ys -> go ys (f eta y) } } in go a1 z Language.Fixpoint.Types.Errors.Safe -> z Language.Fixpoint.Types.Errors.Unsafe a1 -> letrec { go :: [a] -> b -> b {- Arity: 2, Strictness: -} = \ (ds :: [a]) (eta :: b) -> case ds of wild1 { [] -> eta : y ys -> go ys (f eta y) } } in go a1 z }) -} bbcb7910102e76dd87f9706483b3612e $fFoldableFixResult_$cfoldl' :: (b -> a -> b) -> b -> Language.Fixpoint.Types.Errors.FixResult a -> b {- Arity: 3, HasNoCafRefs, Strictness: , Unfolding: (\ @ b @ a (f :: b -> a -> b) (z0 :: b) (xs :: Language.Fixpoint.Types.Errors.FixResult a) -> Language.Fixpoint.Types.Errors.$fFoldableFixResult_$cfoldr @ a @ (b -> b) (\ (x :: a) (k1 :: b -> b)[OneShot] (z :: b) -> case f z x of vx { DEFAULT -> k1 vx }) (GHC.Base.id @ b) xs z0) -} bbcb7910102e76dd87f9706483b3612e $fFoldableFixResult_$cfoldl1 :: (a -> a -> a) -> Language.Fixpoint.Types.Errors.FixResult a -> a {- Arity: 2, Strictness: , Unfolding: (\ @ a (f :: a -> a -> a) (xs :: Language.Fixpoint.Types.Errors.FixResult a) -> case Language.Fixpoint.Types.Errors.$fFoldableFixResult_$cfoldl @ (GHC.Base.Maybe a) @ a (\ (m :: GHC.Base.Maybe a) (y :: a)[OneShot] -> GHC.Base.Just @ a (case m of wild { GHC.Base.Nothing -> y GHC.Base.Just x -> f x y })) (GHC.Base.Nothing @ a) xs of wild { GHC.Base.Nothing -> Language.Fixpoint.Types.Errors.$fFoldableFixResult7 @ a GHC.Base.Just v -> v }) -} bbcb7910102e76dd87f9706483b3612e $fFoldableFixResult_$cfoldr :: (a -> b -> b) -> b -> Language.Fixpoint.Types.Errors.FixResult a -> b {- Arity: 3, HasNoCafRefs, Strictness: , Unfolding: (\ @ a @ b (f :: a -> b -> b) (z :: b) (ds :: Language.Fixpoint.Types.Errors.FixResult a) -> case ds of wild { Language.Fixpoint.Types.Errors.Crash a1 a2 -> letrec { go :: [a] -> b {- Arity: 1, Strictness: -} = \ (ds1 :: [a]) -> case ds1 of wild1 { [] -> z : y ys -> f y (go ys) } } in go a1 Language.Fixpoint.Types.Errors.Safe -> z Language.Fixpoint.Types.Errors.Unsafe a1 -> letrec { go :: [a] -> b {- Arity: 1, Strictness: -} = \ (ds1 :: [a]) -> case ds1 of wild1 { [] -> z : y ys -> f y (go ys) } } in go a1 }) -} bbcb7910102e76dd87f9706483b3612e $fFoldableFixResult_$cfoldr' :: (a -> b -> b) -> b -> Language.Fixpoint.Types.Errors.FixResult a -> b {- Arity: 3, HasNoCafRefs, Strictness: , Unfolding: (\ @ a @ b (f :: a -> b -> b) (z0 :: b) (xs :: Language.Fixpoint.Types.Errors.FixResult a) -> Language.Fixpoint.Types.Errors.$fFoldableFixResult_$cfoldl @ (b -> b) @ a (\ (k1 :: b -> b) (x :: a)[OneShot] (z :: b) -> case f x z of vx { DEFAULT -> k1 vx }) (GHC.Base.id @ b) xs z0) -} bbcb7910102e76dd87f9706483b3612e $fFoldableFixResult_$cfoldr1 :: (a -> a -> a) -> Language.Fixpoint.Types.Errors.FixResult a -> a {- Arity: 2, Strictness: , Unfolding: (\ @ a (f :: a -> a -> a) (xs :: Language.Fixpoint.Types.Errors.FixResult a) -> case Language.Fixpoint.Types.Errors.$fFoldableFixResult_$cfoldr @ a @ (GHC.Base.Maybe a) (\ (x :: a) (m :: GHC.Base.Maybe a)[OneShot] -> GHC.Base.Just @ a (case m of wild { GHC.Base.Nothing -> x GHC.Base.Just y -> f x y })) (GHC.Base.Nothing @ a) xs of wild { GHC.Base.Nothing -> Language.Fixpoint.Types.Errors.$fFoldableFixResult8 @ a GHC.Base.Just v -> v }) -} bbcb7910102e76dd87f9706483b3612e $fFoldableFixResult_$clength :: Language.Fixpoint.Types.Errors.FixResult a -> GHC.Types.Int {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: (\ @ a (xs :: Language.Fixpoint.Types.Errors.FixResult a) -> Language.Fixpoint.Types.Errors.$fFoldableFixResult_$cfoldr @ a @ (GHC.Types.Int -> GHC.Types.Int) (Language.Fixpoint.Types.Errors.$fFoldableFixResult5 @ a) (GHC.Base.id @ GHC.Types.Int) xs Language.Fixpoint.Types.Errors.$fDataFixResult3) -} bbcb7910102e76dd87f9706483b3612e $fFoldableFixResult_$cmaximum :: GHC.Classes.Ord a => Language.Fixpoint.Types.Errors.FixResult a -> a {- Arity: 2, Strictness: , Unfolding: (\ @ a ($dOrd :: GHC.Classes.Ord a) (eta :: Language.Fixpoint.Types.Errors.FixResult a) -> case eta of wild { Language.Fixpoint.Types.Errors.Crash a1 a2 -> letrec { go :: [a] -> Data.Foldable.Max a {- Arity: 1, Strictness: -} = \ (ds :: [a]) -> case ds of wild1 { [] -> (GHC.Base.Nothing @ a) `cast` (Sym (Data.Foldable.N:Max[0]) _N) : y ys -> case (go ys) `cast` (Data.Foldable.N:Max[0] _N) of wild2 { GHC.Base.Nothing -> (GHC.Base.Just @ a y) `cast` (Sym (Data.Foldable.N:Max[0]) _N) GHC.Base.Just ipv -> case GHC.Classes.>= @ a $dOrd y ipv of wild3 { GHC.Types.False -> wild2 `cast` (Sym (Data.Foldable.N:Max[0]) _N) GHC.Types.True -> (GHC.Base.Just @ a y) `cast` (Sym (Data.Foldable.N:Max[0]) _N) } } } } in case (go a1) `cast` (Data.Foldable.N:Max[0] _N) of wild1 { GHC.Base.Nothing -> Language.Fixpoint.Types.Errors.$fFoldableFixResult4 @ a GHC.Base.Just v -> v } Language.Fixpoint.Types.Errors.Safe -> Language.Fixpoint.Types.Errors.$fFoldableFixResult4 @ a Language.Fixpoint.Types.Errors.Unsafe a1 -> letrec { go :: [a] -> Data.Foldable.Max a {- Arity: 1, Strictness: -} = \ (ds :: [a]) -> case ds of wild1 { [] -> (GHC.Base.Nothing @ a) `cast` (Sym (Data.Foldable.N:Max[0]) _N) : y ys -> case (go ys) `cast` (Data.Foldable.N:Max[0] _N) of wild2 { GHC.Base.Nothing -> (GHC.Base.Just @ a y) `cast` (Sym (Data.Foldable.N:Max[0]) _N) GHC.Base.Just ipv -> case GHC.Classes.>= @ a $dOrd y ipv of wild3 { GHC.Types.False -> wild2 `cast` (Sym (Data.Foldable.N:Max[0]) _N) GHC.Types.True -> (GHC.Base.Just @ a y) `cast` (Sym (Data.Foldable.N:Max[0]) _N) } } } } in case (go a1) `cast` (Data.Foldable.N:Max[0] _N) of wild1 { GHC.Base.Nothing -> Language.Fixpoint.Types.Errors.$fFoldableFixResult4 @ a GHC.Base.Just v -> v } }) -} bbcb7910102e76dd87f9706483b3612e $fFoldableFixResult_$cminimum :: GHC.Classes.Ord a => Language.Fixpoint.Types.Errors.FixResult a -> a {- Arity: 2, Strictness: , Unfolding: (\ @ a ($dOrd :: GHC.Classes.Ord a) (eta :: Language.Fixpoint.Types.Errors.FixResult a) -> case eta of wild { Language.Fixpoint.Types.Errors.Crash a1 a2 -> letrec { go :: [a] -> Data.Foldable.Min a {- Arity: 1, Strictness: -} = \ (ds :: [a]) -> case ds of wild1 { [] -> (GHC.Base.Nothing @ a) `cast` (Sym (Data.Foldable.N:Min[0]) _N) : y ys -> case (go ys) `cast` (Data.Foldable.N:Min[0] _N) of wild2 { GHC.Base.Nothing -> (GHC.Base.Just @ a y) `cast` (Sym (Data.Foldable.N:Min[0]) _N) GHC.Base.Just ipv -> case GHC.Classes.<= @ a $dOrd y ipv of wild3 { GHC.Types.False -> wild2 `cast` (Sym (Data.Foldable.N:Min[0]) _N) GHC.Types.True -> (GHC.Base.Just @ a y) `cast` (Sym (Data.Foldable.N:Min[0]) _N) } } } } in case (go a1) `cast` (Data.Foldable.N:Min[0] _N) of wild1 { GHC.Base.Nothing -> Language.Fixpoint.Types.Errors.$fFoldableFixResult3 @ a GHC.Base.Just v -> v } Language.Fixpoint.Types.Errors.Safe -> Language.Fixpoint.Types.Errors.$fFoldableFixResult3 @ a Language.Fixpoint.Types.Errors.Unsafe a1 -> letrec { go :: [a] -> Data.Foldable.Min a {- Arity: 1, Strictness: -} = \ (ds :: [a]) -> case ds of wild1 { [] -> (GHC.Base.Nothing @ a) `cast` (Sym (Data.Foldable.N:Min[0]) _N) : y ys -> case (go ys) `cast` (Data.Foldable.N:Min[0] _N) of wild2 { GHC.Base.Nothing -> (GHC.Base.Just @ a y) `cast` (Sym (Data.Foldable.N:Min[0]) _N) GHC.Base.Just ipv -> case GHC.Classes.<= @ a $dOrd y ipv of wild3 { GHC.Types.False -> wild2 `cast` (Sym (Data.Foldable.N:Min[0]) _N) GHC.Types.True -> (GHC.Base.Just @ a y) `cast` (Sym (Data.Foldable.N:Min[0]) _N) } } } } in case (go a1) `cast` (Data.Foldable.N:Min[0] _N) of wild1 { GHC.Base.Nothing -> Language.Fixpoint.Types.Errors.$fFoldableFixResult3 @ a GHC.Base.Just v -> v } }) -} bbcb7910102e76dd87f9706483b3612e $fFoldableFixResult_$cnull :: Language.Fixpoint.Types.Errors.FixResult a -> GHC.Types.Bool {- Arity: 1, HasNoCafRefs, Unfolding: (\ @ a -> Language.Fixpoint.Types.Errors.$fFoldableFixResult_$cfoldr @ a @ GHC.Types.Bool (Language.Fixpoint.Types.Errors.$fFoldableFixResult6 @ a) GHC.Types.True) -} bbcb7910102e76dd87f9706483b3612e $fFoldableFixResult_$cproduct :: GHC.Num.Num a => Language.Fixpoint.Types.Errors.FixResult a -> a {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Errors.$fFoldableFixResult1 `cast` (forall (a :: <*>_N). _R ->_R _R ->_R Data.Monoid.N:Product[0] _R) -} bbcb7910102e76dd87f9706483b3612e $fFoldableFixResult_$csum :: GHC.Num.Num a => Language.Fixpoint.Types.Errors.FixResult a -> a {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Errors.$fFoldableFixResult2 `cast` (forall (a :: <*>_N). _R ->_R _R ->_R Data.Monoid.N:Sum[0] _R) -} bbcb7910102e76dd87f9706483b3612e $fFoldableFixResult_$ctoList :: Language.Fixpoint.Types.Errors.FixResult a -> [a] {- Arity: 1, Strictness: , Inline: INLINE (sat-args=1), Unfolding: InlineRule (1, False, False) (\ @ a (t1 :: Language.Fixpoint.Types.Errors.FixResult a) -> GHC.Base.build @ a (\ @ b (c :: a -> b -> b)[OneShot] (n :: b)[OneShot] -> Language.Fixpoint.Types.Errors.$fFoldableFixResult_$cfoldr @ a @ b c n t1)) -} bbcb7910102e76dd87f9706483b3612e $fFunctorFixResult :: GHC.Base.Functor Language.Fixpoint.Types.Errors.FixResult DFunId {- HasNoCafRefs, Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Errors.FixResult Language.Fixpoint.Types.Errors.$fFunctorFixResult_$cfmap Language.Fixpoint.Types.Errors.$fFunctorFixResult_$c<$ -} bbcb7910102e76dd87f9706483b3612e $fFunctorFixResult_$c<$ :: a -> Language.Fixpoint.Types.Errors.FixResult b -> Language.Fixpoint.Types.Errors.FixResult a {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: InlineRule (2, True, False) (\ @ a @ b (eta :: a) (eta1 :: Language.Fixpoint.Types.Errors.FixResult b) -> Language.Fixpoint.Types.Errors.$fFunctorFixResult_$cfmap @ b @ a (\ (ds :: b) -> eta) eta1) -} bbcb7910102e76dd87f9706483b3612e $fFunctorFixResult_$cfmap :: (a -> b) -> Language.Fixpoint.Types.Errors.FixResult a -> Language.Fixpoint.Types.Errors.FixResult b {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: (\ @ a @ b (f :: a -> b) (ds :: Language.Fixpoint.Types.Errors.FixResult a) -> case ds of wild { Language.Fixpoint.Types.Errors.Crash xs msg -> Language.Fixpoint.Types.Errors.Crash @ b (GHC.Base.map @ a @ b f xs) msg Language.Fixpoint.Types.Errors.Safe -> Language.Fixpoint.Types.Errors.Safe @ b Language.Fixpoint.Types.Errors.Unsafe xs -> case GHC.Base.map @ a @ b f xs of dt { DEFAULT -> Language.Fixpoint.Types.Errors.Unsafe @ b dt } }) -} b59e7fae45f4761ef0b99fff11eb419e $fGenericAnnotDetails :: GHC.Generics.Generic (Text.PrettyPrint.Annotated.HughesPJ.AnnotDetails a) DFunId {- HasNoCafRefs, Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun: @ a. @ (Text.PrettyPrint.Annotated.HughesPJ.AnnotDetails a) (Language.Fixpoint.Types.Errors.$fGenericAnnotDetails_$cfrom @ a) (Language.Fixpoint.Types.Errors.$fGenericAnnotDetails_$cto @ a) -} 6fa6de740e8ede8c1a565758358c1ac1 $fGenericAnnotDetails1 :: Text.PrettyPrint.Annotated.HughesPJ.AnnotDetails a -> (GHC.Generics.:+:) (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "AnnotStart" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1) (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "NoAnnot" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceLazy 'GHC.Generics.DecidedStrict) (GHC.Generics.K1 GHC.Generics.R Text.PrettyPrint.Annotated.HughesPJ.TextDetails) GHC.Generics.:*: GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.SourceUnpack 'GHC.Generics.SourceLazy 'GHC.Generics.DecidedUnpack) (GHC.Generics.K1 GHC.Generics.R GHC.Types.Int)) GHC.Generics.:+: GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "AnnotEnd" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R a))) x {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: (\ @ a @ x (x1 :: Text.PrettyPrint.Annotated.HughesPJ.AnnotDetails a) -> case x1 of wild { Text.PrettyPrint.Annotated.HughesPJ.AnnotStart -> Language.Fixpoint.Types.Errors.$fGenericAnnotDetails2 @ x @ a Text.PrettyPrint.Annotated.HughesPJ.NoAnnot g1 dt -> GHC.Generics.R1 @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "AnnotStart" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1) @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "NoAnnot" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceLazy 'GHC.Generics.DecidedStrict) (GHC.Generics.K1 GHC.Generics.R Text.PrettyPrint.Annotated.HughesPJ.TextDetails) GHC.Generics.:*: GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.SourceUnpack 'GHC.Generics.SourceLazy 'GHC.Generics.DecidedUnpack) (GHC.Generics.K1 GHC.Generics.R GHC.Types.Int)) GHC.Generics.:+: GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "AnnotEnd" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R a))) @ x (GHC.Generics.L1 @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "NoAnnot" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceLazy 'GHC.Generics.DecidedStrict) (GHC.Generics.K1 GHC.Generics.R Text.PrettyPrint.Annotated.HughesPJ.TextDetails) GHC.Generics.:*: GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.SourceUnpack 'GHC.Generics.SourceLazy 'GHC.Generics.DecidedUnpack) (GHC.Generics.K1 GHC.Generics.R GHC.Types.Int))) @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "AnnotEnd" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R a))) @ x (GHC.Generics.:*: @ (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceLazy 'GHC.Generics.DecidedStrict) (GHC.Generics.K1 GHC.Generics.R Text.PrettyPrint.Annotated.HughesPJ.TextDetails)) @ (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.SourceUnpack 'GHC.Generics.SourceLazy 'GHC.Generics.DecidedUnpack) (GHC.Generics.K1 GHC.Generics.R GHC.Types.Int)) @ x g1 `cast` (Trans (Sym (GHC.Generics.N:K1[0] _P _R _P)) (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceLazy 'GHC.Generics.DecidedStrict>_P _R) _N)) (GHC.Types.I# dt) `cast` (Trans (Sym (GHC.Generics.N:K1[0] _P _R _P)) (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.SourceUnpack 'GHC.Generics.SourceLazy 'GHC.Generics.DecidedUnpack>_P _R) _N))) `cast` (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "NoAnnot" 'GHC.Generics.PrefixI 'GHC.Types.False>_P _R) _N)) Text.PrettyPrint.Annotated.HughesPJ.AnnotEnd g1 -> GHC.Generics.R1 @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "AnnotStart" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1) @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "NoAnnot" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceLazy 'GHC.Generics.DecidedStrict) (GHC.Generics.K1 GHC.Generics.R Text.PrettyPrint.Annotated.HughesPJ.TextDetails) GHC.Generics.:*: GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.SourceUnpack 'GHC.Generics.SourceLazy 'GHC.Generics.DecidedUnpack) (GHC.Generics.K1 GHC.Generics.R GHC.Types.Int)) GHC.Generics.:+: GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "AnnotEnd" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R a))) @ x (GHC.Generics.R1 @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "NoAnnot" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceLazy 'GHC.Generics.DecidedStrict) (GHC.Generics.K1 GHC.Generics.R Text.PrettyPrint.Annotated.HughesPJ.TextDetails) GHC.Generics.:*: GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.SourceUnpack 'GHC.Generics.SourceLazy 'GHC.Generics.DecidedUnpack) (GHC.Generics.K1 GHC.Generics.R GHC.Types.Int))) @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "AnnotEnd" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R a))) @ x g1 `cast` (Trans (Sym (GHC.Generics.N:K1[0] _P _R _P)) (Trans (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy>_P _R)) (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "AnnotEnd" 'GHC.Generics.PrefixI 'GHC.Types.False>_P _R)) _N))) }) -} fd98f8e1897125a5e1acab972bd64eb8 $fGenericAnnotDetails2 :: (GHC.Generics.:+:) (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "AnnotStart" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1) (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "NoAnnot" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceLazy 'GHC.Generics.DecidedStrict) (GHC.Generics.K1 GHC.Generics.R Text.PrettyPrint.Annotated.HughesPJ.TextDetails) GHC.Generics.:*: GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.SourceUnpack 'GHC.Generics.SourceLazy 'GHC.Generics.DecidedUnpack) (GHC.Generics.K1 GHC.Generics.R GHC.Types.Int)) GHC.Generics.:+: GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "AnnotEnd" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R a))) x {- HasNoCafRefs, Strictness: m1, Unfolding: (\ @ x @ a -> GHC.Generics.L1 @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "AnnotStart" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1) @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "NoAnnot" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceLazy 'GHC.Generics.DecidedStrict) (GHC.Generics.K1 GHC.Generics.R Text.PrettyPrint.Annotated.HughesPJ.TextDetails) GHC.Generics.:*: GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.SourceUnpack 'GHC.Generics.SourceLazy 'GHC.Generics.DecidedUnpack) (GHC.Generics.K1 GHC.Generics.R GHC.Types.Int)) GHC.Generics.:+: GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "AnnotEnd" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R a))) @ x (GHC.Generics.U1 @ x) `cast` (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "AnnotStart" 'GHC.Generics.PrefixI 'GHC.Types.False>_P _R) _N)) -} 9fc1be59795a2c80cc961c5867095e0f $fGenericAnnotDetails_$cfrom :: Text.PrettyPrint.Annotated.HughesPJ.AnnotDetails a -> GHC.Generics.Rep (Text.PrettyPrint.Annotated.HughesPJ.AnnotDetails a) x {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Errors.$fGenericAnnotDetails1 `cast` (forall (a :: <*>_N) (x :: _N). _R ->_R Trans (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaData "AnnotDetails" "Text.PrettyPrint.Annotated.HughesPJ" "pretty-1.1.3.3" 'GHC.Types.False>_P _R)) (Sub (Sym (Language.Fixpoint.Types.Errors.Rep_AnnotDetails[0] _N))) _N) -} 1bd771df6a656352723cf85b3b4021d3 $fGenericAnnotDetails_$cto :: GHC.Generics.Rep (Text.PrettyPrint.Annotated.HughesPJ.AnnotDetails a) x -> Text.PrettyPrint.Annotated.HughesPJ.AnnotDetails a {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: (\ @ a @ x (ds :: GHC.Generics.Rep (Text.PrettyPrint.Annotated.HughesPJ.AnnotDetails a) x) -> case ds `cast` (Trans (Sub (Language.Fixpoint.Types.Errors.Rep_AnnotDetails[0] _N)) (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaData "AnnotDetails" "Text.PrettyPrint.Annotated.HughesPJ" "pretty-1.1.3.3" 'GHC.Types.False>_P _R) _N) of wild { GHC.Generics.L1 ds1 -> case ds1 of tpl { DEFAULT -> Text.PrettyPrint.Annotated.HughesPJ.AnnotStart @ a } GHC.Generics.R1 ds1 -> case ds1 of wild1 { GHC.Generics.L1 ds2 -> case ds2 `cast` (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "NoAnnot" 'GHC.Generics.PrefixI 'GHC.Types.False>_P _R _N) of wild2 { GHC.Generics.:*: ds3 ds4 -> Text.PrettyPrint.Annotated.HughesPJ.$WNoAnnot @ a ds3 `cast` (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceLazy 'GHC.Generics.DecidedStrict>_P _R _N) (GHC.Generics.N:K1[0] _P _R _P)) ds4 `cast` (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.SourceUnpack 'GHC.Generics.SourceLazy 'GHC.Generics.DecidedUnpack>_P _R _N) (GHC.Generics.N:K1[0] _P _R _P)) } GHC.Generics.R1 ds2 -> Text.PrettyPrint.Annotated.HughesPJ.AnnotEnd @ a ds2 `cast` (Trans (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "AnnotEnd" 'GHC.Generics.PrefixI 'GHC.Types.False>_P _R) (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy>_P _R) _N) (GHC.Generics.N:K1[0] _P _R _P)) } }) -} d0173fd74c0fa26b5149cb3e367aede0 $fGenericError :: GHC.Generics.Generic Language.Fixpoint.Types.Errors.Error DFunId {- HasNoCafRefs, Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Errors.Error Language.Fixpoint.Types.Errors.$fGenericError_$cfrom Language.Fixpoint.Types.Errors.$fGenericError_$cto -} af80a035f9731b203491b28daa7a8cc7 $fGenericError1 :: GHC.Generics.Generic Language.Fixpoint.Types.Errors.Error1 DFunId {- HasNoCafRefs, Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Errors.Error1 Language.Fixpoint.Types.Errors.$fGenericError1_$cfrom Language.Fixpoint.Types.Errors.$fGenericError1_$cto -} af80a035f9731b203491b28daa7a8cc7 $fGenericError1_$cfrom :: Language.Fixpoint.Types.Errors.Error1 -> GHC.Generics.Rep Language.Fixpoint.Types.Errors.Error1 x {- Arity: 1, HasNoCafRefs, Strictness: m, Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Errors.$fGenericError4 `cast` (forall (x :: _N). _R ->_R Trans (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaData "Error1" "Language.Fixpoint.Types.Errors" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.False>_P _R)) (Sub (Sym (Language.Fixpoint.Types.Errors.Rep_Error1[0]))) _N) -} af80a035f9731b203491b28daa7a8cc7 $fGenericError1_$cto :: GHC.Generics.Rep Language.Fixpoint.Types.Errors.Error1 x -> Language.Fixpoint.Types.Errors.Error1 {- Arity: 1, HasNoCafRefs, Strictness: m, Unfolding: InlineRule (1, True, False) (\ @ x (ds :: GHC.Generics.Rep Language.Fixpoint.Types.Errors.Error1 x) -> case ds `cast` (Trans (Sub (Language.Fixpoint.Types.Errors.Rep_Error1[0])) (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaData "Error1" "Language.Fixpoint.Types.Errors" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.False>_P _R) (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "Error1" 'GHC.Generics.PrefixI 'GHC.Types.True>_P _R)) _N) of wild { GHC.Generics.:*: ds1 ds2 -> Language.Fixpoint.Types.Errors.Error1 ds1 `cast` (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel ('GHC.Base.Just "errLoc") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy>_P _R _N) (GHC.Generics.N:K1[0] _P _R _P)) ds2 `cast` (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel ('GHC.Base.Just "errMsg") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy>_P _R _N) (GHC.Generics.N:K1[0] _P _R _P)) }) -} d0173fd74c0fa26b5149cb3e367aede0 $fGenericError2 :: GHC.Generics.Rep Language.Fixpoint.Types.Errors.Error x -> GHC.Generics.Rep Language.Fixpoint.Types.Errors.Error x {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (1, True, True) (\ @ x (ds :: GHC.Generics.Rep Language.Fixpoint.Types.Errors.Error x) -> ds) -} d0173fd74c0fa26b5149cb3e367aede0 $fGenericError3 :: Language.Fixpoint.Types.Errors.Error -> Language.Fixpoint.Types.Errors.Error {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (1, True, True) (\ @ x (x1 :: Language.Fixpoint.Types.Errors.Error) -> x1) -} af80a035f9731b203491b28daa7a8cc7 $fGenericError4 :: Language.Fixpoint.Types.Errors.Error1 -> GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Error1" 'GHC.Generics.PrefixI 'GHC.Types.True) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel ('GHC.Base.Just "errLoc") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R Language.Fixpoint.Types.Spans.SrcSpan) GHC.Generics.:*: GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel ('GHC.Base.Just "errMsg") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R Text.PrettyPrint.HughesPJ.Doc)) x {- Arity: 1, HasNoCafRefs, Strictness: m, Unfolding: InlineRule (1, True, False) (\ @ x (x1 :: Language.Fixpoint.Types.Errors.Error1) -> case x1 of wild { Language.Fixpoint.Types.Errors.Error1 g1 g2 -> (GHC.Generics.:*: @ (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel ('GHC.Base.Just "errLoc") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R Language.Fixpoint.Types.Spans.SrcSpan)) @ (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel ('GHC.Base.Just "errMsg") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R Text.PrettyPrint.HughesPJ.Doc)) @ x g1 `cast` (Trans (Sym (GHC.Generics.N:K1[0] _P _R _P)) (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel ('GHC.Base.Just "errLoc") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy>_P _R) _N)) g2 `cast` (Trans (Sym (GHC.Generics.N:K1[0] _P _R _P)) (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel ('GHC.Base.Just "errMsg") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy>_P _R) _N))) `cast` (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "Error1" 'GHC.Generics.PrefixI 'GHC.Types.True>_P _R) _N) }) -} d0173fd74c0fa26b5149cb3e367aede0 $fGenericError_$cfrom :: Language.Fixpoint.Types.Errors.Error -> GHC.Generics.Rep Language.Fixpoint.Types.Errors.Error x {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Errors.$fGenericError3 `cast` (forall (x :: _N). _R ->_R Trans (Language.Fixpoint.Types.Errors.N:Error[0]) (Trans (Sym (GHC.Generics.N:K1[0] _P <[Language.Fixpoint.Types.Errors.Error1]>_R _P)) (Trans (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy>_P _R)) (Trans (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "Error" 'GHC.Generics.PrefixI 'GHC.Types.False>_P _R)) (Trans (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaData "Error" "Language.Fixpoint.Types.Errors" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.True>_P _R)) (Sub (Sym (Language.Fixpoint.Types.Errors.Rep_Error[0]))))) _N))) -} d0173fd74c0fa26b5149cb3e367aede0 $fGenericError_$cto :: GHC.Generics.Rep Language.Fixpoint.Types.Errors.Error x -> Language.Fixpoint.Types.Errors.Error {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Errors.$fGenericError2 `cast` (forall (x :: _N). _R ->_R Trans (Trans (Sub (Language.Fixpoint.Types.Errors.Rep_Error[0])) (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaData "Error" "Language.Fixpoint.Types.Errors" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.True>_P _R) (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "Error" 'GHC.Generics.PrefixI 'GHC.Types.False>_P _R) (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy>_P _R))) _N) (Trans (GHC.Generics.N:K1[0] _P <[Language.Fixpoint.Types.Errors.Error1]>_R _P) (Sym (Language.Fixpoint.Types.Errors.N:Error[0])))) -} bbcb7910102e76dd87f9706483b3612e $fGenericFixResult :: GHC.Generics.Generic (Language.Fixpoint.Types.Errors.FixResult a) DFunId {- HasNoCafRefs, Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun: @ a. @ (Language.Fixpoint.Types.Errors.FixResult a) (Language.Fixpoint.Types.Errors.$fGenericFixResult_$cfrom @ a) (Language.Fixpoint.Types.Errors.$fBinaryFixResult_$cto @ a) -} bbcb7910102e76dd87f9706483b3612e $fGenericFixResult_$cfrom :: Language.Fixpoint.Types.Errors.FixResult a -> GHC.Generics.Rep (Language.Fixpoint.Types.Errors.FixResult a) x {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Errors.$fBinaryFixResult3 `cast` (forall (a :: <*>_N) (x :: _N). _R ->_R Trans (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaData "FixResult" "Language.Fixpoint.Types.Errors" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.False>_P _R)) (Sub (Sym (Language.Fixpoint.Types.Errors.Rep_FixResult[0] _N))) _N) -} bbcb7910102e76dd87f9706483b3612e $fMonoidFixResult :: GHC.Base.Monoid (Language.Fixpoint.Types.Errors.FixResult a) DFunId {- HasNoCafRefs, Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun: @ a. @ (Language.Fixpoint.Types.Errors.FixResult a) (Language.Fixpoint.Types.Errors.Safe @ a) (Language.Fixpoint.Types.Errors.$fMonoidFixResult_$cmappend @ a) (Language.Fixpoint.Types.Errors.$fMonoidFixResult_$cmconcat @ a) -} bbcb7910102e76dd87f9706483b3612e $fMonoidFixResult1 :: [Language.Fixpoint.Types.Errors.FixResult a] -> Language.Fixpoint.Types.Errors.FixResult a {- Arity: 1, HasNoCafRefs, Strictness: -} bbcb7910102e76dd87f9706483b3612e $fMonoidFixResult_$cmappend :: Language.Fixpoint.Types.Errors.FixResult a -> Language.Fixpoint.Types.Errors.FixResult a -> Language.Fixpoint.Types.Errors.FixResult a {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: (\ @ a (ds :: Language.Fixpoint.Types.Errors.FixResult a) (x :: Language.Fixpoint.Types.Errors.FixResult a) -> case ds of wild { DEFAULT -> case x of wild1 { Language.Fixpoint.Types.Errors.Crash ds1 ds2 -> wild1 Language.Fixpoint.Types.Errors.Safe -> wild Language.Fixpoint.Types.Errors.Unsafe ipv -> case wild of wild2 { Language.Fixpoint.Types.Errors.Crash ds1 ds2 -> wild2 Language.Fixpoint.Types.Errors.Unsafe xs -> case GHC.Base.++ @ a xs ipv of dt { DEFAULT -> Language.Fixpoint.Types.Errors.Unsafe @ a dt } } } Language.Fixpoint.Types.Errors.Safe -> x }) -} bbcb7910102e76dd87f9706483b3612e $fMonoidFixResult_$cmconcat :: [Language.Fixpoint.Types.Errors.FixResult a] -> Language.Fixpoint.Types.Errors.FixResult a {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: (\ @ a (eta :: [Language.Fixpoint.Types.Errors.FixResult a]) -> Language.Fixpoint.Types.Errors.$fMonoidFixResult1 @ a eta) -} bbcb7910102e76dd87f9706483b3612e $fNFDataFixResult :: Control.DeepSeq.NFData a => Control.DeepSeq.NFData (Language.Fixpoint.Types.Errors.FixResult a) DFunId {- Arity: 2, HasNoCafRefs, Strictness: , Inline: INLINE (sat-args=0), Unfolding: InlineRule (1, False, True) Language.Fixpoint.Types.Errors.$fNFDataFixResult_$crnf `cast` (forall (a :: <*>_N). _R ->_R Sym (Control.DeepSeq.N:NFData[0] _N)) -} bbcb7910102e76dd87f9706483b3612e $fNFDataFixResult_$crnf :: Control.DeepSeq.NFData a => Language.Fixpoint.Types.Errors.FixResult a -> () {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: (\ @ a ($dNFData :: Control.DeepSeq.NFData a) (eta :: Language.Fixpoint.Types.Errors.FixResult a) -> case eta of wild { Language.Fixpoint.Types.Errors.Crash g1 g2 -> case Control.DeepSeq.$fNFDataArray_$crnf1 @ a $dNFData g1 of wild1 { () -> Control.DeepSeq.$fNFDataArray_$crnf1 @ GHC.Types.Char Control.DeepSeq.$fNFDataChar_$crnf `cast` (Sym (Control.DeepSeq.N:NFData[0] _N)) g2 } Language.Fixpoint.Types.Errors.Safe -> GHC.Tuple.() Language.Fixpoint.Types.Errors.Unsafe g1 -> Control.DeepSeq.$fNFDataArray_$crnf1 @ a $dNFData g1 }) -} d0173fd74c0fa26b5149cb3e367aede0 $fOrdError :: GHC.Classes.Ord Language.Fixpoint.Types.Errors.Error DFunId {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Errors.Error Language.Fixpoint.Types.Errors.$fEqError Language.Fixpoint.Types.Errors.$fOrdError_$ccompare Language.Fixpoint.Types.Errors.$fOrdError_$c< Language.Fixpoint.Types.Errors.$fOrdError_$c<= Language.Fixpoint.Types.Errors.$fOrdError_$c> Language.Fixpoint.Types.Errors.$fOrdError_$c>= Language.Fixpoint.Types.Errors.$fOrdError_$cmax Language.Fixpoint.Types.Errors.$fOrdError_$cmin -} af80a035f9731b203491b28daa7a8cc7 $fOrdError1 :: GHC.Classes.Ord Language.Fixpoint.Types.Errors.Error1 DFunId {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Errors.Error1 Language.Fixpoint.Types.Errors.$fEqError1 Language.Fixpoint.Types.Errors.$fOrdError1_$ccompare Language.Fixpoint.Types.Errors.$fOrdError1_$c< Language.Fixpoint.Types.Errors.$fOrdError1_$c<= Language.Fixpoint.Types.Errors.$fOrdError1_$c> Language.Fixpoint.Types.Errors.$fOrdError1_$c>= Language.Fixpoint.Types.Errors.$fOrdError1_$cmax Language.Fixpoint.Types.Errors.$fOrdError1_$cmin -} af80a035f9731b203491b28daa7a8cc7 $fOrdError1_$c< :: Language.Fixpoint.Types.Errors.Error1 -> Language.Fixpoint.Types.Errors.Error1 -> GHC.Types.Bool {- Arity: 2, HasNoCafRefs, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (2, True, False) (\ (w :: Language.Fixpoint.Types.Errors.Error1) (w1 :: Language.Fixpoint.Types.Errors.Error1) -> case w of ww { Language.Fixpoint.Types.Errors.Error1 ww1 ww2 -> case ww1 of ww3 { Language.Fixpoint.Types.Spans.SS ww4 ww5 -> case ww4 of ww6 { Text.Parsec.Pos.SourcePos ww7 ww8 ww9 -> case ww5 of ww10 { Text.Parsec.Pos.SourcePos ww11 ww12 ww13 -> case w1 of ww14 { Language.Fixpoint.Types.Errors.Error1 ww15 ww16 -> case ww15 of ww17 { Language.Fixpoint.Types.Spans.SS ww18 ww19 -> case ww18 of ww20 { Text.Parsec.Pos.SourcePos ww21 ww22 ww23 -> case ww19 of ww24 { Text.Parsec.Pos.SourcePos ww25 ww26 ww27 -> Language.Fixpoint.Types.Errors.$w$c< ww7 ww8 ww9 ww11 ww12 ww13 ww21 ww22 ww23 ww25 ww26 ww27 } } } } } } } }) -} af80a035f9731b203491b28daa7a8cc7 $fOrdError1_$c<= :: Language.Fixpoint.Types.Errors.Error1 -> Language.Fixpoint.Types.Errors.Error1 -> GHC.Types.Bool {- Arity: 2, HasNoCafRefs, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (2, True, False) (\ (w :: Language.Fixpoint.Types.Errors.Error1) (w1 :: Language.Fixpoint.Types.Errors.Error1) -> case w of ww { Language.Fixpoint.Types.Errors.Error1 ww1 ww2 -> case ww1 of ww3 { Language.Fixpoint.Types.Spans.SS ww4 ww5 -> case ww4 of ww6 { Text.Parsec.Pos.SourcePos ww7 ww8 ww9 -> case ww5 of ww10 { Text.Parsec.Pos.SourcePos ww11 ww12 ww13 -> case w1 of ww14 { Language.Fixpoint.Types.Errors.Error1 ww15 ww16 -> case ww15 of ww17 { Language.Fixpoint.Types.Spans.SS ww18 ww19 -> case ww18 of ww20 { Text.Parsec.Pos.SourcePos ww21 ww22 ww23 -> case ww19 of ww24 { Text.Parsec.Pos.SourcePos ww25 ww26 ww27 -> Language.Fixpoint.Types.Errors.$w$c<= ww7 ww8 ww9 ww11 ww12 ww13 ww21 ww22 ww23 ww25 ww26 ww27 } } } } } } } }) -} af80a035f9731b203491b28daa7a8cc7 $fOrdError1_$c> :: Language.Fixpoint.Types.Errors.Error1 -> Language.Fixpoint.Types.Errors.Error1 -> GHC.Types.Bool {- Arity: 2, HasNoCafRefs, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (2, True, False) (\ (w :: Language.Fixpoint.Types.Errors.Error1) (w1 :: Language.Fixpoint.Types.Errors.Error1) -> case w of ww { Language.Fixpoint.Types.Errors.Error1 ww1 ww2 -> case ww1 of ww3 { Language.Fixpoint.Types.Spans.SS ww4 ww5 -> case ww4 of ww6 { Text.Parsec.Pos.SourcePos ww7 ww8 ww9 -> case ww5 of ww10 { Text.Parsec.Pos.SourcePos ww11 ww12 ww13 -> case w1 of ww14 { Language.Fixpoint.Types.Errors.Error1 ww15 ww16 -> case ww15 of ww17 { Language.Fixpoint.Types.Spans.SS ww18 ww19 -> case ww18 of ww20 { Text.Parsec.Pos.SourcePos ww21 ww22 ww23 -> case ww19 of ww24 { Text.Parsec.Pos.SourcePos ww25 ww26 ww27 -> Language.Fixpoint.Types.Errors.$w$c> ww7 ww8 ww9 ww11 ww12 ww13 ww21 ww22 ww23 ww25 ww26 ww27 } } } } } } } }) -} af80a035f9731b203491b28daa7a8cc7 $fOrdError1_$c>= :: Language.Fixpoint.Types.Errors.Error1 -> Language.Fixpoint.Types.Errors.Error1 -> GHC.Types.Bool {- Arity: 2, HasNoCafRefs, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (2, True, False) (\ (w :: Language.Fixpoint.Types.Errors.Error1) (w1 :: Language.Fixpoint.Types.Errors.Error1) -> case w of ww { Language.Fixpoint.Types.Errors.Error1 ww1 ww2 -> case ww1 of ww3 { Language.Fixpoint.Types.Spans.SS ww4 ww5 -> case ww4 of ww6 { Text.Parsec.Pos.SourcePos ww7 ww8 ww9 -> case ww5 of ww10 { Text.Parsec.Pos.SourcePos ww11 ww12 ww13 -> case w1 of ww14 { Language.Fixpoint.Types.Errors.Error1 ww15 ww16 -> case ww15 of ww17 { Language.Fixpoint.Types.Spans.SS ww18 ww19 -> case ww18 of ww20 { Text.Parsec.Pos.SourcePos ww21 ww22 ww23 -> case ww19 of ww24 { Text.Parsec.Pos.SourcePos ww25 ww26 ww27 -> Language.Fixpoint.Types.Errors.$w$c>= ww7 ww8 ww9 ww11 ww12 ww13 ww21 ww22 ww23 ww25 ww26 ww27 } } } } } } } }) -} af80a035f9731b203491b28daa7a8cc7 $fOrdError1_$ccompare :: Language.Fixpoint.Types.Errors.Error1 -> Language.Fixpoint.Types.Errors.Error1 -> GHC.Types.Ordering {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: InlineRule (2, True, False) (\ (x :: Language.Fixpoint.Types.Errors.Error1) (y :: Language.Fixpoint.Types.Errors.Error1) -> case x of wild { Language.Fixpoint.Types.Errors.Error1 ds ds1 -> case y of wild1 { Language.Fixpoint.Types.Errors.Error1 ds2 ds3 -> Language.Fixpoint.Types.Spans.$fOrdSrcSpan_$ccompare ds ds2 } }) -} af80a035f9731b203491b28daa7a8cc7 $fOrdError1_$cmax :: Language.Fixpoint.Types.Errors.Error1 -> Language.Fixpoint.Types.Errors.Error1 -> Language.Fixpoint.Types.Errors.Error1 {- Arity: 2, HasNoCafRefs, Strictness: m, Inline: INLINE[0], Unfolding: InlineRule (2, True, False) (\ (w :: Language.Fixpoint.Types.Errors.Error1) (w1 :: Language.Fixpoint.Types.Errors.Error1) -> case w of ww { Language.Fixpoint.Types.Errors.Error1 ww1 ww2 -> case ww1 of ww3 { Language.Fixpoint.Types.Spans.SS ww4 ww5 -> case ww4 of ww6 { Text.Parsec.Pos.SourcePos ww7 ww8 ww9 -> case ww5 of ww10 { Text.Parsec.Pos.SourcePos ww11 ww12 ww13 -> case w1 of ww14 { Language.Fixpoint.Types.Errors.Error1 ww15 ww16 -> case ww15 of ww17 { Language.Fixpoint.Types.Spans.SS ww18 ww19 -> case ww18 of ww20 { Text.Parsec.Pos.SourcePos ww21 ww22 ww23 -> case ww19 of ww24 { Text.Parsec.Pos.SourcePos ww25 ww26 ww27 -> case GHC.Classes.$fOrd[]_$s$ccompare1 ww7 ww21 of wild { GHC.Types.LT -> Language.Fixpoint.Types.Errors.Error1 (Language.Fixpoint.Types.Spans.SS (Text.Parsec.Pos.SourcePos ww21 ww22 ww23) (Text.Parsec.Pos.SourcePos ww25 ww26 ww27)) ww16 GHC.Types.EQ -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.<# ww8 ww22) of wild1 { GHC.Types.False -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww8 ww22) of wild2 { GHC.Types.False -> Language.Fixpoint.Types.Errors.Error1 (Language.Fixpoint.Types.Spans.SS (Text.Parsec.Pos.SourcePos ww7 ww8 ww9) (Text.Parsec.Pos.SourcePos ww11 ww12 ww13)) ww2 GHC.Types.True -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.<# ww9 ww23) of wild4 { GHC.Types.False -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww9 ww23) of wild5 { GHC.Types.False -> Language.Fixpoint.Types.Errors.Error1 (Language.Fixpoint.Types.Spans.SS (Text.Parsec.Pos.SourcePos ww7 ww8 ww9) (Text.Parsec.Pos.SourcePos ww11 ww12 ww13)) ww2 GHC.Types.True -> case GHC.Classes.$fOrd[]_$s$ccompare1 ww11 ww25 of wild7 { GHC.Types.LT -> Language.Fixpoint.Types.Errors.Error1 (Language.Fixpoint.Types.Spans.SS (Text.Parsec.Pos.SourcePos ww21 ww22 ww23) (Text.Parsec.Pos.SourcePos ww25 ww26 ww27)) ww16 GHC.Types.EQ -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.<# ww12 ww26) of wild8 { GHC.Types.False -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww12 ww26) of wild9 { GHC.Types.False -> Language.Fixpoint.Types.Errors.Error1 (Language.Fixpoint.Types.Spans.SS (Text.Parsec.Pos.SourcePos ww7 ww8 ww9) (Text.Parsec.Pos.SourcePos ww11 ww12 ww13)) ww2 GHC.Types.True -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.<# ww13 ww27) of wild10 { GHC.Types.False -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww13 ww27) of wild11 { GHC.Types.False -> Language.Fixpoint.Types.Errors.Error1 (Language.Fixpoint.Types.Spans.SS (Text.Parsec.Pos.SourcePos ww7 ww8 ww9) (Text.Parsec.Pos.SourcePos ww11 ww12 ww13)) ww2 GHC.Types.True -> Language.Fixpoint.Types.Errors.Error1 (Language.Fixpoint.Types.Spans.SS (Text.Parsec.Pos.SourcePos ww21 ww22 ww23) (Text.Parsec.Pos.SourcePos ww25 ww26 ww27)) ww16 } GHC.Types.True -> Language.Fixpoint.Types.Errors.Error1 (Language.Fixpoint.Types.Spans.SS (Text.Parsec.Pos.SourcePos ww21 ww22 ww23) (Text.Parsec.Pos.SourcePos ww25 ww26 ww27)) ww16 } } GHC.Types.True -> Language.Fixpoint.Types.Errors.Error1 (Language.Fixpoint.Types.Spans.SS (Text.Parsec.Pos.SourcePos ww21 ww22 ww23) (Text.Parsec.Pos.SourcePos ww25 ww26 ww27)) ww16 } GHC.Types.GT -> Language.Fixpoint.Types.Errors.Error1 (Language.Fixpoint.Types.Spans.SS (Text.Parsec.Pos.SourcePos ww7 ww8 ww9) (Text.Parsec.Pos.SourcePos ww11 ww12 ww13)) ww2 } } GHC.Types.True -> Language.Fixpoint.Types.Errors.Error1 (Language.Fixpoint.Types.Spans.SS (Text.Parsec.Pos.SourcePos ww21 ww22 ww23) (Text.Parsec.Pos.SourcePos ww25 ww26 ww27)) ww16 } } GHC.Types.True -> Language.Fixpoint.Types.Errors.Error1 (Language.Fixpoint.Types.Spans.SS (Text.Parsec.Pos.SourcePos ww21 ww22 ww23) (Text.Parsec.Pos.SourcePos ww25 ww26 ww27)) ww16 } GHC.Types.GT -> Language.Fixpoint.Types.Errors.Error1 (Language.Fixpoint.Types.Spans.SS (Text.Parsec.Pos.SourcePos ww7 ww8 ww9) (Text.Parsec.Pos.SourcePos ww11 ww12 ww13)) ww2 } } } } } } } } }) -} af80a035f9731b203491b28daa7a8cc7 $fOrdError1_$cmin :: Language.Fixpoint.Types.Errors.Error1 -> Language.Fixpoint.Types.Errors.Error1 -> Language.Fixpoint.Types.Errors.Error1 {- Arity: 2, HasNoCafRefs, Strictness: m, Inline: INLINE[0], Unfolding: InlineRule (2, True, False) (\ (w :: Language.Fixpoint.Types.Errors.Error1) (w1 :: Language.Fixpoint.Types.Errors.Error1) -> case w of ww { Language.Fixpoint.Types.Errors.Error1 ww1 ww2 -> case ww1 of ww3 { Language.Fixpoint.Types.Spans.SS ww4 ww5 -> case ww4 of ww6 { Text.Parsec.Pos.SourcePos ww7 ww8 ww9 -> case ww5 of ww10 { Text.Parsec.Pos.SourcePos ww11 ww12 ww13 -> case w1 of ww14 { Language.Fixpoint.Types.Errors.Error1 ww15 ww16 -> case ww15 of ww17 { Language.Fixpoint.Types.Spans.SS ww18 ww19 -> case ww18 of ww20 { Text.Parsec.Pos.SourcePos ww21 ww22 ww23 -> case ww19 of ww24 { Text.Parsec.Pos.SourcePos ww25 ww26 ww27 -> case GHC.Classes.$fOrd[]_$s$ccompare1 ww7 ww21 of wild { GHC.Types.LT -> Language.Fixpoint.Types.Errors.Error1 (Language.Fixpoint.Types.Spans.SS (Text.Parsec.Pos.SourcePos ww7 ww8 ww9) (Text.Parsec.Pos.SourcePos ww11 ww12 ww13)) ww2 GHC.Types.EQ -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.<# ww8 ww22) of wild1 { GHC.Types.False -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww8 ww22) of wild2 { GHC.Types.False -> Language.Fixpoint.Types.Errors.Error1 (Language.Fixpoint.Types.Spans.SS (Text.Parsec.Pos.SourcePos ww21 ww22 ww23) (Text.Parsec.Pos.SourcePos ww25 ww26 ww27)) ww16 GHC.Types.True -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.<# ww9 ww23) of wild4 { GHC.Types.False -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww9 ww23) of wild5 { GHC.Types.False -> Language.Fixpoint.Types.Errors.Error1 (Language.Fixpoint.Types.Spans.SS (Text.Parsec.Pos.SourcePos ww21 ww22 ww23) (Text.Parsec.Pos.SourcePos ww25 ww26 ww27)) ww16 GHC.Types.True -> case GHC.Classes.$fOrd[]_$s$ccompare1 ww11 ww25 of wild7 { GHC.Types.LT -> Language.Fixpoint.Types.Errors.Error1 (Language.Fixpoint.Types.Spans.SS (Text.Parsec.Pos.SourcePos ww7 ww8 ww9) (Text.Parsec.Pos.SourcePos ww11 ww12 ww13)) ww2 GHC.Types.EQ -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.<# ww12 ww26) of wild8 { GHC.Types.False -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww12 ww26) of wild9 { GHC.Types.False -> Language.Fixpoint.Types.Errors.Error1 (Language.Fixpoint.Types.Spans.SS (Text.Parsec.Pos.SourcePos ww21 ww22 ww23) (Text.Parsec.Pos.SourcePos ww25 ww26 ww27)) ww16 GHC.Types.True -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.<# ww13 ww27) of wild10 { GHC.Types.False -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww13 ww27) of wild11 { GHC.Types.False -> Language.Fixpoint.Types.Errors.Error1 (Language.Fixpoint.Types.Spans.SS (Text.Parsec.Pos.SourcePos ww21 ww22 ww23) (Text.Parsec.Pos.SourcePos ww25 ww26 ww27)) ww16 GHC.Types.True -> Language.Fixpoint.Types.Errors.Error1 (Language.Fixpoint.Types.Spans.SS (Text.Parsec.Pos.SourcePos ww7 ww8 ww9) (Text.Parsec.Pos.SourcePos ww11 ww12 ww13)) ww2 } GHC.Types.True -> Language.Fixpoint.Types.Errors.Error1 (Language.Fixpoint.Types.Spans.SS (Text.Parsec.Pos.SourcePos ww7 ww8 ww9) (Text.Parsec.Pos.SourcePos ww11 ww12 ww13)) ww2 } } GHC.Types.True -> Language.Fixpoint.Types.Errors.Error1 (Language.Fixpoint.Types.Spans.SS (Text.Parsec.Pos.SourcePos ww7 ww8 ww9) (Text.Parsec.Pos.SourcePos ww11 ww12 ww13)) ww2 } GHC.Types.GT -> Language.Fixpoint.Types.Errors.Error1 (Language.Fixpoint.Types.Spans.SS (Text.Parsec.Pos.SourcePos ww21 ww22 ww23) (Text.Parsec.Pos.SourcePos ww25 ww26 ww27)) ww16 } } GHC.Types.True -> Language.Fixpoint.Types.Errors.Error1 (Language.Fixpoint.Types.Spans.SS (Text.Parsec.Pos.SourcePos ww7 ww8 ww9) (Text.Parsec.Pos.SourcePos ww11 ww12 ww13)) ww2 } } GHC.Types.True -> Language.Fixpoint.Types.Errors.Error1 (Language.Fixpoint.Types.Spans.SS (Text.Parsec.Pos.SourcePos ww7 ww8 ww9) (Text.Parsec.Pos.SourcePos ww11 ww12 ww13)) ww2 } GHC.Types.GT -> Language.Fixpoint.Types.Errors.Error1 (Language.Fixpoint.Types.Spans.SS (Text.Parsec.Pos.SourcePos ww21 ww22 ww23) (Text.Parsec.Pos.SourcePos ww25 ww26 ww27)) ww16 } } } } } } } } }) -} f905d68706896b24782a75ff2dd85b50 $fOrdError2 :: [Language.Fixpoint.Types.Errors.Error1] -> [Language.Fixpoint.Types.Errors.Error1] -> GHC.Types.Ordering {- Arity: 2, Unfolding: (GHC.Classes.$fOrd[]_$ccompare @ Language.Fixpoint.Types.Errors.Error1 Language.Fixpoint.Types.Errors.$fOrdError1) -} d0173fd74c0fa26b5149cb3e367aede0 $fOrdError_$c< :: Language.Fixpoint.Types.Errors.Error -> Language.Fixpoint.Types.Errors.Error -> GHC.Types.Bool {- Arity: 2, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Errors.$fOrdError_$s$fOrd[]_$c< `cast` (Sym (Language.Fixpoint.Types.Errors.N:Error[0]) ->_R Sym (Language.Fixpoint.Types.Errors.N:Error[0]) ->_R _R) -} d0173fd74c0fa26b5149cb3e367aede0 $fOrdError_$c<= :: Language.Fixpoint.Types.Errors.Error -> Language.Fixpoint.Types.Errors.Error -> GHC.Types.Bool {- Arity: 2, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Errors.$fOrdError_$s$fOrd[]_$c<= `cast` (Sym (Language.Fixpoint.Types.Errors.N:Error[0]) ->_R Sym (Language.Fixpoint.Types.Errors.N:Error[0]) ->_R _R) -} d0173fd74c0fa26b5149cb3e367aede0 $fOrdError_$c> :: Language.Fixpoint.Types.Errors.Error -> Language.Fixpoint.Types.Errors.Error -> GHC.Types.Bool {- Arity: 2, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Errors.$fOrdError_$s$fOrd[]_$c> `cast` (Sym (Language.Fixpoint.Types.Errors.N:Error[0]) ->_R Sym (Language.Fixpoint.Types.Errors.N:Error[0]) ->_R _R) -} d0173fd74c0fa26b5149cb3e367aede0 $fOrdError_$c>= :: Language.Fixpoint.Types.Errors.Error -> Language.Fixpoint.Types.Errors.Error -> GHC.Types.Bool {- Arity: 2, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Errors.$fOrdError_$s$fOrd[]_$c>= `cast` (Sym (Language.Fixpoint.Types.Errors.N:Error[0]) ->_R Sym (Language.Fixpoint.Types.Errors.N:Error[0]) ->_R _R) -} d0173fd74c0fa26b5149cb3e367aede0 $fOrdError_$ccompare :: Language.Fixpoint.Types.Errors.Error -> Language.Fixpoint.Types.Errors.Error -> GHC.Types.Ordering {- Arity: 2, Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Errors.$fOrdError2 `cast` (Sym (Language.Fixpoint.Types.Errors.N:Error[0]) ->_R Sym (Language.Fixpoint.Types.Errors.N:Error[0]) ->_R _R) -} d0173fd74c0fa26b5149cb3e367aede0 $fOrdError_$cmax :: Language.Fixpoint.Types.Errors.Error -> Language.Fixpoint.Types.Errors.Error -> Language.Fixpoint.Types.Errors.Error {- Arity: 2, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Errors.$fOrdError_$s$fOrd[]_$cmax `cast` (Sym (Language.Fixpoint.Types.Errors.N:Error[0]) ->_R Sym (Language.Fixpoint.Types.Errors.N:Error[0]) ->_R Sym (Language.Fixpoint.Types.Errors.N:Error[0])) -} d0173fd74c0fa26b5149cb3e367aede0 $fOrdError_$cmin :: Language.Fixpoint.Types.Errors.Error -> Language.Fixpoint.Types.Errors.Error -> Language.Fixpoint.Types.Errors.Error {- Arity: 2, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Errors.$fOrdError_$s$fOrd[]_$cmin `cast` (Sym (Language.Fixpoint.Types.Errors.N:Error[0]) ->_R Sym (Language.Fixpoint.Types.Errors.N:Error[0]) ->_R Sym (Language.Fixpoint.Types.Errors.N:Error[0])) -} bf357c7b7763fd52e45a521a123f2a79 $fOrdError_$s$fOrd[]_$c< :: [Language.Fixpoint.Types.Errors.Error1] -> [Language.Fixpoint.Types.Errors.Error1] -> GHC.Types.Bool {- Arity: 2, Strictness: , Unfolding: InlineRule (2, True, False) (\ (x :: [Language.Fixpoint.Types.Errors.Error1]) (y :: [Language.Fixpoint.Types.Errors.Error1]) -> case GHC.Classes.$fOrd[]_$ccompare @ Language.Fixpoint.Types.Errors.Error1 Language.Fixpoint.Types.Errors.$fOrdError1 x y of wild { DEFAULT -> GHC.Types.False GHC.Types.LT -> GHC.Types.True }) -} 10dc1e72fcaf164b61f5733c86ffbd18 $fOrdError_$s$fOrd[]_$c<= :: [Language.Fixpoint.Types.Errors.Error1] -> [Language.Fixpoint.Types.Errors.Error1] -> GHC.Types.Bool {- Arity: 2, Strictness: , Unfolding: InlineRule (2, True, False) (\ (x :: [Language.Fixpoint.Types.Errors.Error1]) (y :: [Language.Fixpoint.Types.Errors.Error1]) -> case GHC.Classes.$fOrd[]_$ccompare @ Language.Fixpoint.Types.Errors.Error1 Language.Fixpoint.Types.Errors.$fOrdError1 x y of wild { DEFAULT -> GHC.Types.True GHC.Types.GT -> GHC.Types.False }) -} 457c105c25d2a8f42769110e4130ac16 $fOrdError_$s$fOrd[]_$c> :: [Language.Fixpoint.Types.Errors.Error1] -> [Language.Fixpoint.Types.Errors.Error1] -> GHC.Types.Bool {- Arity: 2, Strictness: , Unfolding: InlineRule (2, True, False) (\ (x :: [Language.Fixpoint.Types.Errors.Error1]) (y :: [Language.Fixpoint.Types.Errors.Error1]) -> case GHC.Classes.$fOrd[]_$ccompare @ Language.Fixpoint.Types.Errors.Error1 Language.Fixpoint.Types.Errors.$fOrdError1 x y of wild { DEFAULT -> GHC.Types.False GHC.Types.GT -> GHC.Types.True }) -} 09e2e504c37051fb49218a5cdefd82b1 $fOrdError_$s$fOrd[]_$c>= :: [Language.Fixpoint.Types.Errors.Error1] -> [Language.Fixpoint.Types.Errors.Error1] -> GHC.Types.Bool {- Arity: 2, Strictness: , Unfolding: InlineRule (2, True, False) (\ (x :: [Language.Fixpoint.Types.Errors.Error1]) (y :: [Language.Fixpoint.Types.Errors.Error1]) -> case GHC.Classes.$fOrd[]_$ccompare @ Language.Fixpoint.Types.Errors.Error1 Language.Fixpoint.Types.Errors.$fOrdError1 x y of wild { DEFAULT -> GHC.Types.True GHC.Types.LT -> GHC.Types.False }) -} a0f82796e0571c4b357a8f28ccbe1fa2 $fOrdError_$s$fOrd[]_$cmax :: [Language.Fixpoint.Types.Errors.Error1] -> [Language.Fixpoint.Types.Errors.Error1] -> [Language.Fixpoint.Types.Errors.Error1] {- Arity: 2, Strictness: , Unfolding: InlineRule (2, True, False) (\ (x :: [Language.Fixpoint.Types.Errors.Error1]) (y :: [Language.Fixpoint.Types.Errors.Error1]) -> case GHC.Classes.$fOrd[]_$ccompare @ Language.Fixpoint.Types.Errors.Error1 Language.Fixpoint.Types.Errors.$fOrdError1 x y of wild { DEFAULT -> y GHC.Types.GT -> x }) -} a0d6608931793a29b8b084ae57154c79 $fOrdError_$s$fOrd[]_$cmin :: [Language.Fixpoint.Types.Errors.Error1] -> [Language.Fixpoint.Types.Errors.Error1] -> [Language.Fixpoint.Types.Errors.Error1] {- Arity: 2, Strictness: , Unfolding: InlineRule (2, True, False) (\ (x :: [Language.Fixpoint.Types.Errors.Error1]) (y :: [Language.Fixpoint.Types.Errors.Error1]) -> case GHC.Classes.$fOrd[]_$ccompare @ Language.Fixpoint.Types.Errors.Error1 Language.Fixpoint.Types.Errors.$fOrdError1 x y of wild { DEFAULT -> x GHC.Types.GT -> y }) -} d0173fd74c0fa26b5149cb3e367aede0 $fPPrintError :: Language.Fixpoint.Types.PrettyPrint.PPrint Language.Fixpoint.Types.Errors.Error DFunId {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Errors.Error Language.Fixpoint.Types.Errors.$fPPrintError_$cpprintTidy Language.Fixpoint.Types.Errors.$fPPrintError_$cpprintPrec -} af80a035f9731b203491b28daa7a8cc7 $fPPrintError1 :: Language.Fixpoint.Types.PrettyPrint.PPrint Language.Fixpoint.Types.Errors.Error1 DFunId {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Errors.Error1 Language.Fixpoint.Types.Errors.$fFixpointError1_$cpprintTidy Language.Fixpoint.Types.Errors.$fFixpointError1_$cpprintPrec -} d0173fd74c0fa26b5149cb3e367aede0 $fPPrintError_$cpprintPrec :: GHC.Types.Int -> Language.Fixpoint.Types.PrettyPrint.Tidy -> Language.Fixpoint.Types.Errors.Error -> Text.PrettyPrint.HughesPJ.Doc {- Arity: 3, Strictness: , Unfolding: InlineRule (1, True, True) (\ (ds :: GHC.Types.Int) (eta :: Language.Fixpoint.Types.PrettyPrint.Tidy) (eta1 :: Language.Fixpoint.Types.Errors.Error) -> Language.Fixpoint.Types.Errors.$fPPrintError_$cpprintTidy eta eta1) -} d0173fd74c0fa26b5149cb3e367aede0 $fPPrintError_$cpprintTidy :: Language.Fixpoint.Types.PrettyPrint.Tidy -> Language.Fixpoint.Types.Errors.Error -> Text.PrettyPrint.HughesPJ.Doc {- Arity: 2, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (2, True, True) (\ (w :: Language.Fixpoint.Types.PrettyPrint.Tidy) (w1 :: Language.Fixpoint.Types.Errors.Error) -> Language.Fixpoint.Types.Errors.$w$cpprintTidy1 w1) -} 61e978aed7de42777c50ae537c022c1d $fPPrintError_go :: [Language.Fixpoint.Types.Errors.Error1] -> [Text.PrettyPrint.Annotated.HughesPJ.Doc ()] {- Arity: 1, Strictness: -} b0429539a3af14014fa62b047e6047e2 $fSerializeAnnotDetails :: Data.Serialize.Serialize a => Data.Serialize.Serialize (Text.PrettyPrint.Annotated.HughesPJ.AnnotDetails a) DFunId {- Arity: 1, Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun: @ a ($dSerialize :: Data.Serialize.Serialize a). @ (Text.PrettyPrint.Annotated.HughesPJ.AnnotDetails a) (Language.Fixpoint.Types.Errors.$fSerializeAnnotDetails_$cput @ a $dSerialize) (Language.Fixpoint.Types.Errors.$fSerializeAnnotDetails_$cget @ a $dSerialize) -} 78cb11f78efdf8fd6c55bd67b0506472 $fSerializeAnnotDetails3 :: Data.ByteString.Builder.Internal.BuildStep r -> Data.ByteString.Builder.Internal.BufferRange -> GHC.Prim.State# GHC.Prim.RealWorld -> (# GHC.Prim.State# GHC.Prim.RealWorld, Data.ByteString.Builder.Internal.BuildSignal r #) {- Arity: 3, HasNoCafRefs, Unfolding: (\ @ r (eta :: Data.ByteString.Builder.Internal.BuildStep r) (eta1 :: Data.ByteString.Builder.Internal.BufferRange) (eta2 :: GHC.Prim.State# GHC.Prim.RealWorld)[OneShot] -> case eta1 of wild { Data.ByteString.Builder.Internal.BufferRange dt dt1 -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.<# (GHC.Prim.minusAddr# dt1 dt) 1#) of wild2 { GHC.Types.False -> case GHC.Prim.writeWord8OffAddr# @ GHC.Prim.RealWorld dt 0# 0## eta2 of s2 { DEFAULT -> (eta (Data.ByteString.Builder.Internal.BufferRange (GHC.Prim.plusAddr# dt 1#) dt1)) `cast` (GHC.Types.N:IO[0] _R) s2 } GHC.Types.True -> (# eta2, Data.ByteString.Builder.Internal.BufferFull @ r 1# dt (\ (ds :: Data.ByteString.Builder.Internal.BufferRange) (eta3 :: GHC.Prim.State# GHC.Prim.RealWorld)[OneShot] -> case ds of wild3 { Data.ByteString.Builder.Internal.BufferRange dt3 dt4 -> case GHC.Prim.writeWord8OffAddr# @ GHC.Prim.RealWorld dt3 0# 0## eta3 of s2 { DEFAULT -> (eta (Data.ByteString.Builder.Internal.BufferRange (GHC.Prim.plusAddr# dt3 1#) dt4)) `cast` (GHC.Types.N:IO[0] _R) s2 } }) `cast` (_R ->_R Sym (GHC.Types.N:IO[0] _R)) #) } }) -} 383dde06f588c4358ad265ee4d72a884 $fSerializeAnnotDetails4 :: Data.Serialize.Serialize a => forall r. Data.Serialize.Get.Input -> Data.Serialize.Get.Buffer -> Data.Serialize.Get.More -> Data.Serialize.Get.Failure r -> Data.Serialize.Get.Success (Text.PrettyPrint.Annotated.HughesPJ.AnnotDetails a) r -> Data.Serialize.Get.Result r {- Arity: 6, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (6, True, False) (\ @ a (w :: Data.Serialize.Serialize a) @ r (w1 :: Data.Serialize.Get.Input) (w2 :: Data.Serialize.Get.Buffer) (w3 :: Data.Serialize.Get.More) (w4 :: Data.Serialize.Get.Failure r) (w5 :: Data.Serialize.Get.Success (Text.PrettyPrint.Annotated.HughesPJ.AnnotDetails a) r) -> case w1 of ww { Data.ByteString.Internal.PS ww1 ww2 ww3 ww4 -> Language.Fixpoint.Types.Errors.$w$cget1 @ a w @ r ww1 ww2 ww3 ww4 w2 w3 w4 w5 }) -} 348ec6ec664048d09468a1c818a21d6b $fSerializeAnnotDetails_$cget :: Data.Serialize.Serialize a => Data.Serialize.Get.Get (Text.PrettyPrint.Annotated.HughesPJ.AnnotDetails a) {- Arity: 6, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Errors.$fSerializeAnnotDetails4 `cast` (forall (a :: <*>_N). _R ->_R Sym (Data.Serialize.Get.N:Get[0] _R)) -} fc35cb786c776cc434d9f95b9005a35f $fSerializeAnnotDetails_$cput :: Data.Serialize.Serialize a => Data.Serialize.Put.Putter (Text.PrettyPrint.Annotated.HughesPJ.AnnotDetails a) {- Arity: 2, Strictness: m, Inline: INLINE[0], Unfolding: InlineRule (2, True, False) (\ @ a (w :: Data.Serialize.Serialize a) (w1 :: Text.PrettyPrint.Annotated.HughesPJ.AnnotDetails a) -> case Language.Fixpoint.Types.Errors.$w$cput @ a w w1 of ww { (#,#) ww1 ww2 -> (Data.Serialize.Put.PairS @ () ww1 ww2) `cast` (Sym (Data.Serialize.Put.N:PutM[0]) <()>_N) }) -} 146e5fcaa831210e157731237c2b41fd $fSerializeDoc :: Data.Serialize.Serialize Text.PrettyPrint.HughesPJ.Doc DFunId {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Text.PrettyPrint.HughesPJ.Doc Language.Fixpoint.Types.Errors.$fSerializeDoc_$s$dmput Language.Fixpoint.Types.Errors.$fSerializeDoc_$cget -} f859c48378a12dfd1833aafe98592b68 $fSerializeDoc0 :: Data.Serialize.Serialize a => Data.Serialize.Serialize (Text.PrettyPrint.Annotated.HughesPJ.Doc a) DFunId {- Arity: 1, Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun: @ a ($dSerialize :: Data.Serialize.Serialize a). @ (Text.PrettyPrint.Annotated.HughesPJ.Doc a) (Language.Fixpoint.Types.Errors.$fSerializeDoc0_$cput @ a $dSerialize) (Language.Fixpoint.Types.Errors.$fSerializeDoc0_$cget @ a $dSerialize) -} c0bd4e1e2dfdb3a6ddab38c721be07e9 $fSerializeDoc0_$cget :: Data.Serialize.Serialize a => Data.Serialize.Get.Get (Text.PrettyPrint.Annotated.HughesPJ.Doc a) {- Arity: 6, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Errors.$fSerializeDoc6 `cast` (forall (a :: <*>_N). _R ->_R Sym (Data.Serialize.Get.N:Get[0] _R)) -} 538252496ef8596fce5fdbaf613b3b5f $fSerializeDoc0_$cput :: Data.Serialize.Serialize a => Data.Serialize.Put.Putter (Text.PrettyPrint.Annotated.HughesPJ.Doc a) {- Arity: 2, Strictness: m, Inline: INLINE[0], Unfolding: InlineRule (2, True, False) (\ @ a (w :: Data.Serialize.Serialize a) (w1 :: Text.PrettyPrint.Annotated.HughesPJ.Doc a) -> case Language.Fixpoint.Types.Errors.$w$cput1 @ a w w1 of ww { (#,#) ww1 ww2 -> (Data.Serialize.Put.PairS @ () ww1 ww2) `cast` (Sym (Data.Serialize.Put.N:PutM[0]) <()>_N) }) -} 64ca941e495bf7f38572fd1060a9ca3d $fSerializeDoc1 :: Data.Serialize.Get.Input -> Data.Serialize.Get.Buffer -> Data.Serialize.Get.More -> Data.Serialize.Get.Failure r -> Data.Serialize.Get.Success Text.PrettyPrint.HughesPJ.Doc r -> Data.Serialize.Get.Result r {- Arity: 5, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (5, True, False) (\ @ r (w :: Data.Serialize.Get.Input) (w1 :: Data.Serialize.Get.Buffer) (w2 :: Data.Serialize.Get.More) (w3 :: Data.Serialize.Get.Failure r) (w4 :: Data.Serialize.Get.Success Text.PrettyPrint.HughesPJ.Doc r) -> case w of ww { Data.ByteString.Internal.PS ww1 ww2 ww3 ww4 -> Language.Fixpoint.Types.Errors.$w$cget2 @ r ww1 ww2 ww3 ww4 w1 w2 w3 w4 }) -} b0c34702d32b012edfffecd395cde37a $fSerializeDoc2 :: Data.Serialize.GSerializePut (GHC.Generics.D1 ('GHC.Generics.MetaData "Doc" "Text.PrettyPrint.HughesPJ" "pretty-1.1.3.3" 'GHC.Types.True) (GHC.Generics.C1 ('GHC.Generics.MetaCons "Doc" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Text.PrettyPrint.Annotated.HughesPJ.Doc ()))))) {- Arity: 1, Strictness: m, Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Errors.$fSerializeDoc3 `cast` (Sym (Data.Serialize.N:GSerializePut[0] _N)) -} 8a1947e9a4b62f9ed0dfe2e7fe0590b5 $fSerializeDoc3 :: GHC.Generics.M1 GHC.Generics.D ('GHC.Generics.MetaData "Doc" "Text.PrettyPrint.HughesPJ" "pretty-1.1.3.3" 'GHC.Types.True) (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Doc" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Text.PrettyPrint.Annotated.HughesPJ.Doc ())))) a1 -> Data.Serialize.Put.Put {- Arity: 1, Strictness: m, Unfolding: InlineRule (1, True, True) (\ @ a1 (x :: GHC.Generics.M1 GHC.Generics.D ('GHC.Generics.MetaData "Doc" "Text.PrettyPrint.HughesPJ" "pretty-1.1.3.3" 'GHC.Types.True) (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Doc" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Text.PrettyPrint.Annotated.HughesPJ.Doc ())))) a1) -> Language.Fixpoint.Types.Errors.$fSerializeDoc_$s$cput x `cast` (Trans (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaData "Doc" "Text.PrettyPrint.HughesPJ" "pretty-1.1.3.3" 'GHC.Types.True>_P _R) (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "Doc" 'GHC.Generics.PrefixI 'GHC.Types.False>_P _R) (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy>_P _R)) _N) (GHC.Generics.N:K1[0] _P _R _P))) -} 69215f36e8912f4a1c6d6e0e35cddd49 $fSerializeDoc4 :: (GHC.Generics.:+:) ((GHC.Generics.C1 ('GHC.Generics.MetaCons "Empty" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1 GHC.Generics.:+: GHC.Generics.C1 ('GHC.Generics.MetaCons "NilAbove" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Text.PrettyPrint.Annotated.HughesPJ.Doc ())))) GHC.Generics.:+: (GHC.Generics.C1 ('GHC.Generics.MetaCons "TextBeside" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict) (GHC.Generics.Rec0 (Text.PrettyPrint.Annotated.HughesPJ.AnnotDetails ())) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Text.PrettyPrint.Annotated.HughesPJ.Doc ()))) GHC.Generics.:+: GHC.Generics.C1 ('GHC.Generics.MetaCons "Nest" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.SourceUnpack 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedUnpack) (GHC.Generics.Rec0 GHC.Types.Int) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Text.PrettyPrint.Annotated.HughesPJ.Doc ()))))) ((GHC.Generics.C1 ('GHC.Generics.MetaCons "Union" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Text.PrettyPrint.Annotated.HughesPJ.Doc ())) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Text.PrettyPrint.Annotated.HughesPJ.Doc ()))) GHC.Generics.:+: GHC.Generics.C1 ('GHC.Generics.MetaCons "NoDoc" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1) GHC.Generics.:+: (GHC.Generics.C1 ('GHC.Generics.MetaCons "Beside" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Text.PrettyPrint.Annotated.HughesPJ.Doc ())) GHC.Generics.:*: (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 GHC.Types.Bool) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Text.PrettyPrint.Annotated.HughesPJ.Doc ())))) GHC.Generics.:+: GHC.Generics.C1 ('GHC.Generics.MetaCons "Above" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Text.PrettyPrint.Annotated.HughesPJ.Doc ())) GHC.Generics.:*: (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 GHC.Types.Bool) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Text.PrettyPrint.Annotated.HughesPJ.Doc ())))))) a1 -> Data.Serialize.Put.Put {- Arity: 1, Strictness: m, Inline: INLINE[0], Unfolding: InlineRule (1, True, False) (\ @ a1 (w :: (GHC.Generics.:+:) ((GHC.Generics.C1 ('GHC.Generics.MetaCons "Empty" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1 GHC.Generics.:+: GHC.Generics.C1 ('GHC.Generics.MetaCons "NilAbove" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Text.PrettyPrint.Annotated.HughesPJ.Doc ())))) GHC.Generics.:+: (GHC.Generics.C1 ('GHC.Generics.MetaCons "TextBeside" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict) (GHC.Generics.Rec0 (Text.PrettyPrint.Annotated.HughesPJ.AnnotDetails ())) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Text.PrettyPrint.Annotated.HughesPJ.Doc ()))) GHC.Generics.:+: GHC.Generics.C1 ('GHC.Generics.MetaCons "Nest" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.SourceUnpack 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedUnpack) (GHC.Generics.Rec0 GHC.Types.Int) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Text.PrettyPrint.Annotated.HughesPJ.Doc ()))))) ((GHC.Generics.C1 ('GHC.Generics.MetaCons "Union" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Text.PrettyPrint.Annotated.HughesPJ.Doc ())) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Text.PrettyPrint.Annotated.HughesPJ.Doc ()))) GHC.Generics.:+: GHC.Generics.C1 ('GHC.Generics.MetaCons "NoDoc" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1) GHC.Generics.:+: (GHC.Generics.C1 ('GHC.Generics.MetaCons "Beside" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Text.PrettyPrint.Annotated.HughesPJ.Doc ())) GHC.Generics.:*: (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 GHC.Types.Bool) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Text.PrettyPrint.Annotated.HughesPJ.Doc ())))) GHC.Generics.:+: GHC.Generics.C1 ('GHC.Generics.MetaCons "Above" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Text.PrettyPrint.Annotated.HughesPJ.Doc ())) GHC.Generics.:*: (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 GHC.Types.Bool) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Text.PrettyPrint.Annotated.HughesPJ.Doc ())))))) a1) -> case Language.Fixpoint.Types.Errors.$wlvl2 @ a1 w of ww { (#,#) ww1 ww2 -> (Data.Serialize.Put.PairS @ () ww1 ww2) `cast` (Sym (Data.Serialize.Put.N:PutM[0]) <()>_N) }) -} b7a5e3ba3b459c0f701cf1e7bfe3456f $fSerializeDoc6 :: Data.Serialize.Serialize a => forall r. Data.Serialize.Get.Input -> Data.Serialize.Get.Buffer -> Data.Serialize.Get.More -> Data.Serialize.Get.Failure r -> Data.Serialize.Get.Success (Text.PrettyPrint.Annotated.HughesPJ.Doc a) r -> Data.Serialize.Get.Result r {- Arity: 6, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (6, True, False) (\ @ a (w :: Data.Serialize.Serialize a) @ r (w1 :: Data.Serialize.Get.Input) (w2 :: Data.Serialize.Get.Buffer) (w3 :: Data.Serialize.Get.More) (w4 :: Data.Serialize.Get.Failure r) (w5 :: Data.Serialize.Get.Success (Text.PrettyPrint.Annotated.HughesPJ.Doc a) r) -> case w1 of ww { Data.ByteString.Internal.PS ww1 ww2 ww3 ww4 -> Language.Fixpoint.Types.Errors.$w$cget3 @ a w @ r ww1 ww2 ww3 ww4 w2 w3 w4 w5 }) -} 1c0e43313b4bd7234381bc062327291e $fSerializeDoc_$cget :: Data.Serialize.Get.Get Text.PrettyPrint.HughesPJ.Doc {- Arity: 5, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Errors.$fSerializeDoc1 `cast` (Sym (Data.Serialize.Get.N:Get[0] _R)) -} ba0254df34a24664b48e9dc94aaa66d8 $fSerializeDoc_$s$cput :: Data.Serialize.Put.Putter (Text.PrettyPrint.Annotated.HughesPJ.Doc ()) {- Arity: 1, Strictness: m, Unfolding: InlineRule (1, True, False) (\ (eta :: Text.PrettyPrint.Annotated.HughesPJ.Doc ()) -> Language.Fixpoint.Types.Errors.$fSerializeDoc4 @ GHC.Prim.Any (Text.PrettyPrint.Annotated.HughesPJ.$fGenericDoc1 @ () @ GHC.Prim.Any eta)) -} d0b0d8ce186cdafd00e24afc0aacaf49 $fSerializeDoc_$s$dmput :: Data.Serialize.Put.Putter Text.PrettyPrint.HughesPJ.Doc {- Arity: 1, Strictness: m, Unfolding: InlineRule (-3, True, False) (\ (eta :: Text.PrettyPrint.HughesPJ.Doc) -> Language.Fixpoint.Types.Errors.$fSerializeDoc2 `cast` (Data.Serialize.N:GSerializePut[0] (Sym (Text.PrettyPrint.HughesPJ.Rep_Doc[0]))) @ GHC.Prim.Any (Text.PrettyPrint.HughesPJ.$fGenericDoc_$cfrom @ GHC.Prim.Any eta)) -} d0173fd74c0fa26b5149cb3e367aede0 $fSerializeError :: Data.Serialize.Serialize Language.Fixpoint.Types.Errors.Error DFunId {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Errors.Error Language.Fixpoint.Types.Errors.$fSerializeError_$s$dmput Language.Fixpoint.Types.Errors.$fSerializeError_$cget -} af80a035f9731b203491b28daa7a8cc7 $fSerializeError1 :: Data.Serialize.Serialize Language.Fixpoint.Types.Errors.Error1 DFunId {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Errors.Error1 Language.Fixpoint.Types.Errors.$fSerializeError1_$s$dmput Language.Fixpoint.Types.Errors.$fSerializeError1_$cget -} af80a035f9731b203491b28daa7a8cc7 $fSerializeError1_$cget :: Data.Serialize.Get.Get Language.Fixpoint.Types.Errors.Error1 {- Arity: 5, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Errors.$fSerializeError3 `cast` (Sym (Data.Serialize.Get.N:Get[0] _R)) -} af80a035f9731b203491b28daa7a8cc7 $fSerializeError1_$s$dmput :: Data.Serialize.Put.Putter Language.Fixpoint.Types.Errors.Error1 {- Arity: 1, Strictness: m, Unfolding: InlineRule (-3, True, False) (\ (eta :: Language.Fixpoint.Types.Errors.Error1) -> Language.Fixpoint.Types.Errors.$fSerializeError6 `cast` (Data.Serialize.N:GSerializePut[0] (Sym (Language.Fixpoint.Types.Errors.Rep_Error1[0]))) @ GHC.Prim.Any (Language.Fixpoint.Types.Errors.$fGenericError1_$cfrom @ GHC.Prim.Any eta)) -} d0173fd74c0fa26b5149cb3e367aede0 $fSerializeError2 :: Data.Serialize.Get.Input -> Data.Serialize.Get.Buffer -> Data.Serialize.Get.More -> Data.Serialize.Get.Failure r -> Data.Serialize.Get.Success Language.Fixpoint.Types.Errors.Error r -> Data.Serialize.Get.Result r {- Arity: 5, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (5, True, False) (\ @ r (w :: Data.Serialize.Get.Input) (w1 :: Data.Serialize.Get.Buffer) (w2 :: Data.Serialize.Get.More) (w3 :: Data.Serialize.Get.Failure r) (w4 :: Data.Serialize.Get.Success Language.Fixpoint.Types.Errors.Error r) -> case w of ww { Data.ByteString.Internal.PS ww1 ww2 ww3 ww4 -> Language.Fixpoint.Types.Errors.$w$cget4 @ r ww1 ww2 ww3 ww4 w1 w2 w3 w4 }) -} af80a035f9731b203491b28daa7a8cc7 $fSerializeError3 :: Data.Serialize.Get.Input -> Data.Serialize.Get.Buffer -> Data.Serialize.Get.More -> Data.Serialize.Get.Failure r -> Data.Serialize.Get.Success Language.Fixpoint.Types.Errors.Error1 r -> Data.Serialize.Get.Result r {- Arity: 5, Strictness: , Unfolding: (\ @ r (eta :: Data.Serialize.Get.Input) (eta1 :: Data.Serialize.Get.Buffer) (eta2 :: Data.Serialize.Get.More) (eta3 :: Data.Serialize.Get.Failure r) (eta4 :: Data.Serialize.Get.Success Language.Fixpoint.Types.Errors.Error1 r) -> Language.Fixpoint.Types.Spans.$fSerializeSrcSpan1 @ r eta eta1 eta2 eta3 (\ (s1 :: Data.Serialize.Get.Input) (b1 :: Data.Serialize.Get.Buffer)[OneShot] (m1 :: Data.Serialize.Get.More)[OneShot] (a1 :: Language.Fixpoint.Types.Spans.SrcSpan)[OneShot] -> case s1 of ww { Data.ByteString.Internal.PS ww1 ww2 ww3 ww4 -> Language.Fixpoint.Types.Errors.$w$s$cget1 @ r ww1 ww2 ww3 ww4 b1 m1 eta3 (\ (s2 :: Data.Serialize.Get.Input) (b2 :: Data.Serialize.Get.Buffer)[OneShot] (m2 :: Data.Serialize.Get.More)[OneShot] (a2 :: Text.PrettyPrint.Annotated.HughesPJ.Doc ())[OneShot] -> eta4 s2 b2 m2 (Language.Fixpoint.Types.Errors.Error1 a1 a2 `cast` (Sym (Text.PrettyPrint.HughesPJ.N:Doc[0])))) })) -} 62d78a211b2edf59350432d043cb2f0d $fSerializeError4 :: Data.Serialize.GSerializePut (GHC.Generics.D1 ('GHC.Generics.MetaData "Error" "Language.Fixpoint.Types.Errors" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.True) (GHC.Generics.C1 ('GHC.Generics.MetaCons "Error" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 [Language.Fixpoint.Types.Errors.Error1])))) {- Arity: 1, Strictness: m, Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Errors.$fSerializeError5 `cast` (Sym (Data.Serialize.N:GSerializePut[0] _N)) -} 230470833f412500a36162e0b00a40f6 $fSerializeError5 :: GHC.Generics.M1 GHC.Generics.D ('GHC.Generics.MetaData "Error" "Language.Fixpoint.Types.Errors" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.True) (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Error" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 [Language.Fixpoint.Types.Errors.Error1]))) a1 -> Data.Serialize.Put.Put {- Arity: 1, Strictness: m, Unfolding: InlineRule (1, True, False) (\ @ a1 (x :: GHC.Generics.M1 GHC.Generics.D ('GHC.Generics.MetaData "Error" "Language.Fixpoint.Types.Errors" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.True) (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Error" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 [Language.Fixpoint.Types.Errors.Error1]))) a1) -> case Data.Serialize.$w$cput28 @ Language.Fixpoint.Types.Errors.Error1 Language.Fixpoint.Types.Errors.$fSerializeError1 x `cast` (Trans (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaData "Error" "Language.Fixpoint.Types.Errors" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.True>_P _R) (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "Error" 'GHC.Generics.PrefixI 'GHC.Types.False>_P _R) (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy>_P _R)) _N) (GHC.Generics.N:K1[0] _P <[Language.Fixpoint.Types.Errors.Error1]>_R _P)) of ww { (#,#) ww1 ww2 -> (Data.Serialize.Put.PairS @ () ww1 ww2) `cast` (Sym (Data.Serialize.Put.N:PutM[0]) <()>_N) }) -} f5f80f943794c86192e1ebf88db14c7b $fSerializeError6 :: Data.Serialize.GSerializePut (GHC.Generics.D1 ('GHC.Generics.MetaData "Error1" "Language.Fixpoint.Types.Errors" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.False) (GHC.Generics.C1 ('GHC.Generics.MetaCons "Error1" 'GHC.Generics.PrefixI 'GHC.Types.True) (GHC.Generics.S1 ('GHC.Generics.MetaSel ('GHC.Base.Just "errLoc") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 Language.Fixpoint.Types.Spans.SrcSpan) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel ('GHC.Base.Just "errMsg") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 Text.PrettyPrint.HughesPJ.Doc)))) {- Arity: 1, Strictness: m, Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Errors.$fSerializeError7 `cast` (Trans (forall (a1 :: <*>_N). Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaData "Error1" "Language.Fixpoint.Types.Errors" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.False>_P _R) _N ->_R _R) (Sym (Data.Serialize.N:GSerializePut[0] _N))) -} fcec7ce0c5a974069cf904e198707a26 $fSerializeError7 :: GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Error1" 'GHC.Generics.PrefixI 'GHC.Types.True) (GHC.Generics.S1 ('GHC.Generics.MetaSel ('GHC.Base.Just "errLoc") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 Language.Fixpoint.Types.Spans.SrcSpan) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel ('GHC.Base.Just "errMsg") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 Text.PrettyPrint.HughesPJ.Doc)) a1 -> Data.Serialize.Put.Put {- Arity: 1, Strictness: m, Inline: INLINE[0], Unfolding: InlineRule (1, True, False) (\ @ a1 (w :: GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Error1" 'GHC.Generics.PrefixI 'GHC.Types.True) (GHC.Generics.S1 ('GHC.Generics.MetaSel ('GHC.Base.Just "errLoc") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 Language.Fixpoint.Types.Spans.SrcSpan) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel ('GHC.Base.Just "errMsg") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 Text.PrettyPrint.HughesPJ.Doc)) a1) -> case w `cast` (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "Error1" 'GHC.Generics.PrefixI 'GHC.Types.True>_P _R _N) of ww { GHC.Generics.:*: ww1 ww2 -> case Language.Fixpoint.Types.Errors.$w$dGSerializePut1 @ a1 ww1 ww2 of ww3 { (#,#) ww4 ww5 -> (Data.Serialize.Put.PairS @ () ww4 ww5) `cast` (Sym (Data.Serialize.Put.N:PutM[0]) <()>_N) } }) -} d0173fd74c0fa26b5149cb3e367aede0 $fSerializeError_$cget :: Data.Serialize.Get.Get Language.Fixpoint.Types.Errors.Error {- Arity: 5, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Errors.$fSerializeError2 `cast` (Sym (Data.Serialize.Get.N:Get[0] _R)) -} d0173fd74c0fa26b5149cb3e367aede0 $fSerializeError_$s$dmput :: Data.Serialize.Put.Putter Language.Fixpoint.Types.Errors.Error {- Arity: 1, Strictness: m, Unfolding: InlineRule (-3, True, False) (\ (eta :: Language.Fixpoint.Types.Errors.Error) -> Language.Fixpoint.Types.Errors.$fSerializeError4 `cast` (Data.Serialize.N:GSerializePut[0] (Sym (Language.Fixpoint.Types.Errors.Rep_Error[0]))) @ GHC.Prim.Any (Language.Fixpoint.Types.Errors.$fGenericError_$cfrom @ GHC.Prim.Any eta)) -} d0173fd74c0fa26b5149cb3e367aede0 $fSerializeFixResult :: Data.Serialize.Serialize (Language.Fixpoint.Types.Errors.FixResult Language.Fixpoint.Types.Errors.Error) DFunId {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ (Language.Fixpoint.Types.Errors.FixResult Language.Fixpoint.Types.Errors.Error) Language.Fixpoint.Types.Errors.$fSerializeFixResult_$s$dmput Language.Fixpoint.Types.Errors.$fSerializeFixResult_$cget -} d0173fd74c0fa26b5149cb3e367aede0 $fSerializeFixResult1 :: Data.Serialize.Get.Input -> Data.Serialize.Get.Buffer -> Data.Serialize.Get.More -> Data.Serialize.Get.Failure r -> Data.Serialize.Get.Success (Language.Fixpoint.Types.Errors.FixResult Language.Fixpoint.Types.Errors.Error) r -> Data.Serialize.Get.Result r {- Arity: 5, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (5, True, False) (\ @ r (w :: Data.Serialize.Get.Input) (w1 :: Data.Serialize.Get.Buffer) (w2 :: Data.Serialize.Get.More) (w3 :: Data.Serialize.Get.Failure r) (w4 :: Data.Serialize.Get.Success (Language.Fixpoint.Types.Errors.FixResult Language.Fixpoint.Types.Errors.Error) r) -> case w of ww { Data.ByteString.Internal.PS ww1 ww2 ww3 ww4 -> Language.Fixpoint.Types.Errors.$w$cget5 @ r ww1 ww2 ww3 ww4 w1 w2 w3 w4 }) -} d0173fd74c0fa26b5149cb3e367aede0 $fSerializeFixResult2 :: Data.Serialize.GSerializePut (GHC.Generics.D1 ('GHC.Generics.MetaData "FixResult" "Language.Fixpoint.Types.Errors" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.False) (GHC.Generics.C1 ('GHC.Generics.MetaCons "Crash" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 [Language.Fixpoint.Types.Errors.Error]) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 GHC.Base.String)) GHC.Generics.:+: (GHC.Generics.C1 ('GHC.Generics.MetaCons "Safe" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1 GHC.Generics.:+: GHC.Generics.C1 ('GHC.Generics.MetaCons "Unsafe" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict) (GHC.Generics.Rec0 [Language.Fixpoint.Types.Errors.Error]))))) {- Arity: 1, Strictness: m, Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Errors.$fSerializeFixResult3 `cast` (Trans (forall (a1 :: <*>_N). Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaData "FixResult" "Language.Fixpoint.Types.Errors" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.False>_P _R) _N ->_R _R) (Sym (Data.Serialize.N:GSerializePut[0] _N))) -} d0173fd74c0fa26b5149cb3e367aede0 $fSerializeFixResult3 :: (GHC.Generics.:+:) (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Crash" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 [Language.Fixpoint.Types.Errors.Error]) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 GHC.Base.String))) (GHC.Generics.C1 ('GHC.Generics.MetaCons "Safe" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1 GHC.Generics.:+: GHC.Generics.C1 ('GHC.Generics.MetaCons "Unsafe" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict) (GHC.Generics.Rec0 [Language.Fixpoint.Types.Errors.Error]))) a1 -> Data.Serialize.Put.Put {- Arity: 1, Strictness: m, Inline: INLINE[0], Unfolding: InlineRule (1, True, False) (\ @ a1 (w :: (GHC.Generics.:+:) (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Crash" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 [Language.Fixpoint.Types.Errors.Error]) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 GHC.Base.String))) (GHC.Generics.C1 ('GHC.Generics.MetaCons "Safe" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1 GHC.Generics.:+: GHC.Generics.C1 ('GHC.Generics.MetaCons "Unsafe" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict) (GHC.Generics.Rec0 [Language.Fixpoint.Types.Errors.Error]))) a1) -> case Language.Fixpoint.Types.Errors.$w$dGSerializePut2 @ a1 w of ww { (#,#) ww1 ww2 -> (Data.Serialize.Put.PairS @ () ww1 ww2) `cast` (Sym (Data.Serialize.Put.N:PutM[0]) <()>_N) }) -} 2803c4d1136fc9cbb596ca29e118f202 $fSerializeFixResult4 :: Data.ByteString.Builder.Internal.BuildStep r -> Data.ByteString.Builder.Internal.BufferRange -> GHC.Prim.State# GHC.Prim.RealWorld -> (# GHC.Prim.State# GHC.Prim.RealWorld, Data.ByteString.Builder.Internal.BuildSignal r #) {- Arity: 3, HasNoCafRefs, Unfolding: (\ @ r (eta :: Data.ByteString.Builder.Internal.BuildStep r) (eta1 :: Data.ByteString.Builder.Internal.BufferRange) (eta2 :: GHC.Prim.State# GHC.Prim.RealWorld)[OneShot] -> case eta1 of wild { Data.ByteString.Builder.Internal.BufferRange dt dt1 -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.<# (GHC.Prim.minusAddr# dt1 dt) 1#) of wild2 { GHC.Types.False -> case GHC.Prim.writeWord8OffAddr# @ GHC.Prim.RealWorld dt 0# 1## eta2 of s2 { DEFAULT -> (eta (Data.ByteString.Builder.Internal.BufferRange (GHC.Prim.plusAddr# dt 1#) dt1)) `cast` (GHC.Types.N:IO[0] _R) s2 } GHC.Types.True -> (# eta2, Data.ByteString.Builder.Internal.BufferFull @ r 1# dt (\ (ds :: Data.ByteString.Builder.Internal.BufferRange) (eta3 :: GHC.Prim.State# GHC.Prim.RealWorld)[OneShot] -> case ds of wild3 { Data.ByteString.Builder.Internal.BufferRange dt3 dt4 -> case GHC.Prim.writeWord8OffAddr# @ GHC.Prim.RealWorld dt3 0# 1## eta3 of s2 { DEFAULT -> (eta (Data.ByteString.Builder.Internal.BufferRange (GHC.Prim.plusAddr# dt3 1#) dt4)) `cast` (GHC.Types.N:IO[0] _R) s2 } }) `cast` (_R ->_R Sym (GHC.Types.N:IO[0] _R)) #) } }) -} d0173fd74c0fa26b5149cb3e367aede0 $fSerializeFixResult_$cget :: Data.Serialize.Get.Get (Language.Fixpoint.Types.Errors.FixResult Language.Fixpoint.Types.Errors.Error) {- Arity: 5, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Errors.$fSerializeFixResult1 `cast` (Sym (Data.Serialize.Get.N:Get[0] _R)) -} d0173fd74c0fa26b5149cb3e367aede0 $fSerializeFixResult_$s$dmput :: Data.Serialize.Put.Putter (Language.Fixpoint.Types.Errors.FixResult Language.Fixpoint.Types.Errors.Error) {- Arity: 1, Strictness: m, Unfolding: InlineRule (-3, True, False) (\ (eta :: Language.Fixpoint.Types.Errors.FixResult Language.Fixpoint.Types.Errors.Error) -> Language.Fixpoint.Types.Errors.$fSerializeFixResult2 `cast` (Data.Serialize.N:GSerializePut[0] (Sym (Language.Fixpoint.Types.Errors.Rep_FixResult[0] _N))) @ GHC.Prim.Any (Language.Fixpoint.Types.Errors.$fGenericFixResult_$cfrom @ Language.Fixpoint.Types.Errors.Error @ GHC.Prim.Any eta)) -} d5334340ebc141c9f62f25cf90a5884c $fSerializeTextDetails :: Data.Serialize.Serialize Text.PrettyPrint.Annotated.HughesPJ.TextDetails DFunId {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Text.PrettyPrint.Annotated.HughesPJ.TextDetails Language.Fixpoint.Types.Errors.$fSerializeTextDetails_$cput Language.Fixpoint.Types.Errors.$fSerializeTextDetails_$cget -} 069ea05220ba20c58b7d7742c7c650b4 $fSerializeTextDetails1 :: Data.Serialize.Get.Input -> Data.Serialize.Get.Buffer -> Data.Serialize.Get.More -> Data.Serialize.Get.Failure r -> Data.Serialize.Get.Success Text.PrettyPrint.Annotated.HughesPJ.TextDetails r -> Data.Serialize.Get.Result r {- Arity: 5, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (5, True, False) (\ @ r (w :: Data.Serialize.Get.Input) (w1 :: Data.Serialize.Get.Buffer) (w2 :: Data.Serialize.Get.More) (w3 :: Data.Serialize.Get.Failure r) (w4 :: Data.Serialize.Get.Success Text.PrettyPrint.Annotated.HughesPJ.TextDetails r) -> case w of ww { Data.ByteString.Internal.PS ww1 ww2 ww3 ww4 -> Language.Fixpoint.Types.Errors.$w$cget6 @ r ww1 ww2 ww3 ww4 w1 w2 w3 w4 }) -} 3915d2351b9afa393dc6878ed0fa4835 $fSerializeTextDetails_$cget :: Data.Serialize.Get.Get Text.PrettyPrint.Annotated.HughesPJ.TextDetails {- Arity: 5, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Errors.$fSerializeTextDetails1 `cast` (Sym (Data.Serialize.Get.N:Get[0] _R)) -} 4ed0ecf9c0d0411b6ff83425c2c0d215 $fSerializeTextDetails_$cput :: Data.Serialize.Put.Putter Text.PrettyPrint.Annotated.HughesPJ.TextDetails {- Arity: 1, Strictness: m, Inline: INLINE[0], Unfolding: InlineRule (1, True, False) (\ (w :: Text.PrettyPrint.Annotated.HughesPJ.TextDetails) -> case Language.Fixpoint.Types.Errors.$w$cput2 w of ww { (#,#) ww1 ww2 -> (Data.Serialize.Put.PairS @ () ww1 ww2) `cast` (Sym (Data.Serialize.Put.N:PutM[0]) <()>_N) }) -} d0173fd74c0fa26b5149cb3e367aede0 $fShowError :: GHC.Show.Show Language.Fixpoint.Types.Errors.Error DFunId {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Errors.Error Language.Fixpoint.Types.Errors.$fShowError_$cshowsPrec Language.Fixpoint.Types.Errors.$fExceptionError_$cshow Language.Fixpoint.Types.Errors.$fShowError_$cshowList -} af80a035f9731b203491b28daa7a8cc7 $fShowError1 :: GHC.Show.Show Language.Fixpoint.Types.Errors.Error1 DFunId {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Errors.Error1 Language.Fixpoint.Types.Errors.$fShowError1_$cshowsPrec Language.Fixpoint.Types.Errors.$fShowError1_$cshow Language.Fixpoint.Types.Errors.$fShowError1_$cshowList -} af80a035f9731b203491b28daa7a8cc7 $fShowError1_$cshow :: Language.Fixpoint.Types.Errors.Error1 -> GHC.Base.String {- Arity: 1, Strictness: , Unfolding: InlineRule (1, True, False) (\ (x :: Language.Fixpoint.Types.Errors.Error1) -> Language.Fixpoint.Types.Errors.$fShowError1_$cshowsPrec GHC.Show.shows22 x (GHC.Types.[] @ GHC.Types.Char)) -} af80a035f9731b203491b28daa7a8cc7 $fShowError1_$cshowList :: [Language.Fixpoint.Types.Errors.Error1] -> GHC.Show.ShowS {- Arity: 2, Unfolding: (GHC.Show.showList__ @ Language.Fixpoint.Types.Errors.Error1 Language.Fixpoint.Types.Errors.$fExceptionError1) -} af80a035f9731b203491b28daa7a8cc7 $fShowError1_$cshowsPrec :: GHC.Types.Int -> Language.Fixpoint.Types.Errors.Error1 -> GHC.Show.ShowS {- Arity: 3, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (3, True, False) (\ (w :: GHC.Types.Int) (w1 :: Language.Fixpoint.Types.Errors.Error1) (w2 :: GHC.Base.String) -> case w of ww { GHC.Types.I# ww1 -> case w1 of ww2 { Language.Fixpoint.Types.Errors.Error1 ww3 ww4 -> Language.Fixpoint.Types.Errors.$w$cshowsPrec ww1 ww3 ww4 w2 } }) -} d0173fd74c0fa26b5149cb3e367aede0 $fShowError2 :: Language.Fixpoint.Types.Errors.Error -> GHC.Show.ShowS {- Arity: 2, Unfolding: (\ (w :: Language.Fixpoint.Types.Errors.Error) (w1 :: GHC.Base.String) -> Language.Fixpoint.Types.Errors.$w$cshowsPrec1 0# w w1) -} d0173fd74c0fa26b5149cb3e367aede0 $fShowError_$cshowList :: [Language.Fixpoint.Types.Errors.Error] -> GHC.Show.ShowS {- Arity: 2, Unfolding: (GHC.Show.showList__ @ Language.Fixpoint.Types.Errors.Error Language.Fixpoint.Types.Errors.$fShowError2) -} d0173fd74c0fa26b5149cb3e367aede0 $fShowError_$cshowsPrec :: GHC.Types.Int -> Language.Fixpoint.Types.Errors.Error -> GHC.Show.ShowS {- Arity: 3, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (3, True, False) (\ (w :: GHC.Types.Int) (w1 :: Language.Fixpoint.Types.Errors.Error) (w2 :: GHC.Base.String) -> case w of ww { GHC.Types.I# ww1 -> Language.Fixpoint.Types.Errors.$w$cshowsPrec1 ww1 w1 w2 }) -} bbcb7910102e76dd87f9706483b3612e $fShowFixResult :: GHC.Show.Show a => GHC.Show.Show (Language.Fixpoint.Types.Errors.FixResult a) DFunId {- Arity: 1, Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun: @ a ($dShow :: GHC.Show.Show a). @ (Language.Fixpoint.Types.Errors.FixResult a) (Language.Fixpoint.Types.Errors.$fShowFixResult_$cshowsPrec @ a $dShow) (Language.Fixpoint.Types.Errors.$fShowFixResult_$cshow @ a $dShow) (Language.Fixpoint.Types.Errors.$fShowFixResult_$cshowList @ a $dShow) -} f182f57f36993ba944b5c9344b61d9c3 $fShowFixResult1 :: GHC.Show.ShowS {- Arity: 1, Unfolding: (GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Errors.$fExceptionFixResult3) -} a556674ba9dc3a88286702fb5c6b0c83 $fShowFixResult2 :: [GHC.Types.Char] {- Unfolding: (GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Errors.$fExceptionFixResult3 (GHC.Types.[] @ GHC.Types.Char)) -} bbcb7910102e76dd87f9706483b3612e $fShowFixResult_$cshow :: GHC.Show.Show a => Language.Fixpoint.Types.Errors.FixResult a -> GHC.Base.String {- Arity: 2, Strictness: , Unfolding: (\ @ a ($dShow :: GHC.Show.Show a) (x :: Language.Fixpoint.Types.Errors.FixResult a) -> case x of wild { Language.Fixpoint.Types.Errors.Crash b1 b2 -> GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Errors.$fExceptionFixResult5 (GHC.Show.showList @ a $dShow b1 (GHC.Types.: @ GHC.Types.Char GHC.Show.showSpace1 (GHC.Types.: @ GHC.Types.Char GHC.Show.shows6 (GHC.Show.showLitString b2 Language.Fixpoint.Types.Errors.$fExceptionFixResult4)))) Language.Fixpoint.Types.Errors.Safe -> Language.Fixpoint.Types.Errors.$fShowFixResult2 Language.Fixpoint.Types.Errors.Unsafe b1 -> GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Errors.$fExceptionFixResult2 (GHC.Show.showList @ a $dShow b1 (GHC.Types.[] @ GHC.Types.Char)) }) -} bbcb7910102e76dd87f9706483b3612e $fShowFixResult_$cshowList :: GHC.Show.Show a => [Language.Fixpoint.Types.Errors.FixResult a] -> GHC.Show.ShowS {- Arity: 3, Strictness: , Unfolding: InlineRule (3, True, False) (\ @ a ($dShow :: GHC.Show.Show a) (eta :: [Language.Fixpoint.Types.Errors.FixResult a]) (eta1 :: GHC.Base.String) -> GHC.Show.showList__ @ (Language.Fixpoint.Types.Errors.FixResult a) (Language.Fixpoint.Types.Errors.$fShowFixResult_$cshowsPrec @ a $dShow Language.Fixpoint.Types.Errors.$fDataFixResult3) eta eta1) -} bbcb7910102e76dd87f9706483b3612e $fShowFixResult_$cshowsPrec :: GHC.Show.Show a => GHC.Types.Int -> Language.Fixpoint.Types.Errors.FixResult a -> GHC.Show.ShowS {- Arity: 3, Strictness: , Unfolding: (\ @ a ($dShow :: GHC.Show.Show a) (a1 :: GHC.Types.Int) (ds :: Language.Fixpoint.Types.Errors.FixResult a) -> case ds of wild { Language.Fixpoint.Types.Errors.Crash b1 b2 -> case a1 of wild1 { GHC.Types.I# x -> let { f :: GHC.Base.String -> GHC.Base.String = GHC.Show.showList @ a $dShow b1 } in let { p :: GHC.Show.ShowS {- Arity: 1, Strictness: -} = \ (x1 :: GHC.Base.String) -> GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Errors.$fExceptionFixResult5 (f (GHC.Types.: @ GHC.Types.Char GHC.Show.showSpace1 (GHC.Types.: @ GHC.Types.Char GHC.Show.shows6 (GHC.Show.showLitString b2 (GHC.Types.: @ GHC.Types.Char GHC.Show.shows6 x1))))) } in case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.>=# x 11#) of wild2 { GHC.Types.False -> p GHC.Types.True -> \ (x1 :: GHC.Base.String) -> GHC.Types.: @ GHC.Types.Char GHC.Show.shows7 (p (GHC.Types.: @ GHC.Types.Char GHC.Show.shows4 x1)) } } Language.Fixpoint.Types.Errors.Safe -> Language.Fixpoint.Types.Errors.$fShowFixResult1 Language.Fixpoint.Types.Errors.Unsafe b1 -> case a1 of wild1 { GHC.Types.I# x -> let { g :: GHC.Base.String -> GHC.Base.String = GHC.Show.showList @ a $dShow b1 } in case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.>=# x 11#) of wild2 { GHC.Types.False -> \ (x1 :: GHC.Base.String) -> GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Errors.$fExceptionFixResult2 (g x1) GHC.Types.True -> \ (x1 :: GHC.Base.String) -> GHC.Types.: @ GHC.Types.Char GHC.Show.shows7 (GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Errors.$fExceptionFixResult2 (g (GHC.Types.: @ GHC.Types.Char GHC.Show.shows4 x1))) } } }) -} bbcb7910102e76dd87f9706483b3612e $fTraversableFixResult :: Data.Traversable.Traversable Language.Fixpoint.Types.Errors.FixResult DFunId {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Errors.FixResult Language.Fixpoint.Types.Errors.$fFunctorFixResult Language.Fixpoint.Types.Errors.$fFoldableFixResult Language.Fixpoint.Types.Errors.$fTraversableFixResult_$ctraverse Language.Fixpoint.Types.Errors.$fTraversableFixResult_$csequenceA Language.Fixpoint.Types.Errors.$fTraversableFixResult_$cmapM Language.Fixpoint.Types.Errors.$fTraversableFixResult_$csequence -} bbcb7910102e76dd87f9706483b3612e $fTraversableFixResult_$cmapM :: GHC.Base.Monad m => (a -> m b) -> Language.Fixpoint.Types.Errors.FixResult a -> m (Language.Fixpoint.Types.Errors.FixResult b) {- Arity: 3, HasNoCafRefs, Strictness: , Unfolding: InlineRule (3, True, False) (\ @ (m :: * -> *) @ a @ b ($dMonad :: GHC.Base.Monad m) (eta :: a -> m b) (eta1 :: Language.Fixpoint.Types.Errors.FixResult a) -> Language.Fixpoint.Types.Errors.$fTraversableFixResult_$ctraverse @ m @ a @ b (GHC.Base.$p1Monad @ m $dMonad) eta eta1) -} bbcb7910102e76dd87f9706483b3612e $fTraversableFixResult_$csequence :: GHC.Base.Monad m => Language.Fixpoint.Types.Errors.FixResult (m a) -> m (Language.Fixpoint.Types.Errors.FixResult a) {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: InlineRule (2, True, False) (\ @ (m :: * -> *) @ a ($dMonad :: GHC.Base.Monad m) (eta :: Language.Fixpoint.Types.Errors.FixResult (m a)) -> Language.Fixpoint.Types.Errors.$fTraversableFixResult_$ctraverse @ m @ (m a) @ a (GHC.Base.$p1Monad @ m $dMonad) (GHC.Base.id @ (m a)) eta) -} bbcb7910102e76dd87f9706483b3612e $fTraversableFixResult_$csequenceA :: GHC.Base.Applicative f => Language.Fixpoint.Types.Errors.FixResult (f a) -> f (Language.Fixpoint.Types.Errors.FixResult a) {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: InlineRule (1, True, False) (\ @ (f :: * -> *) @ a ($dApplicative :: GHC.Base.Applicative f) (eta :: Language.Fixpoint.Types.Errors.FixResult (f a)) -> Language.Fixpoint.Types.Errors.$fTraversableFixResult_$ctraverse @ f @ (f a) @ a $dApplicative (GHC.Base.id @ (f a)) eta) -} bbcb7910102e76dd87f9706483b3612e $fTraversableFixResult_$ctraverse :: GHC.Base.Applicative f => (a -> f b) -> Language.Fixpoint.Types.Errors.FixResult a -> f (Language.Fixpoint.Types.Errors.FixResult b) {- Arity: 3, HasNoCafRefs, Strictness: , Unfolding: (\ @ (f :: * -> *) @ a @ b ($dApplicative :: GHC.Base.Applicative f) (eta :: a -> f b) (eta1 :: Language.Fixpoint.Types.Errors.FixResult a) -> case eta1 of wild { Language.Fixpoint.Types.Errors.Crash a1 a2 -> GHC.Base.fmap @ f (GHC.Base.$p1Applicative @ f $dApplicative) @ [b] @ (Language.Fixpoint.Types.Errors.FixResult b) (\ (b1 :: [b]) -> Language.Fixpoint.Types.Errors.Crash @ b b1 a2) (let { $dFunctor :: GHC.Base.Functor f = GHC.Base.$p1Applicative @ f $dApplicative } in let { z :: f [b] = GHC.Base.pure @ f $dApplicative @ [b] (GHC.Types.[] @ b) } in letrec { go :: [a] -> f [b] {- Arity: 1, Strictness: -} = \ (ds :: [a]) -> case ds of wild1 { [] -> z : y ys -> GHC.Base.<*> @ f $dApplicative @ [b] @ [b] (GHC.Base.fmap @ f $dFunctor @ b @ ([b] -> [b]) (GHC.Types.: @ b) (eta y)) (go ys) } } in go a1) Language.Fixpoint.Types.Errors.Safe -> GHC.Base.pure @ f $dApplicative @ (Language.Fixpoint.Types.Errors.FixResult b) (Language.Fixpoint.Types.Errors.Safe @ b) Language.Fixpoint.Types.Errors.Unsafe a1 -> GHC.Base.fmap @ f (GHC.Base.$p1Applicative @ f $dApplicative) @ [b] @ (Language.Fixpoint.Types.Errors.FixResult b) (Language.Fixpoint.Types.Errors.$WUnsafe @ b) (let { $dFunctor :: GHC.Base.Functor f = GHC.Base.$p1Applicative @ f $dApplicative } in let { z :: f [b] = GHC.Base.pure @ f $dApplicative @ [b] (GHC.Types.[] @ b) } in letrec { go :: [a] -> f [b] {- Arity: 1, Strictness: -} = \ (ds :: [a]) -> case ds of wild1 { [] -> z : y ys -> GHC.Base.<*> @ f $dApplicative @ [b] @ [b] (GHC.Base.fmap @ f $dFunctor @ b @ ([b] -> [b]) (GHC.Types.: @ b) (eta y)) (go ys) } } in go a1) }) -} b5cc72f656122ff5315a22b36f7b0b42 $t1UFU5oZ4U0l5IUwxNr3Y0y :: Data.Data.DataType {- Strictness: m, Unfolding: (Data.Data.DataType Language.Fixpoint.Types.Errors.$fDataFixResult14 Language.Fixpoint.Types.Errors.$fDataFixResult10) -} c2d087f7431537265c73652babb1aafd $tc'Crash :: GHC.Types.TyCon {- HasNoCafRefs, Strictness: m, Unfolding: (GHC.Types.TyCon 4844711504738049597## 5524499073202752723## Language.Fixpoint.Types.Errors.$trModule Language.Fixpoint.Types.Errors.$tc'Crash1) -} 876737dc3682efdc6f755b209351b8fe $tc'Crash1 :: GHC.Types.TrName {- HasNoCafRefs, Strictness: m1, Unfolding: (GHC.Types.TrNameS "'Crash"#) -} a919889b451ad8421a3d96d9bcafd8c2 $tc'Error :: GHC.Types.TyCon {- HasNoCafRefs, Strictness: m, Unfolding: (GHC.Types.TyCon 2899795453813553520## 1978355670435394513## Language.Fixpoint.Types.Errors.$trModule Language.Fixpoint.Types.Errors.$tc'Error2) -} 778f48a5d1b12166503690f8afe296f8 $tc'Error1 :: GHC.Types.TyCon {- HasNoCafRefs, Strictness: m, Unfolding: (GHC.Types.TyCon 4114379777362511032## 6441751259590954878## Language.Fixpoint.Types.Errors.$trModule Language.Fixpoint.Types.Errors.$tc'Error3) -} 333b2198df46e314f72f2d31425bf19b $tc'Error2 :: GHC.Types.TrName {- HasNoCafRefs, Strictness: m1, Unfolding: (GHC.Types.TrNameS "'Error"#) -} a1cdaf1d4acf66cc2d8b9d2528c49d31 $tc'Error3 :: GHC.Types.TrName {- HasNoCafRefs, Strictness: m1, Unfolding: (GHC.Types.TrNameS "'Error1"#) -} 14c0dc3fc86558a563ea5872b75aeb1c $tc'Safe :: GHC.Types.TyCon {- HasNoCafRefs, Strictness: m, Unfolding: (GHC.Types.TyCon 14226102180625162793## 4599836222943054196## Language.Fixpoint.Types.Errors.$trModule Language.Fixpoint.Types.Errors.$tc'Safe1) -} c16dec169b25bc3049183f586b02f1e9 $tc'Safe1 :: GHC.Types.TrName {- HasNoCafRefs, Strictness: m1, Unfolding: (GHC.Types.TrNameS "'Safe"#) -} 4536afc837363b3de635e14ef1f39cb1 $tc'Unsafe :: GHC.Types.TyCon {- HasNoCafRefs, Strictness: m, Unfolding: (GHC.Types.TyCon 10971340890455313828## 6924385659345639542## Language.Fixpoint.Types.Errors.$trModule Language.Fixpoint.Types.Errors.$tc'Unsafe1) -} 8000de9e607fe86c9eab5d8cc319f03c $tc'Unsafe1 :: GHC.Types.TrName {- HasNoCafRefs, Strictness: m1, Unfolding: (GHC.Types.TrNameS "'Unsafe"#) -} 13d800464b3ec5340d4ca88a8226ebea $tcError :: GHC.Types.TyCon {- HasNoCafRefs, Strictness: m, Unfolding: (GHC.Types.TyCon 5573639981624302606## 15596646033556386062## Language.Fixpoint.Types.Errors.$trModule Language.Fixpoint.Types.Errors.$tcError2) -} 77757999522213990d482ccd7ed48465 $tcError1 :: GHC.Types.TyCon {- HasNoCafRefs, Strictness: m, Unfolding: (GHC.Types.TyCon 9143590400432396860## 6696380685385156329## Language.Fixpoint.Types.Errors.$trModule Language.Fixpoint.Types.Errors.$tcError3) -} 7a346f0f9fbcb237335410af48db86e7 $tcError2 :: GHC.Types.TrName {- HasNoCafRefs, Strictness: m1, Unfolding: (GHC.Types.TrNameS "Error"#) -} dfef48873986c537788b079463080979 $tcError3 :: GHC.Types.TrName {- HasNoCafRefs, Strictness: m1, Unfolding: (GHC.Types.TrNameS "Error1"#) -} 41d3893b27f66522c98d1c57190cc2cd $tcFixResult :: GHC.Types.TyCon {- HasNoCafRefs, Strictness: m, Unfolding: (GHC.Types.TyCon 5355333826724544256## 5408947706589206649## Language.Fixpoint.Types.Errors.$trModule Language.Fixpoint.Types.Errors.$tcFixResult1) -} 3001a32003d31362ee6885721d843f1c $tcFixResult1 :: GHC.Types.TrName {- HasNoCafRefs, Strictness: m1, Unfolding: (GHC.Types.TrNameS "FixResult"#) -} 9d5c928897bd328a772dae834d22525f $trModule :: GHC.Types.Module {- HasNoCafRefs, Strictness: m, Unfolding: (GHC.Types.Module Language.Fixpoint.Types.Errors.$trModule2 Language.Fixpoint.Types.Errors.$trModule1) -} a38cc42aeb6930d93d7b9d2fa7e75e07 $trModule1 :: GHC.Types.TrName {- HasNoCafRefs, Strictness: m1, Unfolding: (GHC.Types.TrNameS "Language.Fixpoint.Types.Errors"#) -} 3841ee7d5f28367324ae6f9c7dc5ba4b $trModule2 :: GHC.Types.TrName {- HasNoCafRefs, Strictness: m1, Unfolding: (GHC.Types.TrNameS "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf"#) -} a530112ca8aac5017f1c5d2fa6b555bb $w$c/= :: Text.Parsec.Pos.SourceName -> GHC.Prim.Int# -> GHC.Prim.Int# -> Text.Parsec.Pos.SourceName -> GHC.Prim.Int# -> GHC.Prim.Int# -> Text.PrettyPrint.HughesPJ.Doc -> Text.Parsec.Pos.SourceName -> GHC.Prim.Int# -> GHC.Prim.Int# -> Text.Parsec.Pos.SourceName -> GHC.Prim.Int# -> GHC.Prim.Int# -> Text.PrettyPrint.HughesPJ.Doc -> GHC.Types.Bool {- Arity: 14, Strictness: , Inline: [0], Unfolding: (\ (ww :: Text.Parsec.Pos.SourceName) (ww1 :: GHC.Prim.Int#) (ww2 :: GHC.Prim.Int#) (ww3 :: Text.Parsec.Pos.SourceName) (ww4 :: GHC.Prim.Int#) (ww5 :: GHC.Prim.Int#) (ww6 :: Text.PrettyPrint.HughesPJ.Doc) (ww7 :: Text.Parsec.Pos.SourceName) (ww8 :: GHC.Prim.Int#) (ww9 :: GHC.Prim.Int#) (ww10 :: Text.Parsec.Pos.SourceName) (ww11 :: GHC.Prim.Int#) (ww12 :: GHC.Prim.Int#) (ww13 :: Text.PrettyPrint.HughesPJ.Doc) -> case GHC.Base.eqString ww ww7 of wild { GHC.Types.False -> GHC.Types.True GHC.Types.True -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww1 ww8) of wild1 { GHC.Types.False -> GHC.Types.True GHC.Types.True -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww2 ww9) of wild2 { GHC.Types.False -> GHC.Types.True GHC.Types.True -> case GHC.Base.eqString ww3 ww10 of wild4 { GHC.Types.False -> GHC.Types.True GHC.Types.True -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww4 ww11) of wild5 { GHC.Types.False -> GHC.Types.True GHC.Types.True -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww5 ww12) of wild6 { GHC.Types.False -> GHC.Types.True GHC.Types.True -> case Text.PrettyPrint.HughesPJ.$fEqDoc_$c== ww6 ww13 of wild7 { GHC.Types.False -> GHC.Types.True GHC.Types.True -> GHC.Types.False } } } } } } }) -} e8903fca879977b81e7d412ae88bfeee $w$c< :: Text.Parsec.Pos.SourceName -> GHC.Prim.Int# -> GHC.Prim.Int# -> Text.Parsec.Pos.SourceName -> GHC.Prim.Int# -> GHC.Prim.Int# -> Text.Parsec.Pos.SourceName -> GHC.Prim.Int# -> GHC.Prim.Int# -> Text.Parsec.Pos.SourceName -> GHC.Prim.Int# -> GHC.Prim.Int# -> GHC.Types.Bool {- Arity: 12, HasNoCafRefs, Strictness: , Inline: [0], Unfolding: (\ (ww :: Text.Parsec.Pos.SourceName) (ww1 :: GHC.Prim.Int#) (ww2 :: GHC.Prim.Int#) (ww3 :: Text.Parsec.Pos.SourceName) (ww4 :: GHC.Prim.Int#) (ww5 :: GHC.Prim.Int#) (ww6 :: Text.Parsec.Pos.SourceName) (ww7 :: GHC.Prim.Int#) (ww8 :: GHC.Prim.Int#) (ww9 :: Text.Parsec.Pos.SourceName) (ww10 :: GHC.Prim.Int#) (ww11 :: GHC.Prim.Int#) -> case GHC.Classes.$fOrd[]_$s$ccompare1 ww ww6 of wild { GHC.Types.LT -> GHC.Types.True GHC.Types.EQ -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.<# ww1 ww7) of wild1 { GHC.Types.False -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww1 ww7) of wild2 { GHC.Types.False -> GHC.Types.False GHC.Types.True -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.<# ww2 ww8) of wild4 { GHC.Types.False -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww2 ww8) of wild5 { GHC.Types.False -> GHC.Types.False GHC.Types.True -> case GHC.Classes.$fOrd[]_$s$ccompare1 ww3 ww9 of wild7 { GHC.Types.LT -> GHC.Types.True GHC.Types.EQ -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.<# ww4 ww10) of wild8 { GHC.Types.False -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww4 ww10) of wild9 { GHC.Types.False -> GHC.Types.False GHC.Types.True -> GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.<# ww5 ww11) } GHC.Types.True -> GHC.Types.True } GHC.Types.GT -> GHC.Types.False } } GHC.Types.True -> GHC.Types.True } } GHC.Types.True -> GHC.Types.True } GHC.Types.GT -> GHC.Types.False }) -} 875905830e9b98f780a249f9994828b6 $w$c<= :: Text.Parsec.Pos.SourceName -> GHC.Prim.Int# -> GHC.Prim.Int# -> Text.Parsec.Pos.SourceName -> GHC.Prim.Int# -> GHC.Prim.Int# -> Text.Parsec.Pos.SourceName -> GHC.Prim.Int# -> GHC.Prim.Int# -> Text.Parsec.Pos.SourceName -> GHC.Prim.Int# -> GHC.Prim.Int# -> GHC.Types.Bool {- Arity: 12, HasNoCafRefs, Strictness: , Inline: [0], Unfolding: (\ (ww :: Text.Parsec.Pos.SourceName) (ww1 :: GHC.Prim.Int#) (ww2 :: GHC.Prim.Int#) (ww3 :: Text.Parsec.Pos.SourceName) (ww4 :: GHC.Prim.Int#) (ww5 :: GHC.Prim.Int#) (ww6 :: Text.Parsec.Pos.SourceName) (ww7 :: GHC.Prim.Int#) (ww8 :: GHC.Prim.Int#) (ww9 :: Text.Parsec.Pos.SourceName) (ww10 :: GHC.Prim.Int#) (ww11 :: GHC.Prim.Int#) -> case GHC.Classes.$fOrd[]_$s$ccompare1 ww ww6 of wild { GHC.Types.LT -> GHC.Types.True GHC.Types.EQ -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.<# ww1 ww7) of wild1 { GHC.Types.False -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww1 ww7) of wild2 { GHC.Types.False -> GHC.Types.False GHC.Types.True -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.<# ww2 ww8) of wild4 { GHC.Types.False -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww2 ww8) of wild5 { GHC.Types.False -> GHC.Types.False GHC.Types.True -> case GHC.Classes.$fOrd[]_$s$ccompare1 ww3 ww9 of wild7 { GHC.Types.LT -> GHC.Types.True GHC.Types.EQ -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.<# ww4 ww10) of wild8 { GHC.Types.False -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww4 ww10) of wild9 { GHC.Types.False -> GHC.Types.False GHC.Types.True -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.<# ww5 ww11) of wild10 { GHC.Types.False -> GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww5 ww11) GHC.Types.True -> GHC.Types.True } } GHC.Types.True -> GHC.Types.True } GHC.Types.GT -> GHC.Types.False } } GHC.Types.True -> GHC.Types.True } } GHC.Types.True -> GHC.Types.True } GHC.Types.GT -> GHC.Types.False }) -} f7f69c07c6259a3362ea751af2cc2cd8 $w$c== :: Text.Parsec.Pos.SourceName -> GHC.Prim.Int# -> GHC.Prim.Int# -> Text.Parsec.Pos.SourceName -> GHC.Prim.Int# -> GHC.Prim.Int# -> Text.PrettyPrint.HughesPJ.Doc -> Text.Parsec.Pos.SourceName -> GHC.Prim.Int# -> GHC.Prim.Int# -> Text.Parsec.Pos.SourceName -> GHC.Prim.Int# -> GHC.Prim.Int# -> Text.PrettyPrint.HughesPJ.Doc -> GHC.Types.Bool {- Arity: 14, Strictness: , Inline: [0], Unfolding: (\ (ww :: Text.Parsec.Pos.SourceName) (ww1 :: GHC.Prim.Int#) (ww2 :: GHC.Prim.Int#) (ww3 :: Text.Parsec.Pos.SourceName) (ww4 :: GHC.Prim.Int#) (ww5 :: GHC.Prim.Int#) (ww6 :: Text.PrettyPrint.HughesPJ.Doc) (ww7 :: Text.Parsec.Pos.SourceName) (ww8 :: GHC.Prim.Int#) (ww9 :: GHC.Prim.Int#) (ww10 :: Text.Parsec.Pos.SourceName) (ww11 :: GHC.Prim.Int#) (ww12 :: GHC.Prim.Int#) (ww13 :: Text.PrettyPrint.HughesPJ.Doc) -> case GHC.Base.eqString ww ww7 of wild { GHC.Types.False -> GHC.Types.False GHC.Types.True -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww1 ww8) of wild1 { GHC.Types.False -> GHC.Types.False GHC.Types.True -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww2 ww9) of wild2 { GHC.Types.False -> GHC.Types.False GHC.Types.True -> case GHC.Base.eqString ww3 ww10 of wild4 { GHC.Types.False -> GHC.Types.False GHC.Types.True -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww4 ww11) of wild5 { GHC.Types.False -> GHC.Types.False GHC.Types.True -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww5 ww12) of wild6 { GHC.Types.False -> GHC.Types.False GHC.Types.True -> Text.PrettyPrint.HughesPJ.$fEqDoc_$c== ww6 ww13 } } } } } }) -} d1658ccf8c0866cbd2f4e5adedeadc80 $w$c> :: Text.Parsec.Pos.SourceName -> GHC.Prim.Int# -> GHC.Prim.Int# -> Text.Parsec.Pos.SourceName -> GHC.Prim.Int# -> GHC.Prim.Int# -> Text.Parsec.Pos.SourceName -> GHC.Prim.Int# -> GHC.Prim.Int# -> Text.Parsec.Pos.SourceName -> GHC.Prim.Int# -> GHC.Prim.Int# -> GHC.Types.Bool {- Arity: 12, HasNoCafRefs, Strictness: , Inline: [0], Unfolding: (\ (ww :: Text.Parsec.Pos.SourceName) (ww1 :: GHC.Prim.Int#) (ww2 :: GHC.Prim.Int#) (ww3 :: Text.Parsec.Pos.SourceName) (ww4 :: GHC.Prim.Int#) (ww5 :: GHC.Prim.Int#) (ww6 :: Text.Parsec.Pos.SourceName) (ww7 :: GHC.Prim.Int#) (ww8 :: GHC.Prim.Int#) (ww9 :: Text.Parsec.Pos.SourceName) (ww10 :: GHC.Prim.Int#) (ww11 :: GHC.Prim.Int#) -> case GHC.Classes.$fOrd[]_$s$ccompare1 ww ww6 of wild { GHC.Types.LT -> GHC.Types.False GHC.Types.EQ -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.<# ww1 ww7) of wild1 { GHC.Types.False -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww1 ww7) of wild2 { GHC.Types.False -> GHC.Types.True GHC.Types.True -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.<# ww2 ww8) of wild4 { GHC.Types.False -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww2 ww8) of wild5 { GHC.Types.False -> GHC.Types.True GHC.Types.True -> case GHC.Classes.$fOrd[]_$s$ccompare1 ww3 ww9 of wild7 { GHC.Types.LT -> GHC.Types.False GHC.Types.EQ -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.<# ww4 ww10) of wild8 { GHC.Types.False -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww4 ww10) of wild9 { GHC.Types.False -> GHC.Types.True GHC.Types.True -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.<# ww5 ww11) of wild10 { GHC.Types.False -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww5 ww11) of wild11 { GHC.Types.False -> GHC.Types.True GHC.Types.True -> GHC.Types.False } GHC.Types.True -> GHC.Types.False } } GHC.Types.True -> GHC.Types.False } GHC.Types.GT -> GHC.Types.True } } GHC.Types.True -> GHC.Types.False } } GHC.Types.True -> GHC.Types.False } GHC.Types.GT -> GHC.Types.True }) -} 58079dbc163858a89f1e49efade6f8b7 $w$c>= :: Text.Parsec.Pos.SourceName -> GHC.Prim.Int# -> GHC.Prim.Int# -> Text.Parsec.Pos.SourceName -> GHC.Prim.Int# -> GHC.Prim.Int# -> Text.Parsec.Pos.SourceName -> GHC.Prim.Int# -> GHC.Prim.Int# -> Text.Parsec.Pos.SourceName -> GHC.Prim.Int# -> GHC.Prim.Int# -> GHC.Types.Bool {- Arity: 12, HasNoCafRefs, Strictness: , Inline: [0], Unfolding: (\ (ww :: Text.Parsec.Pos.SourceName) (ww1 :: GHC.Prim.Int#) (ww2 :: GHC.Prim.Int#) (ww3 :: Text.Parsec.Pos.SourceName) (ww4 :: GHC.Prim.Int#) (ww5 :: GHC.Prim.Int#) (ww6 :: Text.Parsec.Pos.SourceName) (ww7 :: GHC.Prim.Int#) (ww8 :: GHC.Prim.Int#) (ww9 :: Text.Parsec.Pos.SourceName) (ww10 :: GHC.Prim.Int#) (ww11 :: GHC.Prim.Int#) -> case GHC.Classes.$fOrd[]_$s$ccompare1 ww ww6 of wild { GHC.Types.LT -> GHC.Types.False GHC.Types.EQ -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.<# ww1 ww7) of wild1 { GHC.Types.False -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww1 ww7) of wild2 { GHC.Types.False -> GHC.Types.True GHC.Types.True -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.<# ww2 ww8) of wild4 { GHC.Types.False -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww2 ww8) of wild5 { GHC.Types.False -> GHC.Types.True GHC.Types.True -> case GHC.Classes.$fOrd[]_$s$ccompare1 ww3 ww9 of wild7 { GHC.Types.LT -> GHC.Types.False GHC.Types.EQ -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.<# ww4 ww10) of wild8 { GHC.Types.False -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww4 ww10) of wild9 { GHC.Types.False -> GHC.Types.True GHC.Types.True -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.<# ww5 ww11) of wild10 { GHC.Types.False -> GHC.Types.True GHC.Types.True -> GHC.Types.False } } GHC.Types.True -> GHC.Types.False } GHC.Types.GT -> GHC.Types.True } } GHC.Types.True -> GHC.Types.False } } GHC.Types.True -> GHC.Types.False } GHC.Types.GT -> GHC.Types.True }) -} bbcb7910102e76dd87f9706483b3612e $w$cget :: Data.Binary.Class.Binary a => forall r. GHC.Prim.Addr# -> GHC.ForeignPtr.ForeignPtrContents -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.Binary.Get.Internal.Success (Language.Fixpoint.Types.Errors.FixResult a) r -> Data.Binary.Get.Internal.Decoder r {- Arity: 6, Strictness: , Inline: [0], Unfolding: (\ @ a (w :: Data.Binary.Class.Binary a) @ r (ww :: GHC.Prim.Addr#) (ww1 :: GHC.ForeignPtr.ForeignPtrContents) (ww2 :: GHC.Prim.Int#) (ww3 :: GHC.Prim.Int#) (w1 :: Data.Binary.Get.Internal.Success (Language.Fixpoint.Types.Errors.FixResult a) r) -> Data.Binary.Generic.$w$cgget @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Crash" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 [a]) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 GHC.Base.String))) @ (GHC.Generics.C1 ('GHC.Generics.MetaCons "Safe" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1 GHC.Generics.:+: GHC.Generics.C1 ('GHC.Generics.MetaCons "Unsafe" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict) (GHC.Generics.Rec0 [a]))) (\ @ word @ a1 ($dOrd :: GHC.Classes.Ord word) ($dNum :: GHC.Num.Num word)[OneShot] ($dBits :: Data.Bits.Bits word)[OneShot] (eta :: word)[OneShot] (eta1 :: word)[OneShot] @ r1 (eta2 :: Data.ByteString.Internal.ByteString) (eta3 :: Data.Binary.Get.Internal.Success (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Crash" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 [a]) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 GHC.Base.String)) a1) r1) -> case eta2 of ww4 { Data.ByteString.Internal.PS ww5 ww6 ww7 ww8 -> Data.Binary.Class.$w$cget10 @ a w @ r1 ww5 ww6 ww7 ww8 (\ (i' :: Data.ByteString.Internal.ByteString) (a2 :: [a])[OneShot] -> case i' of ww9 { Data.ByteString.Internal.PS ww10 ww11 ww12 ww13 -> Data.Binary.Class.$w$cget10 @ GHC.Types.Char Data.Binary.Class.$fBinaryChar @ r1 ww10 ww11 ww12 ww13 (\ (i'1 :: Data.ByteString.Internal.ByteString) (a3 :: [GHC.Types.Char])[OneShot] -> eta3 i'1 (GHC.Generics.:*: @ (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 [a])) @ (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 GHC.Base.String)) @ a1 a2 `cast` (Trans (Sym (GHC.Generics.N:K1[0] _P <[a]>_R _P)) (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy>_P _R) _N)) a3 `cast` (Trans (Sym (GHC.Generics.N:K1[0] _P <[GHC.Types.Char]>_R _P)) (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy>_P _R) _N))) `cast` (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "Crash" 'GHC.Generics.PrefixI 'GHC.Types.False>_P _R) _N)) }) }) `cast` (Trans (forall (word :: <*>_N) (a1 :: <*>_N). _R ->_R _R ->_R _R ->_R _R ->_R _R ->_R Sym (Data.Binary.Get.Internal.N:Get[0] _R)) (Sym (Data.Binary.Generic.N:GSumGet[0] _N))) (Data.Binary.Generic.$fGSumGet:+:_$cgetSum @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Safe" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1) @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Unsafe" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict) (GHC.Generics.Rec0 [a]))) Language.Fixpoint.Types.Errors.$fBinaryFixResult2 `cast` (Trans (forall (word :: <*>_N) (a1 :: <*>_N). _R ->_R _R ->_R _R ->_R _R ->_R _R ->_R Sym (Data.Binary.Get.Internal.N:Get[0] _R)) (Sym (Data.Binary.Generic.N:GSumGet[0] _N))) (\ @ word @ a1 ($dOrd :: GHC.Classes.Ord word) ($dNum :: GHC.Num.Num word)[OneShot] ($dBits :: Data.Bits.Bits word)[OneShot] (eta :: word)[OneShot] (eta1 :: word)[OneShot] @ r1 (eta2 :: Data.ByteString.Internal.ByteString) (eta3 :: Data.Binary.Get.Internal.Success (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Unsafe" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict) (GHC.Generics.Rec0 [a])) a1) r1) -> case eta2 of ww4 { Data.ByteString.Internal.PS ww5 ww6 ww7 ww8 -> Data.Binary.Class.$w$cget10 @ a w @ r1 ww5 ww6 ww7 ww8 (\ (i' :: Data.ByteString.Internal.ByteString) (a2 :: [a])[OneShot] -> eta3 i' a2 `cast` (Trans (Sym (GHC.Generics.N:K1[0] _P <[a]>_R _P)) (Trans (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict>_P _R)) (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "Unsafe" 'GHC.Generics.PrefixI 'GHC.Types.False>_P _R)) _N))) }) `cast` (Trans (forall (word :: <*>_N) (a1 :: <*>_N). _R ->_R _R ->_R _R ->_R _R ->_R _R ->_R Sym (Data.Binary.Get.Internal.N:Get[0] _R)) (Sym (Data.Binary.Generic.N:GSumGet[0] _N)))) `cast` (Sym (Data.Binary.Generic.N:GSumGet[0] _N)) 1## 2## @ GHC.Prim.Any @ r ww ww1 ww2 ww3 (\ (i' :: Data.ByteString.Internal.ByteString) (a1 :: (GHC.Generics.:+:) (GHC.Generics.C1 ('GHC.Generics.MetaCons "Crash" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 [a]) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 GHC.Base.String))) (GHC.Generics.C1 ('GHC.Generics.MetaCons "Safe" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1 GHC.Generics.:+: GHC.Generics.C1 ('GHC.Generics.MetaCons "Unsafe" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict) (GHC.Generics.Rec0 [a]))) GHC.Prim.Any) -> w1 i' (Language.Fixpoint.Types.Errors.$fBinaryFixResult_$cto @ a @ GHC.Prim.Any a1 `cast` (Trans (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaData "FixResult" "Language.Fixpoint.Types.Errors" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.False>_P _R)) (Sub (Sym (Language.Fixpoint.Types.Errors.Rep_FixResult[0] _N))) _N)))) -} 40f272afd1790af12d0e19713ca3b9a4 $w$cget1 :: Data.Serialize.Serialize a => forall r. GHC.Prim.Addr# -> GHC.ForeignPtr.ForeignPtrContents -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.Serialize.Get.Buffer -> Data.Serialize.Get.More -> Data.Serialize.Get.Failure r -> Data.Serialize.Get.Success (Text.PrettyPrint.Annotated.HughesPJ.AnnotDetails a) r -> Data.Serialize.Get.Result r {- Arity: 9, Strictness: , Inline: [0] -} 6f31163ce8f17542ca321a9bbe10e458 $w$cget2 :: GHC.Prim.Addr# -> GHC.ForeignPtr.ForeignPtrContents -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.Serialize.Get.Buffer -> Data.Serialize.Get.More -> Data.Serialize.Get.Failure r -> Data.Serialize.Get.Success Text.PrettyPrint.HughesPJ.Doc r -> Data.Serialize.Get.Result r {- Arity: 8, Strictness: , Inline: [0], Unfolding: (\ @ r (ww :: GHC.Prim.Addr#) (ww1 :: GHC.ForeignPtr.ForeignPtrContents) (ww2 :: GHC.Prim.Int#) (ww3 :: GHC.Prim.Int#) (w :: Data.Serialize.Get.Buffer) (w1 :: Data.Serialize.Get.More) (w2 :: Data.Serialize.Get.Failure r) (w3 :: Data.Serialize.Get.Success Text.PrettyPrint.HughesPJ.Doc r) -> Language.Fixpoint.Types.Errors.$w$s$cget1 @ r ww ww1 ww2 ww3 w w1 w2 (\ (s1 :: Data.Serialize.Get.Input) (b1 :: Data.Serialize.Get.Buffer)[OneShot] (m1 :: Data.Serialize.Get.More)[OneShot] (a1 :: Text.PrettyPrint.Annotated.HughesPJ.Doc ())[OneShot] -> w3 s1 b1 m1 a1 `cast` (Sym (Text.PrettyPrint.HughesPJ.N:Doc[0])))) -} ca27f05e77ab6771ebecc372ea1a3d39 $w$cget3 :: Data.Serialize.Serialize a => forall r. GHC.Prim.Addr# -> GHC.ForeignPtr.ForeignPtrContents -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.Serialize.Get.Buffer -> Data.Serialize.Get.More -> Data.Serialize.Get.Failure r -> Data.Serialize.Get.Success (Text.PrettyPrint.Annotated.HughesPJ.Doc a) r -> Data.Serialize.Get.Result r {- Arity: 9, Strictness: , Inline: [0] -} d0173fd74c0fa26b5149cb3e367aede0 $w$cget4 :: GHC.Prim.Addr# -> GHC.ForeignPtr.ForeignPtrContents -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.Serialize.Get.Buffer -> Data.Serialize.Get.More -> Data.Serialize.Get.Failure r -> Data.Serialize.Get.Success Language.Fixpoint.Types.Errors.Error r -> Data.Serialize.Get.Result r {- Arity: 8, Strictness: , Inline: [0], Unfolding: (\ @ r (ww :: GHC.Prim.Addr#) (ww1 :: GHC.ForeignPtr.ForeignPtrContents) (ww2 :: GHC.Prim.Int#) (ww3 :: GHC.Prim.Int#) (w :: Data.Serialize.Get.Buffer) (w1 :: Data.Serialize.Get.More) (w2 :: Data.Serialize.Get.Failure r) (w3 :: Data.Serialize.Get.Success Language.Fixpoint.Types.Errors.Error r) -> Data.Serialize.Get.$wgetListOf @ Language.Fixpoint.Types.Errors.Error1 Language.Fixpoint.Types.Errors.$fSerializeError3 `cast` (Sym (Data.Serialize.Get.N:Get[0] _R)) @ r ww ww1 ww2 ww3 w w1 w2 (\ (s1 :: Data.Serialize.Get.Input) (b1 :: Data.Serialize.Get.Buffer)[OneShot] (m1 :: Data.Serialize.Get.More)[OneShot] (a1 :: [Language.Fixpoint.Types.Errors.Error1])[OneShot] -> w3 s1 b1 m1 a1 `cast` (Sym (Language.Fixpoint.Types.Errors.N:Error[0])))) -} d0173fd74c0fa26b5149cb3e367aede0 $w$cget5 :: GHC.Prim.Addr# -> GHC.ForeignPtr.ForeignPtrContents -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.Serialize.Get.Buffer -> Data.Serialize.Get.More -> Data.Serialize.Get.Failure r -> Data.Serialize.Get.Success (Language.Fixpoint.Types.Errors.FixResult Language.Fixpoint.Types.Errors.Error) r -> Data.Serialize.Get.Result r {- Arity: 8, Strictness: , Inline: [0] -} bf7f09930c61325f8a9d5ad94bfbdf00 $w$cget6 :: GHC.Prim.Addr# -> GHC.ForeignPtr.ForeignPtrContents -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.Serialize.Get.Buffer -> Data.Serialize.Get.More -> Data.Serialize.Get.Failure r -> Data.Serialize.Get.Success Text.PrettyPrint.Annotated.HughesPJ.TextDetails r -> Data.Serialize.Get.Result r {- Arity: 8, Strictness: , Inline: [0], Unfolding: (\ @ r (ww :: GHC.Prim.Addr#) (ww1 :: GHC.ForeignPtr.ForeignPtrContents) (ww2 :: GHC.Prim.Int#) (ww3 :: GHC.Prim.Int#) (w :: Data.Serialize.Get.Buffer) (w1 :: Data.Serialize.Get.More) (w2 :: Data.Serialize.Get.Failure r) (w3 :: Data.Serialize.Get.Success Text.PrettyPrint.Annotated.HughesPJ.TextDetails r) -> Language.Fixpoint.Types.Errors.$w$dGSerializeGet @ GHC.Prim.Any @ r ww ww1 ww2 ww3 w w1 w2 (\ (s1 :: Data.Serialize.Get.Input) (b1 :: Data.Serialize.Get.Buffer) (m1 :: Data.Serialize.Get.More) (a1 :: (GHC.Generics.:+:) (GHC.Generics.C1 ('GHC.Generics.MetaCons "Chr" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.SourceUnpack 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedUnpack) (GHC.Generics.Rec0 GHC.Types.Char))) (GHC.Generics.C1 ('GHC.Generics.MetaCons "Str" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 GHC.Base.String)) GHC.Generics.:+: GHC.Generics.C1 ('GHC.Generics.MetaCons "PStr" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 GHC.Base.String))) GHC.Prim.Any) -> w3 s1 b1 m1 (Text.PrettyPrint.Annotated.HughesPJ.$fGenericTextDetails_$cto @ GHC.Prim.Any a1 `cast` (Trans (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaData "TextDetails" "Text.PrettyPrint.Annotated.HughesPJ" "pretty-1.1.3.3" 'GHC.Types.False>_P _R)) (Sub (Sym (Text.PrettyPrint.Annotated.HughesPJ.Rep_TextDetails[0]))) _N)))) -} eccf0d11dab53e14ad7088ba3eb34c6e $w$cpprintTidy :: Language.Fixpoint.Types.Spans.SrcSpan -> Text.PrettyPrint.HughesPJ.Doc -> Text.PrettyPrint.HughesPJ.Doc {- Arity: 2, Strictness: , Inline: [0], Unfolding: (\ (ww :: Language.Fixpoint.Types.Spans.SrcSpan) (ww1 :: Text.PrettyPrint.HughesPJ.Doc) -> case Text.PrettyPrint.Annotated.HughesPJ.$wmkNest @ () 2# (Text.PrettyPrint.Annotated.HughesPJ.reduceDoc @ () ww1 `cast` (Text.PrettyPrint.HughesPJ.N:Doc[0])) of wild { DEFAULT -> case Language.Fixpoint.Types.Errors.$fFixpointError2 `cast` (Text.PrettyPrint.HughesPJ.N:Doc[0]) of wild1 { DEFAULT -> case Language.Fixpoint.Types.Spans.$wppSrcSpan ww of ww2 { (#,#) ww3 ww4 -> (Text.PrettyPrint.Annotated.HughesPJ.Above @ () (Text.PrettyPrint.Annotated.HughesPJ.Beside @ () (Text.PrettyPrint.Annotated.HughesPJ.TextBeside @ () ww3 ww4) GHC.Types.False wild1) GHC.Types.True wild) `cast` (Sym (Text.PrettyPrint.HughesPJ.N:Doc[0])) } Text.PrettyPrint.Annotated.HughesPJ.Empty -> case Language.Fixpoint.Types.Spans.$wppSrcSpan ww of ww2 { (#,#) ww3 ww4 -> (Text.PrettyPrint.Annotated.HughesPJ.Above @ () (Text.PrettyPrint.Annotated.HughesPJ.TextBeside @ () ww3 ww4) GHC.Types.True wild) `cast` (Sym (Text.PrettyPrint.HughesPJ.N:Doc[0])) } } Text.PrettyPrint.Annotated.HughesPJ.Empty -> case Language.Fixpoint.Types.Errors.$fFixpointError2 `cast` (Text.PrettyPrint.HughesPJ.N:Doc[0]) of wild1 { DEFAULT -> case Language.Fixpoint.Types.Spans.$wppSrcSpan ww of ww2 { (#,#) ww3 ww4 -> (Text.PrettyPrint.Annotated.HughesPJ.Beside @ () (Text.PrettyPrint.Annotated.HughesPJ.TextBeside @ () ww3 ww4) GHC.Types.False wild1) `cast` (Sym (Text.PrettyPrint.HughesPJ.N:Doc[0])) } Text.PrettyPrint.Annotated.HughesPJ.Empty -> Language.Fixpoint.Types.Spans.ppSrcSpan ww } }) -} d0173fd74c0fa26b5149cb3e367aede0 $w$cpprintTidy1 :: Language.Fixpoint.Types.Errors.Error -> Text.PrettyPrint.HughesPJ.Doc {- Arity: 1, Strictness: , Inline: [0], Unfolding: (\ (w :: Language.Fixpoint.Types.Errors.Error) -> case Text.PrettyPrint.Annotated.HughesPJ.$wreduceVert @ () (Text.PrettyPrint.Annotated.HughesPJ.vcat1 @ () (Language.Fixpoint.Types.Errors.$fPPrintError_go w `cast` (Language.Fixpoint.Types.Errors.N:Error[0]))) of ww { (#,#) ww1 ww2 -> ww2 `cast` (Sym (Text.PrettyPrint.HughesPJ.N:Doc[0])) }) -} b6f5a3863f0a7eaa268353f6784521f1 $w$cput :: Data.Serialize.Serialize a => Text.PrettyPrint.Annotated.HughesPJ.AnnotDetails a -> (# (), Data.ByteString.Builder.Internal.Builder #) {- Arity: 2, Strictness: , Inline: [0] -} 059ff5645f73e47894180fc7397f1fb8 $w$cput1 :: Data.Serialize.Serialize a => Text.PrettyPrint.Annotated.HughesPJ.Doc a -> (# (), Data.ByteString.Builder.Internal.Builder #) {- Arity: 2, Strictness: , Inline: [0] -} 0dc8009a8a76952b64f64bd490a0b23d $w$cput2 :: Text.PrettyPrint.Annotated.HughesPJ.TextDetails -> (# (), Data.ByteString.Builder.Internal.Builder #) {- Arity: 1, Strictness: , Inline: [0], Unfolding: (\ (w :: Text.PrettyPrint.Annotated.HughesPJ.TextDetails) -> case w of wild { Text.PrettyPrint.Annotated.HughesPJ.Chr dt1 -> Language.Fixpoint.Types.Errors.$w$dGSerializePut @ GHC.Prim.Any (GHC.Generics.L1 @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Chr" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.SourceUnpack 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedUnpack) (GHC.Generics.K1 GHC.Generics.R GHC.Types.Char))) @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Str" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R GHC.Base.String)) GHC.Generics.:+: GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "PStr" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R GHC.Base.String))) @ GHC.Prim.Any (GHC.Types.C# dt1) `cast` (Trans (Sym (GHC.Generics.N:K1[0] _P _R _P)) (Trans (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.SourceUnpack 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedUnpack>_P _R)) (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "Chr" 'GHC.Generics.PrefixI 'GHC.Types.False>_P _R)) _N))) Text.PrettyPrint.Annotated.HughesPJ.Str g1 -> Language.Fixpoint.Types.Errors.$w$dGSerializePut @ GHC.Prim.Any (GHC.Generics.R1 @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Chr" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.SourceUnpack 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedUnpack) (GHC.Generics.K1 GHC.Generics.R GHC.Types.Char))) @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Str" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R GHC.Base.String)) GHC.Generics.:+: GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "PStr" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R GHC.Base.String))) @ GHC.Prim.Any (GHC.Generics.L1 @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Str" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R GHC.Base.String))) @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "PStr" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R GHC.Base.String))) @ GHC.Prim.Any g1 `cast` (Trans (Sym (GHC.Generics.N:K1[0] _P _R _P)) (Trans (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy>_P _R)) (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "Str" 'GHC.Generics.PrefixI 'GHC.Types.False>_P _R)) _N)))) Text.PrettyPrint.Annotated.HughesPJ.PStr g1 -> Language.Fixpoint.Types.Errors.$w$dGSerializePut @ GHC.Prim.Any (GHC.Generics.R1 @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Chr" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.SourceUnpack 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedUnpack) (GHC.Generics.K1 GHC.Generics.R GHC.Types.Char))) @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Str" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R GHC.Base.String)) GHC.Generics.:+: GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "PStr" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R GHC.Base.String))) @ GHC.Prim.Any (GHC.Generics.R1 @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Str" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R GHC.Base.String))) @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "PStr" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R GHC.Base.String))) @ GHC.Prim.Any g1 `cast` (Trans (Sym (GHC.Generics.N:K1[0] _P _R _P)) (Trans (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy>_P _R)) (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "PStr" 'GHC.Generics.PrefixI 'GHC.Types.False>_P _R)) _N)))) }) -} 26f8e3eef9c2b31fba66384f71171166 $w$cshowsPrec :: GHC.Prim.Int# -> Language.Fixpoint.Types.Spans.SrcSpan -> Text.PrettyPrint.HughesPJ.Doc -> GHC.Base.String -> GHC.Base.String {- Arity: 4, Strictness: , Inline: [0], Unfolding: (\ (ww :: GHC.Prim.Int#) (ww1 :: Language.Fixpoint.Types.Spans.SrcSpan) (ww2 :: Text.PrettyPrint.HughesPJ.Doc) (w :: GHC.Base.String) -> let { g :: GHC.Base.String -> GHC.Base.String {- Arity: 1, Strictness: -} = \ (x :: GHC.Base.String)[OneShot] -> GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Errors.$fExceptionError6 (case ww1 of ww3 { Language.Fixpoint.Types.Spans.SS ww4 ww5 -> case ww4 of ww6 { Text.Parsec.Pos.SourcePos ww7 ww8 ww9 -> case ww5 of ww10 { Text.Parsec.Pos.SourcePos ww11 ww12 ww13 -> Language.Fixpoint.Types.Spans.$w$cshowsPrec 0# ww7 ww8 ww9 ww11 ww12 ww13 (GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Errors.$fExceptionError5 (GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Errors.$fExceptionError4 (Text.PrettyPrint.Annotated.HughesPJ.fullRenderAnn @ () @ GHC.Base.String Text.PrettyPrint.Annotated.HughesPJ.PageMode Text.PrettyPrint.Annotated.HughesPJ.render3 Text.PrettyPrint.Annotated.HughesPJ.render2 Text.PrettyPrint.HughesPJ.$fEqDoc1 (GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Errors.$fExceptionError3 x) ww2 `cast` (Text.PrettyPrint.HughesPJ.N:Doc[0])))) } } }) } in case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.>=# ww 11#) of wild { GHC.Types.False -> GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Errors.$fExceptionError2 (g w) GHC.Types.True -> GHC.Types.: @ GHC.Types.Char GHC.Show.shows7 (GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Errors.$fExceptionError2 (g (GHC.Types.: @ GHC.Types.Char GHC.Show.shows4 w))) }) -} d0173fd74c0fa26b5149cb3e367aede0 $w$cshowsPrec1 :: GHC.Prim.Int# -> Language.Fixpoint.Types.Errors.Error -> GHC.Base.String -> GHC.Base.String {- Arity: 3, Strictness: , Inline: [0], Unfolding: (\ (ww :: GHC.Prim.Int#) (w :: Language.Fixpoint.Types.Errors.Error) (w1 :: GHC.Base.String) -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.>=# ww 11#) of wild { GHC.Types.False -> GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Errors.$fExceptionError7 (GHC.Show.showList__ @ Language.Fixpoint.Types.Errors.Error1 Language.Fixpoint.Types.Errors.$fExceptionError1 w `cast` (Language.Fixpoint.Types.Errors.N:Error[0]) w1) GHC.Types.True -> GHC.Types.: @ GHC.Types.Char GHC.Show.shows7 (GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Errors.$fExceptionError7 (GHC.Show.showList__ @ Language.Fixpoint.Types.Errors.Error1 Language.Fixpoint.Types.Errors.$fExceptionError1 w `cast` (Language.Fixpoint.Types.Errors.N:Error[0]) (GHC.Types.: @ GHC.Types.Char GHC.Show.shows4 w1))) }) -} 61495745d3cea03b294d8b288c004c7b $w$dGSerializeGet :: GHC.Prim.Addr# -> GHC.ForeignPtr.ForeignPtrContents -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.Serialize.Get.Buffer -> Data.Serialize.Get.More -> Data.Serialize.Get.Failure r -> Data.Serialize.Get.Success ((GHC.Generics.:+:) (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Chr" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.SourceUnpack 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedUnpack) (GHC.Generics.Rec0 GHC.Types.Char))) (GHC.Generics.C1 ('GHC.Generics.MetaCons "Str" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 GHC.Base.String)) GHC.Generics.:+: GHC.Generics.C1 ('GHC.Generics.MetaCons "PStr" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 GHC.Base.String))) a1) r -> Data.Serialize.Get.Result r {- Arity: 8, Strictness: , Inline: [0] -} a3b5a965c928e27394f77e9dcf74f239 $w$dGSerializePut :: (GHC.Generics.:+:) (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Chr" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.SourceUnpack 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedUnpack) (GHC.Generics.Rec0 GHC.Types.Char))) (GHC.Generics.C1 ('GHC.Generics.MetaCons "Str" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 GHC.Base.String)) GHC.Generics.:+: GHC.Generics.C1 ('GHC.Generics.MetaCons "PStr" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 GHC.Base.String))) a1 -> (# (), Data.ByteString.Builder.Internal.Builder #) {- Arity: 1, Strictness: , Inline: [0] -} 8043e2c0ff58ec43aca7e3a21ec5df72 $w$dGSerializePut1 :: GHC.Generics.S1 ('GHC.Generics.MetaSel ('GHC.Base.Just "errLoc") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 Language.Fixpoint.Types.Spans.SrcSpan) a1 -> GHC.Generics.S1 ('GHC.Generics.MetaSel ('GHC.Base.Just "errMsg") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 Text.PrettyPrint.HughesPJ.Doc) a1 -> (# (), Data.ByteString.Builder.Internal.Builder #) {- Arity: 2, Strictness: , Inline: [0], Unfolding: (\ @ a1 (ww :: GHC.Generics.S1 ('GHC.Generics.MetaSel ('GHC.Base.Just "errLoc") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 Language.Fixpoint.Types.Spans.SrcSpan) a1) (ww1 :: GHC.Generics.S1 ('GHC.Generics.MetaSel ('GHC.Base.Just "errMsg") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 Text.PrettyPrint.HughesPJ.Doc) a1) -> let { ds1 :: Data.Serialize.Put.Put = case Language.Fixpoint.Types.Errors.$wlvl2 @ GHC.Prim.Any (Text.PrettyPrint.Annotated.HughesPJ.$fGenericDoc1 @ () @ GHC.Prim.Any ww1 `cast` (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel ('GHC.Base.Just "errMsg") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy>_P _R _N) (Trans (GHC.Generics.N:K1[0] _P _R _P) (Text.PrettyPrint.HughesPJ.N:Doc[0])))) of ww2 { (#,#) ww3 ww4 -> (Data.Serialize.Put.PairS @ () ww3 ww4) `cast` (Sym (Data.Serialize.Put.N:PutM[0]) <()>_N) } } in (# case ds1 `cast` (Data.Serialize.Put.N:PutM[0] <()>_N) of wild1 { Data.Serialize.Put.PairS b2 w' -> b2 }, let { ds :: Data.ByteString.Builder.Internal.Builder = case ww `cast` (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel ('GHC.Base.Just "errLoc") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy>_P _R _N) (GHC.Generics.N:K1[0] _P _R _P)) of wild { Language.Fixpoint.Types.Spans.SS g1 g2 -> case Language.Fixpoint.Types.Spans.$w$dGSerializePut @ GHC.Prim.Any g1 `cast` (Trans (Sym (GHC.Generics.N:K1[0] _P _R _P)) (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel ('GHC.Base.Just "sp_start") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict>_P _R) _N)) g2 `cast` (Trans (Sym (GHC.Generics.N:K1[0] _P _R _P)) (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel ('GHC.Base.Just "sp_stop") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict>_P _R) _N)) of ww3 { (#,#) ww4 ww5 -> ww5 } } } in (\ @ r (eta :: Data.ByteString.Builder.Internal.BuildStep r) -> ds `cast` (Data.ByteString.Builder.Internal.N:Builder[0]) @ r (case ds1 `cast` (Data.Serialize.Put.N:PutM[0] <()>_N) of wild1 { Data.Serialize.Put.PairS b2 w' -> w' `cast` (Data.ByteString.Builder.Internal.N:Builder[0]) @ r eta })) `cast` (Sym (Data.ByteString.Builder.Internal.N:Builder[0])) #)) -} d0173fd74c0fa26b5149cb3e367aede0 $w$dGSerializePut2 :: (GHC.Generics.:+:) (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Crash" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 [Language.Fixpoint.Types.Errors.Error]) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 GHC.Base.String))) (GHC.Generics.C1 ('GHC.Generics.MetaCons "Safe" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1 GHC.Generics.:+: GHC.Generics.C1 ('GHC.Generics.MetaCons "Unsafe" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict) (GHC.Generics.Rec0 [Language.Fixpoint.Types.Errors.Error]))) a1 -> (# (), Data.ByteString.Builder.Internal.Builder #) {- Arity: 1, Strictness: , Inline: [0], Unfolding: (\ @ a1 (w :: (GHC.Generics.:+:) (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Crash" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 [Language.Fixpoint.Types.Errors.Error]) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 GHC.Base.String))) (GHC.Generics.C1 ('GHC.Generics.MetaCons "Safe" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1 GHC.Generics.:+: GHC.Generics.C1 ('GHC.Generics.MetaCons "Unsafe" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict) (GHC.Generics.Rec0 [Language.Fixpoint.Types.Errors.Error]))) a1) -> case w of wild2 { GHC.Generics.L1 x -> let { ds :: Data.Serialize.Put.PairS () = case x `cast` (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "Crash" 'GHC.Generics.PrefixI 'GHC.Types.False>_P _R _N) of wild { GHC.Generics.:*: a2 b1 -> let { ds1 :: Data.Serialize.Put.Put = case Data.Serialize.$w$cput28 @ GHC.Types.Char Data.Serialize.$fSerializeChar b1 `cast` (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy>_P _R _N) (GHC.Generics.N:K1[0] _P <[GHC.Types.Char]>_R _P)) of ww { (#,#) ww1 ww2 -> (Data.Serialize.Put.PairS @ () ww1 ww2) `cast` (Sym (Data.Serialize.Put.N:PutM[0]) <()>_N) } } in Data.Serialize.Put.PairS @ () (case ds1 `cast` (Data.Serialize.Put.N:PutM[0] <()>_N) of wild1 { Data.Serialize.Put.PairS b2 w' -> b2 }) (let { ds2 :: Data.ByteString.Builder.Internal.Builder = case Data.Serialize.$w$cput28 @ Language.Fixpoint.Types.Errors.Error Language.Fixpoint.Types.Errors.$fSerializeError a2 `cast` (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy>_P _R _N) (GHC.Generics.N:K1[0] _P <[Language.Fixpoint.Types.Errors.Error]>_R _P)) of ww { (#,#) ww1 ww2 -> ww2 } } in (\ @ r (eta :: Data.ByteString.Builder.Internal.BuildStep r) -> ds2 `cast` (Data.ByteString.Builder.Internal.N:Builder[0]) @ r (case ds1 `cast` (Data.Serialize.Put.N:PutM[0] <()>_N) of wild1 { Data.Serialize.Put.PairS b2 w' -> w' `cast` (Data.ByteString.Builder.Internal.N:Builder[0]) @ r eta })) `cast` (Sym (Data.ByteString.Builder.Internal.N:Builder[0]))) } } in (# case ds of wild { Data.Serialize.Put.PairS b1 w' -> b1 }, (\ @ r (eta :: Data.ByteString.Builder.Internal.BuildStep r) -> let { eta1 :: Data.ByteString.Builder.Internal.BuildStep r = case ds of wild { Data.Serialize.Put.PairS b1 w' -> w' `cast` (Data.ByteString.Builder.Internal.N:Builder[0]) @ r eta } } in let { lvl23 :: Data.ByteString.Builder.Internal.BufferRange -> GHC.Prim.State# GHC.Prim.RealWorld -> (# GHC.Prim.State# GHC.Prim.RealWorld, Data.ByteString.Builder.Internal.BuildSignal r #) {- Arity: 2 -} = \ (ds1 :: Data.ByteString.Builder.Internal.BufferRange) (eta3 :: GHC.Prim.State# GHC.Prim.RealWorld)[OneShot] -> case ds1 of wild3 { Data.ByteString.Builder.Internal.BufferRange dt3 dt4 -> case GHC.Prim.writeWord8OffAddr# @ GHC.Prim.RealWorld dt3 0# 0## eta3 of s2 { DEFAULT -> (eta1 (Data.ByteString.Builder.Internal.BufferRange (GHC.Prim.plusAddr# dt3 1#) dt4)) `cast` (GHC.Types.N:IO[0] _R) s2 } } } in \ (eta2 :: Data.ByteString.Builder.Internal.BufferRange) (eta3 :: GHC.Prim.State# GHC.Prim.RealWorld)[OneShot] -> case eta2 of wild { Data.ByteString.Builder.Internal.BufferRange dt dt1 -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.<# (GHC.Prim.minusAddr# dt1 dt) 1#) of wild1 { GHC.Types.False -> case GHC.Prim.writeWord8OffAddr# @ GHC.Prim.RealWorld dt 0# 0## eta3 of s2 { DEFAULT -> (eta1 (Data.ByteString.Builder.Internal.BufferRange (GHC.Prim.plusAddr# dt 1#) dt1)) `cast` (GHC.Types.N:IO[0] _R) s2 } GHC.Types.True -> (# eta3, Data.ByteString.Builder.Internal.BufferFull @ r 1# dt lvl23 `cast` (_R ->_R Sym (GHC.Types.N:IO[0] _R)) #) } }) `cast` (Trans (forall (r :: <*>_N). _R ->_R _R ->_R Sym (GHC.Types.N:IO[0] _R)) (Sym (Data.ByteString.Builder.Internal.N:Builder[0]))) #) GHC.Generics.R1 x -> case x of wild { GHC.Generics.L1 x1 -> (# GHC.Tuple.(), Language.Fixpoint.Types.Errors.$fSerializeFixResult4 `cast` (Trans (forall (r :: <*>_N). _R ->_R _R ->_R Sym (GHC.Types.N:IO[0] _R)) (Sym (Data.ByteString.Builder.Internal.N:Builder[0]))) #) GHC.Generics.R1 x1 -> let { ds :: Data.Serialize.Put.Put = case Data.Serialize.$w$cput28 @ Language.Fixpoint.Types.Errors.Error Language.Fixpoint.Types.Errors.$fSerializeError x1 `cast` (Trans (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "Unsafe" 'GHC.Generics.PrefixI 'GHC.Types.False>_P _R) (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict>_P _R) _N) (GHC.Generics.N:K1[0] _P <[Language.Fixpoint.Types.Errors.Error]>_R _P)) of ww { (#,#) ww1 ww2 -> (Data.Serialize.Put.PairS @ () ww1 ww2) `cast` (Sym (Data.Serialize.Put.N:PutM[0]) <()>_N) } } in (# case ds `cast` (Data.Serialize.Put.N:PutM[0] <()>_N) of wild1 { Data.Serialize.Put.PairS b1 w' -> b1 }, (\ @ r (eta :: Data.ByteString.Builder.Internal.BuildStep r) -> let { eta1 :: Data.ByteString.Builder.Internal.BuildStep r = case ds `cast` (Data.Serialize.Put.N:PutM[0] <()>_N) of wild1 { Data.Serialize.Put.PairS b1 w' -> w' `cast` (Data.ByteString.Builder.Internal.N:Builder[0]) @ r eta } } in let { lvl23 :: Data.ByteString.Builder.Internal.BufferRange -> GHC.Prim.State# GHC.Prim.RealWorld -> (# GHC.Prim.State# GHC.Prim.RealWorld, Data.ByteString.Builder.Internal.BuildSignal r #) {- Arity: 2 -} = \ (ds1 :: Data.ByteString.Builder.Internal.BufferRange) (eta3 :: GHC.Prim.State# GHC.Prim.RealWorld)[OneShot] -> case ds1 of wild3 { Data.ByteString.Builder.Internal.BufferRange dt3 dt4 -> case GHC.Prim.writeWord8OffAddr# @ GHC.Prim.RealWorld dt3 0# 2## eta3 of s2 { DEFAULT -> (eta1 (Data.ByteString.Builder.Internal.BufferRange (GHC.Prim.plusAddr# dt3 1#) dt4)) `cast` (GHC.Types.N:IO[0] _R) s2 } } } in \ (eta2 :: Data.ByteString.Builder.Internal.BufferRange) (eta3 :: GHC.Prim.State# GHC.Prim.RealWorld)[OneShot] -> case eta2 of wild1 { Data.ByteString.Builder.Internal.BufferRange dt dt1 -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.<# (GHC.Prim.minusAddr# dt1 dt) 1#) of wild3 { GHC.Types.False -> case GHC.Prim.writeWord8OffAddr# @ GHC.Prim.RealWorld dt 0# 2## eta3 of s2 { DEFAULT -> (eta1 (Data.ByteString.Builder.Internal.BufferRange (GHC.Prim.plusAddr# dt 1#) dt1)) `cast` (GHC.Types.N:IO[0] _R) s2 } GHC.Types.True -> (# eta3, Data.ByteString.Builder.Internal.BufferFull @ r 1# dt lvl23 `cast` (_R ->_R Sym (GHC.Types.N:IO[0] _R)) #) } }) `cast` (Trans (forall (r :: <*>_N). _R ->_R _R ->_R Sym (GHC.Types.N:IO[0] _R)) (Sym (Data.ByteString.Builder.Internal.N:Builder[0]))) #) } }) -} 75f8d3ade6fb523231f945e171d04277 $w$s$cget1 :: GHC.Prim.Addr# -> GHC.ForeignPtr.ForeignPtrContents -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.Serialize.Get.Buffer -> Data.Serialize.Get.More -> Data.Serialize.Get.Failure r -> Data.Serialize.Get.Success (Text.PrettyPrint.Annotated.HughesPJ.Doc ()) r -> Data.Serialize.Get.Result r {- Arity: 8, Strictness: , Inline: [0] -} fe6e5aad05978433bf8f5711d14af3c1 $werrFreeVarInConstraint :: Language.Fixpoint.Types.PrettyPrint.PPrint a => GHC.Integer.Type.Integer -> a -> (# Language.Fixpoint.Types.Errors.Error1, [Language.Fixpoint.Types.Errors.Error1] #) {- Arity: 3, Strictness: , Inline: [0], Unfolding: (\ @ a (w :: Language.Fixpoint.Types.PrettyPrint.PPrint a) (ww :: GHC.Integer.Type.Integer) (ww1 :: a) -> (# Language.Fixpoint.Types.Errors.Error1 Language.Fixpoint.Types.Spans.dummySpan (case Text.PrettyPrint.Annotated.HughesPJ.$wreduceVert @ () (Text.PrettyPrint.Annotated.HughesPJ.vcat1 @ () (GHC.Types.: @ (Text.PrettyPrint.Annotated.HughesPJ.Doc ()) Language.Fixpoint.Types.Errors.errFreeVarInConstraint4 `cast` (Text.PrettyPrint.HughesPJ.N:Doc[0]) (GHC.Types.: @ (Text.PrettyPrint.Annotated.HughesPJ.Doc ()) (Text.PrettyPrint.HughesPJ.integer ww) `cast` (Text.PrettyPrint.HughesPJ.N:Doc[0]) (GHC.Types.: @ (Text.PrettyPrint.Annotated.HughesPJ.Doc ()) (Language.Fixpoint.Types.PrettyPrint.pprintPrec @ a w Language.Fixpoint.Types.PrettyPrint.pprint1 Language.Fixpoint.Types.PrettyPrint.Full ww1) `cast` (Text.PrettyPrint.HughesPJ.N:Doc[0]) Language.Fixpoint.Types.Errors.errFreeVarInConstraint1)))) of ww2 { (#,#) ww3 ww4 -> ww4 `cast` (Sym (Text.PrettyPrint.HughesPJ.N:Doc[0])) }), GHC.Types.[] @ Language.Fixpoint.Types.Errors.Error1 #)) -} 07736d282eba2aa7a16fc35b0791b735 $werrFreeVarInQual :: (Language.Fixpoint.Types.PrettyPrint.PPrint q, Language.Fixpoint.Types.Spans.Loc q, Language.Fixpoint.Types.PrettyPrint.PPrint x) => q -> x -> (# Language.Fixpoint.Types.Errors.Error1, [Language.Fixpoint.Types.Errors.Error1] #) {- Arity: 5, Strictness: , Inline: [0], Unfolding: (\ @ q @ x (w :: Language.Fixpoint.Types.PrettyPrint.PPrint q) (w1 :: Language.Fixpoint.Types.Spans.Loc q) (w2 :: Language.Fixpoint.Types.PrettyPrint.PPrint x) (w3 :: q) (w4 :: x) -> (# Language.Fixpoint.Types.Errors.Error1 (w1 `cast` (Language.Fixpoint.Types.Spans.N:Loc[0] _N) w3) (case Text.PrettyPrint.Annotated.HughesPJ.$wreduceVert @ () (Text.PrettyPrint.Annotated.HughesPJ.vcat1 @ () (GHC.Types.: @ (Text.PrettyPrint.Annotated.HughesPJ.Doc ()) Language.Fixpoint.Types.Errors.errFreeVarInQual2 `cast` (Text.PrettyPrint.HughesPJ.N:Doc[0]) (GHC.Types.: @ (Text.PrettyPrint.Annotated.HughesPJ.Doc ()) (Language.Fixpoint.Types.PrettyPrint.pprintPrec @ q w Language.Fixpoint.Types.PrettyPrint.pprint1 Language.Fixpoint.Types.PrettyPrint.Full w3) `cast` (Text.PrettyPrint.HughesPJ.N:Doc[0]) (GHC.Types.: @ (Text.PrettyPrint.Annotated.HughesPJ.Doc ()) (Language.Fixpoint.Types.PrettyPrint.pprintPrec @ x w2 Language.Fixpoint.Types.PrettyPrint.pprint1 Language.Fixpoint.Types.PrettyPrint.Full w4) `cast` (Text.PrettyPrint.HughesPJ.N:Doc[0]) (GHC.Types.[] @ (Text.PrettyPrint.Annotated.HughesPJ.Doc ())))))) of ww { (#,#) ww1 ww2 -> ww2 `cast` (Sym (Text.PrettyPrint.HughesPJ.N:Doc[0])) }), GHC.Types.[] @ Language.Fixpoint.Types.Errors.Error1 #)) -} 99ff54c146d963ba967825cb5ab2697f $werrIllScopedKVar :: (Language.Fixpoint.Types.PrettyPrint.PPrint k, Language.Fixpoint.Types.PrettyPrint.PPrint bs) => k -> GHC.Integer.Type.Integer -> GHC.Integer.Type.Integer -> bs -> (# Language.Fixpoint.Types.Errors.Error1, [Language.Fixpoint.Types.Errors.Error1] #) {- Arity: 6, Strictness: , Inline: [0], Unfolding: (\ @ k1 @ bs (w :: Language.Fixpoint.Types.PrettyPrint.PPrint k1) (w1 :: Language.Fixpoint.Types.PrettyPrint.PPrint bs) (ww :: k1) (ww1 :: GHC.Integer.Type.Integer) (ww2 :: GHC.Integer.Type.Integer) (ww3 :: bs) -> (# Language.Fixpoint.Types.Errors.Error1 Language.Fixpoint.Types.Spans.dummySpan (case Text.PrettyPrint.Annotated.HughesPJ.$wreduceVert @ () (Text.PrettyPrint.Annotated.HughesPJ.vcat1 @ () (GHC.Types.: @ (Text.PrettyPrint.Annotated.HughesPJ.Doc ()) (case (Language.Fixpoint.Types.PrettyPrint.pprintPrec @ k1 w Language.Fixpoint.Types.PrettyPrint.pprint1 Language.Fixpoint.Types.PrettyPrint.Full ww) `cast` (Text.PrettyPrint.HughesPJ.N:Doc[0]) of wild { DEFAULT -> case Language.Fixpoint.Types.Errors.errIllScopedKVar5 `cast` (Text.PrettyPrint.HughesPJ.N:Doc[0]) of wild1 { DEFAULT -> Text.PrettyPrint.Annotated.HughesPJ.Beside @ () wild1 GHC.Types.True wild Text.PrettyPrint.Annotated.HughesPJ.Empty -> wild } Text.PrettyPrint.Annotated.HughesPJ.Empty -> Language.Fixpoint.Types.Errors.errIllScopedKVar5 `cast` (Text.PrettyPrint.HughesPJ.N:Doc[0]) }) (GHC.Types.: @ (Text.PrettyPrint.Annotated.HughesPJ.Doc ()) (case Text.PrettyPrint.HughesPJ.$winteger ww2 of ww4 { (#,#) ww5 ww6 -> case Text.PrettyPrint.HughesPJ.$winteger ww1 of ww7 { (#,#) ww8 ww9 -> case Language.Fixpoint.Types.Errors.errIllScopedKVar3 `cast` (Text.PrettyPrint.HughesPJ.N:Doc[0]) of wild { DEFAULT -> case Language.Fixpoint.Types.Errors.errIllScopedKVar1 `cast` (Text.PrettyPrint.HughesPJ.N:Doc[0]) of wild1 { DEFAULT -> Text.PrettyPrint.Annotated.HughesPJ.Beside @ () (Text.PrettyPrint.Annotated.HughesPJ.Beside @ () (Text.PrettyPrint.Annotated.HughesPJ.Beside @ () wild1 GHC.Types.True (Text.PrettyPrint.Annotated.HughesPJ.TextBeside @ () ww8 ww9)) GHC.Types.True wild) GHC.Types.True (Text.PrettyPrint.Annotated.HughesPJ.TextBeside @ () ww5 ww6) Text.PrettyPrint.Annotated.HughesPJ.Empty -> Text.PrettyPrint.Annotated.HughesPJ.Beside @ () (Text.PrettyPrint.Annotated.HughesPJ.Beside @ () (Text.PrettyPrint.Annotated.HughesPJ.TextBeside @ () ww8 ww9) GHC.Types.True wild) GHC.Types.True (Text.PrettyPrint.Annotated.HughesPJ.TextBeside @ () ww5 ww6) } Text.PrettyPrint.Annotated.HughesPJ.Empty -> case Language.Fixpoint.Types.Errors.errIllScopedKVar1 `cast` (Text.PrettyPrint.HughesPJ.N:Doc[0]) of wild1 { DEFAULT -> Text.PrettyPrint.Annotated.HughesPJ.Beside @ () (Text.PrettyPrint.Annotated.HughesPJ.Beside @ () wild1 GHC.Types.True (Text.PrettyPrint.Annotated.HughesPJ.TextBeside @ () ww8 ww9)) GHC.Types.True (Text.PrettyPrint.Annotated.HughesPJ.TextBeside @ () ww5 ww6) Text.PrettyPrint.Annotated.HughesPJ.Empty -> Text.PrettyPrint.Annotated.HughesPJ.Beside @ () (Text.PrettyPrint.Annotated.HughesPJ.TextBeside @ () ww8 ww9) GHC.Types.True (Text.PrettyPrint.Annotated.HughesPJ.TextBeside @ () ww5 ww6) } } } }) (GHC.Types.: @ (Text.PrettyPrint.Annotated.HughesPJ.Doc ()) (Language.Fixpoint.Types.PrettyPrint.pprintPrec @ bs w1 Language.Fixpoint.Types.PrettyPrint.pprint1 Language.Fixpoint.Types.PrettyPrint.Full ww3) `cast` (Text.PrettyPrint.HughesPJ.N:Doc[0]) (GHC.Types.[] @ (Text.PrettyPrint.Annotated.HughesPJ.Doc ())))))) of ww4 { (#,#) ww5 ww6 -> ww6 `cast` (Sym (Text.PrettyPrint.HughesPJ.N:Doc[0])) }), GHC.Types.[] @ Language.Fixpoint.Types.Errors.Error1 #)) -} 09990c6f4ff85d17cb347ec32332df20 $wlvl :: GHC.Prim.Addr# -> GHC.ForeignPtr.ForeignPtrContents -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.Serialize.Get.Buffer -> Data.Serialize.Get.More -> Data.Serialize.Get.Failure r -> Data.Serialize.Get.Success ((GHC.Generics.:+:) (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "AnnotStart" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1) (GHC.Generics.C1 ('GHC.Generics.MetaCons "NoAnnot" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceLazy 'GHC.Generics.DecidedStrict) (GHC.Generics.Rec0 Text.PrettyPrint.Annotated.HughesPJ.TextDetails) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.SourceUnpack 'GHC.Generics.SourceLazy 'GHC.Generics.DecidedUnpack) (GHC.Generics.Rec0 GHC.Types.Int)) GHC.Generics.:+: GHC.Generics.C1 ('GHC.Generics.MetaCons "AnnotEnd" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 ()))) a1) r -> Data.Serialize.Get.Result r {- Arity: 8, Strictness: , Inline: [0] -} ba451089357d474745e3510aa022cc5f $wlvl1 :: (GHC.Generics.:+:) (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "AnnotStart" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1) (GHC.Generics.C1 ('GHC.Generics.MetaCons "NoAnnot" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceLazy 'GHC.Generics.DecidedStrict) (GHC.Generics.Rec0 Text.PrettyPrint.Annotated.HughesPJ.TextDetails) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.SourceUnpack 'GHC.Generics.SourceLazy 'GHC.Generics.DecidedUnpack) (GHC.Generics.Rec0 GHC.Types.Int)) GHC.Generics.:+: GHC.Generics.C1 ('GHC.Generics.MetaCons "AnnotEnd" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 ()))) a1 -> (# (), Data.ByteString.Builder.Internal.Builder #) {- Arity: 1, Strictness: , Inline: [0], Unfolding: (\ @ a1 (w :: (GHC.Generics.:+:) (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "AnnotStart" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1) (GHC.Generics.C1 ('GHC.Generics.MetaCons "NoAnnot" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceLazy 'GHC.Generics.DecidedStrict) (GHC.Generics.Rec0 Text.PrettyPrint.Annotated.HughesPJ.TextDetails) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.SourceUnpack 'GHC.Generics.SourceLazy 'GHC.Generics.DecidedUnpack) (GHC.Generics.Rec0 GHC.Types.Int)) GHC.Generics.:+: GHC.Generics.C1 ('GHC.Generics.MetaCons "AnnotEnd" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 ()))) a1) -> case w of wild2 { GHC.Generics.L1 x -> (# GHC.Tuple.(), Language.Fixpoint.Types.Errors.$fSerializeAnnotDetails3 `cast` (Trans (forall (r :: <*>_N). _R ->_R _R ->_R Sym (GHC.Types.N:IO[0] _R)) (Sym (Data.ByteString.Builder.Internal.N:Builder[0]))) #) GHC.Generics.R1 x -> case x of wild { GHC.Generics.L1 x1 -> let { ds :: Data.Serialize.Put.PairS () = case x1 `cast` (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "NoAnnot" 'GHC.Generics.PrefixI 'GHC.Types.False>_P _R _N) of wild1 { GHC.Generics.:*: a2 b1 -> let { ds1 :: Data.Serialize.Put.PairS () = case Data.Serialize.$w$cput16 b1 `cast` (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.SourceUnpack 'GHC.Generics.SourceLazy 'GHC.Generics.DecidedUnpack>_P _R _N) (GHC.Generics.N:K1[0] _P _R _P)) of ww { (#,#) ww1 ww2 -> Data.Serialize.Put.PairS @ () ww1 ww2 } } in Data.Serialize.Put.PairS @ () (case ds1 of wild3 { Data.Serialize.Put.PairS b2 w' -> b2 }) (let { ds2 :: Data.ByteString.Builder.Internal.Builder = case a2 `cast` (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceLazy 'GHC.Generics.DecidedStrict>_P _R _N) (GHC.Generics.N:K1[0] _P _R _P)) of wild3 { Text.PrettyPrint.Annotated.HughesPJ.Chr dt1 -> case Language.Fixpoint.Types.Errors.$w$dGSerializePut @ GHC.Prim.Any (GHC.Generics.L1 @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Chr" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.SourceUnpack 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedUnpack) (GHC.Generics.K1 GHC.Generics.R GHC.Types.Char))) @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Str" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R GHC.Base.String)) GHC.Generics.:+: GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "PStr" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R GHC.Base.String))) @ GHC.Prim.Any (GHC.Types.C# dt1) `cast` (Trans (Sym (GHC.Generics.N:K1[0] _P _R _P)) (Trans (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.SourceUnpack 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedUnpack>_P _R)) (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "Chr" 'GHC.Generics.PrefixI 'GHC.Types.False>_P _R)) _N))) of ww { (#,#) ww1 ww2 -> ww2 } Text.PrettyPrint.Annotated.HughesPJ.Str g1 -> case Language.Fixpoint.Types.Errors.$w$dGSerializePut @ GHC.Prim.Any (GHC.Generics.R1 @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Chr" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.SourceUnpack 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedUnpack) (GHC.Generics.K1 GHC.Generics.R GHC.Types.Char))) @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Str" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R GHC.Base.String)) GHC.Generics.:+: GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "PStr" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R GHC.Base.String))) @ GHC.Prim.Any (GHC.Generics.L1 @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Str" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R GHC.Base.String))) @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "PStr" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R GHC.Base.String))) @ GHC.Prim.Any g1 `cast` (Trans (Sym (GHC.Generics.N:K1[0] _P _R _P)) (Trans (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy>_P _R)) (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "Str" 'GHC.Generics.PrefixI 'GHC.Types.False>_P _R)) _N)))) of ww { (#,#) ww1 ww2 -> ww2 } Text.PrettyPrint.Annotated.HughesPJ.PStr g1 -> case Language.Fixpoint.Types.Errors.$w$dGSerializePut @ GHC.Prim.Any (GHC.Generics.R1 @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Chr" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.SourceUnpack 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedUnpack) (GHC.Generics.K1 GHC.Generics.R GHC.Types.Char))) @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Str" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R GHC.Base.String)) GHC.Generics.:+: GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "PStr" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R GHC.Base.String))) @ GHC.Prim.Any (GHC.Generics.R1 @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Str" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R GHC.Base.String))) @ (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "PStr" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.K1 GHC.Generics.R GHC.Base.String))) @ GHC.Prim.Any g1 `cast` (Trans (Sym (GHC.Generics.N:K1[0] _P _R _P)) (Trans (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy>_P _R)) (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "PStr" 'GHC.Generics.PrefixI 'GHC.Types.False>_P _R)) _N)))) of ww { (#,#) ww1 ww2 -> ww2 } } } in (\ @ r (eta :: Data.ByteString.Builder.Internal.BuildStep r) -> ds2 `cast` (Data.ByteString.Builder.Internal.N:Builder[0]) @ r (case ds1 of wild3 { Data.Serialize.Put.PairS b2 w' -> w' `cast` (Data.ByteString.Builder.Internal.N:Builder[0]) @ r eta })) `cast` (Sym (Data.ByteString.Builder.Internal.N:Builder[0]))) } } in (# case ds of wild1 { Data.Serialize.Put.PairS b1 w' -> b1 }, (\ @ r (eta :: Data.ByteString.Builder.Internal.BuildStep r) -> let { eta1 :: Data.ByteString.Builder.Internal.BuildStep r = case ds of wild1 { Data.Serialize.Put.PairS b1 w' -> w' `cast` (Data.ByteString.Builder.Internal.N:Builder[0]) @ r eta } } in let { lvl23 :: Data.ByteString.Builder.Internal.BufferRange -> GHC.Prim.State# GHC.Prim.RealWorld -> (# GHC.Prim.State# GHC.Prim.RealWorld, Data.ByteString.Builder.Internal.BuildSignal r #) {- Arity: 2 -} = \ (ds1 :: Data.ByteString.Builder.Internal.BufferRange) (eta3 :: GHC.Prim.State# GHC.Prim.RealWorld)[OneShot] -> case ds1 of wild3 { Data.ByteString.Builder.Internal.BufferRange dt3 dt4 -> case GHC.Prim.writeWord8OffAddr# @ GHC.Prim.RealWorld dt3 0# 1## eta3 of s2 { DEFAULT -> (eta1 (Data.ByteString.Builder.Internal.BufferRange (GHC.Prim.plusAddr# dt3 1#) dt4)) `cast` (GHC.Types.N:IO[0] _R) s2 } } } in \ (eta2 :: Data.ByteString.Builder.Internal.BufferRange) (eta3 :: GHC.Prim.State# GHC.Prim.RealWorld)[OneShot] -> case eta2 of wild1 { Data.ByteString.Builder.Internal.BufferRange dt dt1 -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.<# (GHC.Prim.minusAddr# dt1 dt) 1#) of wild3 { GHC.Types.False -> case GHC.Prim.writeWord8OffAddr# @ GHC.Prim.RealWorld dt 0# 1## eta3 of s2 { DEFAULT -> (eta1 (Data.ByteString.Builder.Internal.BufferRange (GHC.Prim.plusAddr# dt 1#) dt1)) `cast` (GHC.Types.N:IO[0] _R) s2 } GHC.Types.True -> (# eta3, Data.ByteString.Builder.Internal.BufferFull @ r 1# dt lvl23 `cast` (_R ->_R Sym (GHC.Types.N:IO[0] _R)) #) } }) `cast` (Trans (forall (r :: <*>_N). _R ->_R _R ->_R Sym (GHC.Types.N:IO[0] _R)) (Sym (Data.ByteString.Builder.Internal.N:Builder[0]))) #) GHC.Generics.R1 x1 -> let { ds :: Data.Serialize.Put.PairS () = case x1 of tpl { DEFAULT -> Data.Serialize.$fSerialize()2 } } in (# case ds of wild1 { Data.Serialize.Put.PairS b1 w' -> b1 }, (\ @ r (eta :: Data.ByteString.Builder.Internal.BuildStep r) -> let { eta1 :: Data.ByteString.Builder.Internal.BuildStep r = case ds of wild1 { Data.Serialize.Put.PairS b1 w' -> w' `cast` (Data.ByteString.Builder.Internal.N:Builder[0]) @ r eta } } in let { lvl23 :: Data.ByteString.Builder.Internal.BufferRange -> GHC.Prim.State# GHC.Prim.RealWorld -> (# GHC.Prim.State# GHC.Prim.RealWorld, Data.ByteString.Builder.Internal.BuildSignal r #) {- Arity: 2 -} = \ (ds1 :: Data.ByteString.Builder.Internal.BufferRange) (eta3 :: GHC.Prim.State# GHC.Prim.RealWorld)[OneShot] -> case ds1 of wild3 { Data.ByteString.Builder.Internal.BufferRange dt3 dt4 -> case GHC.Prim.writeWord8OffAddr# @ GHC.Prim.RealWorld dt3 0# 2## eta3 of s2 { DEFAULT -> (eta1 (Data.ByteString.Builder.Internal.BufferRange (GHC.Prim.plusAddr# dt3 1#) dt4)) `cast` (GHC.Types.N:IO[0] _R) s2 } } } in \ (eta2 :: Data.ByteString.Builder.Internal.BufferRange) (eta3 :: GHC.Prim.State# GHC.Prim.RealWorld)[OneShot] -> case eta2 of wild1 { Data.ByteString.Builder.Internal.BufferRange dt dt1 -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.<# (GHC.Prim.minusAddr# dt1 dt) 1#) of wild3 { GHC.Types.False -> case GHC.Prim.writeWord8OffAddr# @ GHC.Prim.RealWorld dt 0# 2## eta3 of s2 { DEFAULT -> (eta1 (Data.ByteString.Builder.Internal.BufferRange (GHC.Prim.plusAddr# dt 1#) dt1)) `cast` (GHC.Types.N:IO[0] _R) s2 } GHC.Types.True -> (# eta3, Data.ByteString.Builder.Internal.BufferFull @ r 1# dt lvl23 `cast` (_R ->_R Sym (GHC.Types.N:IO[0] _R)) #) } }) `cast` (Trans (forall (r :: <*>_N). _R ->_R _R ->_R Sym (GHC.Types.N:IO[0] _R)) (Sym (Data.ByteString.Builder.Internal.N:Builder[0]))) #) } }) -} a9c36e995a2bed4f3af09f8ea09c1600 $wlvl2 :: (GHC.Generics.:+:) ((GHC.Generics.C1 ('GHC.Generics.MetaCons "Empty" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1 GHC.Generics.:+: GHC.Generics.C1 ('GHC.Generics.MetaCons "NilAbove" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Text.PrettyPrint.Annotated.HughesPJ.Doc ())))) GHC.Generics.:+: (GHC.Generics.C1 ('GHC.Generics.MetaCons "TextBeside" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict) (GHC.Generics.Rec0 (Text.PrettyPrint.Annotated.HughesPJ.AnnotDetails ())) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Text.PrettyPrint.Annotated.HughesPJ.Doc ()))) GHC.Generics.:+: GHC.Generics.C1 ('GHC.Generics.MetaCons "Nest" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.SourceUnpack 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedUnpack) (GHC.Generics.Rec0 GHC.Types.Int) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Text.PrettyPrint.Annotated.HughesPJ.Doc ()))))) ((GHC.Generics.C1 ('GHC.Generics.MetaCons "Union" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Text.PrettyPrint.Annotated.HughesPJ.Doc ())) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Text.PrettyPrint.Annotated.HughesPJ.Doc ()))) GHC.Generics.:+: GHC.Generics.C1 ('GHC.Generics.MetaCons "NoDoc" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1) GHC.Generics.:+: (GHC.Generics.C1 ('GHC.Generics.MetaCons "Beside" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Text.PrettyPrint.Annotated.HughesPJ.Doc ())) GHC.Generics.:*: (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 GHC.Types.Bool) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Text.PrettyPrint.Annotated.HughesPJ.Doc ())))) GHC.Generics.:+: GHC.Generics.C1 ('GHC.Generics.MetaCons "Above" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Text.PrettyPrint.Annotated.HughesPJ.Doc ())) GHC.Generics.:*: (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 GHC.Types.Bool) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Text.PrettyPrint.Annotated.HughesPJ.Doc ())))))) a1 -> (# (), Data.ByteString.Builder.Internal.Builder #) {- Arity: 1, Strictness: , Inline: [0] -} d0173fd74c0fa26b5149cb3e367aede0 newtype Error = Error [Language.Fixpoint.Types.Errors.Error1] af80a035f9731b203491b28daa7a8cc7 data Error1 = Error1 {errLoc :: Language.Fixpoint.Types.Spans.SrcSpan, errMsg :: Text.PrettyPrint.HughesPJ.Doc} bbcb7910102e76dd87f9706483b3612e data FixResult a = Crash [a] GHC.Base.String | Safe | Unsafe ![a] 75ab10dd828afff8423da645334f503f axiom Rep_AnnotDetails:: [a] GHC.Generics.Rep (Text.PrettyPrint.Annotated.HughesPJ.AnnotDetails a) = GHC.Generics.D1 ('GHC.Generics.MetaData "AnnotDetails" "Text.PrettyPrint.Annotated.HughesPJ" "pretty-1.1.3.3" 'GHC.Types.False) (GHC.Generics.C1 ('GHC.Generics.MetaCons "AnnotStart" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1 GHC.Generics.:+: (GHC.Generics.C1 ('GHC.Generics.MetaCons "NoAnnot" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceLazy 'GHC.Generics.DecidedStrict) (GHC.Generics.Rec0 Text.PrettyPrint.Annotated.HughesPJ.TextDetails) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.SourceUnpack 'GHC.Generics.SourceLazy 'GHC.Generics.DecidedUnpack) (GHC.Generics.Rec0 GHC.Types.Int)) GHC.Generics.:+: GHC.Generics.C1 ('GHC.Generics.MetaCons "AnnotEnd" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 a)))) d0173fd74c0fa26b5149cb3e367aede0 axiom Rep_Error:: GHC.Generics.Rep Language.Fixpoint.Types.Errors.Error = GHC.Generics.D1 ('GHC.Generics.MetaData "Error" "Language.Fixpoint.Types.Errors" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.True) (GHC.Generics.C1 ('GHC.Generics.MetaCons "Error" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 [Language.Fixpoint.Types.Errors.Error1]))) af80a035f9731b203491b28daa7a8cc7 axiom Rep_Error1:: GHC.Generics.Rep Language.Fixpoint.Types.Errors.Error1 = GHC.Generics.D1 ('GHC.Generics.MetaData "Error1" "Language.Fixpoint.Types.Errors" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.False) (GHC.Generics.C1 ('GHC.Generics.MetaCons "Error1" 'GHC.Generics.PrefixI 'GHC.Types.True) (GHC.Generics.S1 ('GHC.Generics.MetaSel ('GHC.Base.Just "errLoc") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 Language.Fixpoint.Types.Spans.SrcSpan) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel ('GHC.Base.Just "errMsg") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 Text.PrettyPrint.HughesPJ.Doc))) bbcb7910102e76dd87f9706483b3612e axiom Rep_FixResult:: [a] GHC.Generics.Rep (Language.Fixpoint.Types.Errors.FixResult a) = GHC.Generics.D1 ('GHC.Generics.MetaData "FixResult" "Language.Fixpoint.Types.Errors" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.False) (GHC.Generics.C1 ('GHC.Generics.MetaCons "Crash" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 [a]) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 GHC.Base.String)) GHC.Generics.:+: (GHC.Generics.C1 ('GHC.Generics.MetaCons "Safe" 'GHC.Generics.PrefixI 'GHC.Types.False) GHC.Generics.U1 GHC.Generics.:+: GHC.Generics.C1 ('GHC.Generics.MetaCons "Unsafe" 'GHC.Generics.PrefixI 'GHC.Types.False) (GHC.Generics.S1 ('GHC.Generics.MetaSel 'GHC.Base.Nothing 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict) (GHC.Generics.Rec0 [a])))) 18ee612360aad031ca35f01fa2eca9a2 catError :: Language.Fixpoint.Types.Errors.Error -> Language.Fixpoint.Types.Errors.Error -> Language.Fixpoint.Types.Errors.Error {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) (GHC.Base.++ @ Language.Fixpoint.Types.Errors.Error1) `cast` (Sym (Language.Fixpoint.Types.Errors.N:Error[0]) ->_R Sym (Language.Fixpoint.Types.Errors.N:Error[0]) ->_R Sym (Language.Fixpoint.Types.Errors.N:Error[0])) -} 7650892e6059ecff2d06a66111a8993f catErrors :: Language.Fixpoint.Misc.ListNE Language.Fixpoint.Types.Errors.Error -> Language.Fixpoint.Types.Errors.Error {- Arity: 1, Strictness: , Unfolding: (\ (eta :: [Language.Fixpoint.Types.Errors.Error]) -> Language.Fixpoint.Types.Errors.catErrors_go eta) -} 7aa8a8d3944a801396ce79d2ae0ba426 catErrors_go :: [Language.Fixpoint.Types.Errors.Error] -> Language.Fixpoint.Types.Errors.Error {- Arity: 1, Strictness: -} fd7ce028805fe41d6945d0d87e4f5635 colorResult :: Language.Fixpoint.Types.Errors.FixResult a -> Language.Fixpoint.Misc.Moods {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (1, True, False) (\ @ a (ds :: Language.Fixpoint.Types.Errors.FixResult a) -> case ds of wild { Language.Fixpoint.Types.Errors.Crash ipv ipv1 -> Language.Fixpoint.Misc.Sad Language.Fixpoint.Types.Errors.Safe -> Language.Fixpoint.Misc.Happy Language.Fixpoint.Types.Errors.Unsafe ds1 -> Language.Fixpoint.Misc.Angry }) -} a892c3bd643380084ab25f8b09c20b83 die :: Language.Fixpoint.Types.Errors.Error -> a {- Arity: 1, Strictness: x -} a90e823f0e6047342911d3113f83b3d9 err :: Language.Fixpoint.Types.Spans.SrcSpan -> Text.PrettyPrint.HughesPJ.Doc -> Language.Fixpoint.Types.Errors.Error {- Arity: 2, HasNoCafRefs, Strictness: m2, Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Errors.err1 `cast` (_R ->_R _R ->_R Sym (Language.Fixpoint.Types.Errors.N:Error[0])) -} f388f603c1f6dcfaa94a2c9bb7c406f4 err1 :: Language.Fixpoint.Types.Spans.SrcSpan -> Text.PrettyPrint.HughesPJ.Doc -> [Language.Fixpoint.Types.Errors.Error1] {- Arity: 2, HasNoCafRefs, Strictness: m2, Unfolding: InlineRule (2, True, False) (\ (sp :: Language.Fixpoint.Types.Spans.SrcSpan) (d :: Text.PrettyPrint.HughesPJ.Doc) -> GHC.Types.: @ Language.Fixpoint.Types.Errors.Error1 (Language.Fixpoint.Types.Errors.Error1 sp d) (GHC.Types.[] @ Language.Fixpoint.Types.Errors.Error1)) -} 81315397e78a9f2e2283f8640a3210c7 errFreeVarInConstraint :: Language.Fixpoint.Types.PrettyPrint.PPrint a => (GHC.Integer.Type.Integer, a) -> Language.Fixpoint.Types.Errors.Error {- Arity: 2, Strictness: m2, Inline: INLINE[0], Unfolding: InlineRule (2, True, False) (\ @ a (w :: Language.Fixpoint.Types.PrettyPrint.PPrint a) (w1 :: (GHC.Integer.Type.Integer, a)) -> case w1 of ww { (,) ww1 ww2 -> case Language.Fixpoint.Types.Errors.$werrFreeVarInConstraint @ a w ww1 ww2 of ww3 { (#,#) ww4 ww5 -> (GHC.Types.: @ Language.Fixpoint.Types.Errors.Error1 ww4 ww5) `cast` (Sym (Language.Fixpoint.Types.Errors.N:Error[0])) } }) -} 8073afaac57c19696295acba813f3190 errFreeVarInConstraint1 :: [Text.PrettyPrint.Annotated.HughesPJ.Doc ()] {- Unfolding: (GHC.Types.: @ (Text.PrettyPrint.Annotated.HughesPJ.Doc ()) Language.Fixpoint.Types.Errors.errFreeVarInConstraint2 `cast` (Text.PrettyPrint.HughesPJ.N:Doc[0]) (GHC.Types.[] @ (Text.PrettyPrint.Annotated.HughesPJ.Doc ()))) -} 3f4cf7db242f95e4d7bc0bcfd1f1003d errFreeVarInConstraint2 :: Text.PrettyPrint.HughesPJ.Doc {- Unfolding: (case GHC.List.$wlenAcc @ GHC.Types.Char Language.Fixpoint.Types.Errors.errFreeVarInConstraint_s 0# of ww2 { DEFAULT -> (Text.PrettyPrint.Annotated.HughesPJ.TextBeside @ () (Text.PrettyPrint.Annotated.HughesPJ.NoAnnot @ () Language.Fixpoint.Types.Errors.errFreeVarInConstraint3 ww2) (Text.PrettyPrint.Annotated.HughesPJ.Empty @ ())) `cast` (Sym (Text.PrettyPrint.HughesPJ.N:Doc[0])) }) -} 9b9ae8bac4ccc11afc736549b42d2865 errFreeVarInConstraint3 :: Text.PrettyPrint.Annotated.HughesPJ.TextDetails {- Unfolding: (Text.PrettyPrint.Annotated.HughesPJ.Str Language.Fixpoint.Types.Errors.errFreeVarInConstraint_s) -} 7fd13a4c588ada845e115bbcc7768209 errFreeVarInConstraint4 :: Text.PrettyPrint.HughesPJ.Doc {- Unfolding: (case GHC.List.$wlenAcc @ GHC.Types.Char Language.Fixpoint.Types.Errors.errFreeVarInConstraint_s1 0# of ww2 { DEFAULT -> (Text.PrettyPrint.Annotated.HughesPJ.TextBeside @ () (Text.PrettyPrint.Annotated.HughesPJ.NoAnnot @ () Language.Fixpoint.Types.Errors.errFreeVarInConstraint5 ww2) (Text.PrettyPrint.Annotated.HughesPJ.Empty @ ())) `cast` (Sym (Text.PrettyPrint.HughesPJ.N:Doc[0])) }) -} fa38b6e9b14f3f7fbefed642cf68c7fc errFreeVarInConstraint5 :: Text.PrettyPrint.Annotated.HughesPJ.TextDetails {- Unfolding: (Text.PrettyPrint.Annotated.HughesPJ.Str Language.Fixpoint.Types.Errors.errFreeVarInConstraint_s1) -} f4004fccec95121da1181ccfca9364d5 errFreeVarInConstraint_s :: GHC.Base.String {- Unfolding: (GHC.CString.unpackCString# "Try using the --prune-unsorted flag"#) -} 6b3e5eb6177d152157dcb5cce81d39b4 errFreeVarInConstraint_s1 :: GHC.Base.String {- Unfolding: (GHC.CString.unpackCString# "Constraint with free vars"#) -} fc2bd9e9fa9736df222b49dfe9c98248 errFreeVarInQual :: (Language.Fixpoint.Types.PrettyPrint.PPrint q, Language.Fixpoint.Types.Spans.Loc q, Language.Fixpoint.Types.PrettyPrint.PPrint x) => q -> x -> Language.Fixpoint.Types.Errors.Error {- Arity: 5, Strictness: m2, Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Errors.errFreeVarInQual1 `cast` (forall (q :: <*>_N) (x :: <*>_N). _R ->_R _R ->_R _R ->_R _R ->_R _R ->_R Sym (Language.Fixpoint.Types.Errors.N:Error[0])) -} 166512983c388d53b580194a239dfff5 errFreeVarInQual1 :: (Language.Fixpoint.Types.PrettyPrint.PPrint q, Language.Fixpoint.Types.Spans.Loc q, Language.Fixpoint.Types.PrettyPrint.PPrint x) => q -> x -> [Language.Fixpoint.Types.Errors.Error1] {- Arity: 5, Strictness: m2, Inline: INLINE[0], Unfolding: InlineRule (5, True, False) (\ @ q @ x (w :: Language.Fixpoint.Types.PrettyPrint.PPrint q) (w1 :: Language.Fixpoint.Types.Spans.Loc q) (w2 :: Language.Fixpoint.Types.PrettyPrint.PPrint x) (w3 :: q) (w4 :: x) -> case Language.Fixpoint.Types.Errors.$werrFreeVarInQual @ q @ x w w1 w2 w3 w4 of ww { (#,#) ww1 ww2 -> GHC.Types.: @ Language.Fixpoint.Types.Errors.Error1 ww1 ww2 }) -} 5c422cc9f4898fe820ed1e20979164b4 errFreeVarInQual2 :: Text.PrettyPrint.HughesPJ.Doc {- Unfolding: (case GHC.List.$wlenAcc @ GHC.Types.Char Language.Fixpoint.Types.Errors.errFreeVarInQual_s 0# of ww2 { DEFAULT -> (Text.PrettyPrint.Annotated.HughesPJ.TextBeside @ () (Text.PrettyPrint.Annotated.HughesPJ.NoAnnot @ () Language.Fixpoint.Types.Errors.errFreeVarInQual3 ww2) (Text.PrettyPrint.Annotated.HughesPJ.Empty @ ())) `cast` (Sym (Text.PrettyPrint.HughesPJ.N:Doc[0])) }) -} 0f568bccb6d2f993275b7f59173f00bc errFreeVarInQual3 :: Text.PrettyPrint.Annotated.HughesPJ.TextDetails {- Unfolding: (Text.PrettyPrint.Annotated.HughesPJ.Str Language.Fixpoint.Types.Errors.errFreeVarInQual_s) -} 6e8c660d37ff43c330069455c70e3ab3 errFreeVarInQual_s :: GHC.Base.String {- Unfolding: (GHC.CString.unpackCString# "Qualifier with free vars"#) -} c70d60d92ea6a41b668761a1249b3b3a errIllScopedKVar :: (Language.Fixpoint.Types.PrettyPrint.PPrint k, Language.Fixpoint.Types.PrettyPrint.PPrint bs) => (k, GHC.Integer.Type.Integer, GHC.Integer.Type.Integer, bs) -> Language.Fixpoint.Types.Errors.Error {- Arity: 3, Strictness: m2, Inline: INLINE[0], Unfolding: InlineRule (3, True, False) (\ @ k1 @ bs (w :: Language.Fixpoint.Types.PrettyPrint.PPrint k1) (w1 :: Language.Fixpoint.Types.PrettyPrint.PPrint bs) (w2 :: (k1, GHC.Integer.Type.Integer, GHC.Integer.Type.Integer, bs)) -> case w2 of ww { (,,,) ww1 ww2 ww3 ww4 -> case Language.Fixpoint.Types.Errors.$werrIllScopedKVar @ k1 @ bs w w1 ww1 ww2 ww3 ww4 of ww5 { (#,#) ww6 ww7 -> (GHC.Types.: @ Language.Fixpoint.Types.Errors.Error1 ww6 ww7) `cast` (Sym (Language.Fixpoint.Types.Errors.N:Error[0])) } }) -} 33904d0bc8c9ce4d62f641dee043a57f errIllScopedKVar1 :: Text.PrettyPrint.HughesPJ.Doc {- Unfolding: (case GHC.List.$wlenAcc @ GHC.Types.Char Language.Fixpoint.Types.Errors.errIllScopedKVar_s 0# of ww2 { DEFAULT -> (Text.PrettyPrint.Annotated.HughesPJ.TextBeside @ () (Text.PrettyPrint.Annotated.HughesPJ.NoAnnot @ () Language.Fixpoint.Types.Errors.errIllScopedKVar2 ww2) (Text.PrettyPrint.Annotated.HughesPJ.Empty @ ())) `cast` (Sym (Text.PrettyPrint.HughesPJ.N:Doc[0])) }) -} 419d8a8568779db8d9eda06ee11d7604 errIllScopedKVar2 :: Text.PrettyPrint.Annotated.HughesPJ.TextDetails {- Unfolding: (Text.PrettyPrint.Annotated.HughesPJ.Str Language.Fixpoint.Types.Errors.errIllScopedKVar_s) -} 608f961451571496929928ba59c3650a errIllScopedKVar3 :: Text.PrettyPrint.HughesPJ.Doc {- Unfolding: (case GHC.List.$wlenAcc @ GHC.Types.Char Language.Fixpoint.Types.Errors.errIllScopedKVar_s1 0# of ww2 { DEFAULT -> (Text.PrettyPrint.Annotated.HughesPJ.TextBeside @ () (Text.PrettyPrint.Annotated.HughesPJ.NoAnnot @ () Language.Fixpoint.Types.Errors.errIllScopedKVar4 ww2) (Text.PrettyPrint.Annotated.HughesPJ.Empty @ ())) `cast` (Sym (Text.PrettyPrint.HughesPJ.N:Doc[0])) }) -} 03c7c1a0a26a3c8fab7d4d9602d4d0ac errIllScopedKVar4 :: Text.PrettyPrint.Annotated.HughesPJ.TextDetails {- Unfolding: (Text.PrettyPrint.Annotated.HughesPJ.Str Language.Fixpoint.Types.Errors.errIllScopedKVar_s1) -} 783724a1a9063b8ad31e1ce30686e57f errIllScopedKVar5 :: Text.PrettyPrint.HughesPJ.Doc {- Unfolding: (case GHC.List.$wlenAcc @ GHC.Types.Char Language.Fixpoint.Types.Errors.errIllScopedKVar_s2 0# of ww2 { DEFAULT -> (Text.PrettyPrint.Annotated.HughesPJ.TextBeside @ () (Text.PrettyPrint.Annotated.HughesPJ.NoAnnot @ () Language.Fixpoint.Types.Errors.errIllScopedKVar6 ww2) (Text.PrettyPrint.Annotated.HughesPJ.Empty @ ())) `cast` (Sym (Text.PrettyPrint.HughesPJ.N:Doc[0])) }) -} af4825ece365f8f9719f4b5d2a701e2a errIllScopedKVar6 :: Text.PrettyPrint.Annotated.HughesPJ.TextDetails {- Unfolding: (Text.PrettyPrint.Annotated.HughesPJ.Str Language.Fixpoint.Types.Errors.errIllScopedKVar_s2) -} e5f5a344bbe2cc3c1115f353a9dd7fec errIllScopedKVar_s :: GHC.Base.String {- Unfolding: (GHC.CString.unpackCString# "Missing common binders at def"#) -} 8890e563da5c71de2a8cbed740a56851 errIllScopedKVar_s1 :: GHC.Base.String {- Unfolding: (GHC.CString.unpackCString# "and use"#) -} 371b778d433e94d1a4d849a60ed6eee6 errIllScopedKVar_s2 :: GHC.Base.String {- Unfolding: (GHC.CString.unpackCString# "Ill-scoped KVar"#) -} f5bcaffe7d92b6cc27c2aedf4745c1ec errLoc :: Language.Fixpoint.Types.Errors.Error1 -> Language.Fixpoint.Types.Spans.SrcSpan RecSel Left Language.Fixpoint.Types.Errors.Error1 {- Arity: 1, HasNoCafRefs, Strictness: m, Unfolding: InlineRule (1, True, False) (\ (ds :: Language.Fixpoint.Types.Errors.Error1) -> case ds of wild { Language.Fixpoint.Types.Errors.Error1 ds1 ds2 -> ds1 }) -} 7b4853c89069275128e262536a6f9df5 errMsg :: Language.Fixpoint.Types.Errors.Error1 -> Text.PrettyPrint.HughesPJ.Doc RecSel Left Language.Fixpoint.Types.Errors.Error1 {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (1, True, False) (\ (ds :: Language.Fixpoint.Types.Errors.Error1) -> case ds of wild { Language.Fixpoint.Types.Errors.Error1 ds1 ds2 -> ds2 }) -} baef9c1fa43dbe1a498d99d2cb072930 exit :: a -> GHC.Types.IO a -> GHC.Types.IO a {- Arity: 3, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Errors.exit1 `cast` (forall (a :: <*>_N). _R ->_R _R ->_R Sym (GHC.Types.N:IO[0] _R)) -} 0d1c75d38a338326807cc0b92096ae78 exit1 :: a -> GHC.Types.IO a -> GHC.Prim.State# GHC.Prim.RealWorld -> (# GHC.Prim.State# GHC.Prim.RealWorld, a #) {- Arity: 3, Strictness: , Unfolding: (\ @ a (def :: a) (act :: GHC.Types.IO a) (eta :: GHC.Prim.State# GHC.Prim.RealWorld)[OneShot] -> GHC.Prim.catch# @ a @ GHC.Exception.SomeException (GHC.Magic.lazy @ (GHC.Types.IO a) act) `cast` (GHC.Types.N:IO[0] _R) (\ (e1 :: GHC.Exception.SomeException)[OneShot] (eta1 :: GHC.Prim.State# GHC.Prim.RealWorld)[OneShot] -> case e1 of wild { GHC.Exception.SomeException e10 $dException1 e2 -> case (GHC.Exception.$p1Exception @ e10 $dException1) `cast` (Data.Typeable.Internal.N:Typeable[0] <*>_N _N) (GHC.Prim.proxy# @ * @ e10) of wild1 { Data.Typeable.Internal.TypeRep dt dt1 ds2 ds3 ds4 -> case Language.Fixpoint.Types.Errors.$fExceptionError8 of wild2 { Data.Typeable.Internal.TypeRep dt2 dt3 ds5 ds6 ds7 -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.eqWord# dt dt2) of wild3 { GHC.Types.False -> GHC.Prim.raiseIO# @ GHC.Exception.SomeException @ a wild eta1 GHC.Types.True -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.eqWord# dt1 dt3) of wild4 { GHC.Types.False -> GHC.Prim.raiseIO# @ GHC.Exception.SomeException @ a wild eta1 GHC.Types.True -> case GHC.IO.Handle.Text.hPutStr2 GHC.IO.Handle.FD.stdout (Text.PrettyPrint.Annotated.HughesPJ.fullRenderAnn @ () @ GHC.Base.String Text.PrettyPrint.Annotated.HughesPJ.PageMode Text.PrettyPrint.Annotated.HughesPJ.render3 Text.PrettyPrint.Annotated.HughesPJ.render2 Language.Fixpoint.Types.Errors.exit4 (GHC.Types.[] @ GHC.Types.Char) (case Text.PrettyPrint.Annotated.HughesPJ.$wreduceVert @ () (Text.PrettyPrint.Annotated.HughesPJ.vcat1 @ () (GHC.Types.: @ (Text.PrettyPrint.Annotated.HughesPJ.Doc ()) Language.Fixpoint.Types.Errors.exit2 `cast` (Text.PrettyPrint.HughesPJ.N:Doc[0]) (GHC.Types.: @ (Text.PrettyPrint.Annotated.HughesPJ.Doc ()) (Language.Fixpoint.Types.Errors.$w$cpprintTidy1 e2 `cast` (UnsafeCo representational e10 Language.Fixpoint.Types.Errors.Error)) `cast` (Text.PrettyPrint.HughesPJ.N:Doc[0]) (GHC.Types.[] @ (Text.PrettyPrint.Annotated.HughesPJ.Doc ()))))) of ww { (#,#) ww1 ww2 -> ww2 })) GHC.Types.True eta1 of ds1 { (#,#) ipv ipv1 -> (# ipv, def #) } } } } } }) eta) -} 16971c68ce9c7a053117a790b42144d6 exit2 :: Text.PrettyPrint.HughesPJ.Doc {- Unfolding: (case GHC.List.$wlenAcc @ GHC.Types.Char Language.Fixpoint.Types.Errors.exit_s 0# of ww2 { DEFAULT -> (Text.PrettyPrint.Annotated.HughesPJ.TextBeside @ () (Text.PrettyPrint.Annotated.HughesPJ.NoAnnot @ () Language.Fixpoint.Types.Errors.exit3 ww2) (Text.PrettyPrint.Annotated.HughesPJ.Empty @ ())) `cast` (Sym (Text.PrettyPrint.HughesPJ.N:Doc[0])) }) -} dc1a412208851017ff23dbd01dd3653e exit3 :: Text.PrettyPrint.Annotated.HughesPJ.TextDetails {- Unfolding: (Text.PrettyPrint.Annotated.HughesPJ.Str Language.Fixpoint.Types.Errors.exit_s) -} 7c190c3b85652490a1a439ef04ba3a07 exit4 :: Text.PrettyPrint.Annotated.HughesPJ.AnnotDetails () -> GHC.Base.String -> GHC.Base.String {- Arity: 2, HasNoCafRefs, Unfolding: (\ (ds :: Text.PrettyPrint.Annotated.HughesPJ.AnnotDetails ()) (eta :: GHC.Base.String)[OneShot] -> case ds of wild { DEFAULT -> eta Text.PrettyPrint.Annotated.HughesPJ.NoAnnot s dt1 -> case s of wild1 { Text.PrettyPrint.Annotated.HughesPJ.Chr dt -> GHC.Types.: @ GHC.Types.Char (GHC.Types.C# dt) eta Text.PrettyPrint.Annotated.HughesPJ.Str s1 -> GHC.Base.++ @ GHC.Types.Char s1 eta Text.PrettyPrint.Annotated.HughesPJ.PStr s1 -> GHC.Base.++ @ GHC.Types.Char s1 eta } }) -} cc8365c54579797f510c08b6d172d987 exit_s :: GHC.Base.String {- Unfolding: (GHC.CString.unpackCString# "Unexpected Errors!"#) -} 2c5d213b3ed009477ac7767316f04226 resultDoc :: Language.Fixpoint.Types.PrettyPrint.Fixpoint a => Language.Fixpoint.Types.Errors.FixResult a -> Text.PrettyPrint.HughesPJ.Doc {- Arity: 2, Strictness: , Unfolding: (\ @ a ($dFixpoint :: Language.Fixpoint.Types.PrettyPrint.Fixpoint a) (ds :: Language.Fixpoint.Types.Errors.FixResult a) -> case ds of wild { Language.Fixpoint.Types.Errors.Crash xs msg -> case Text.PrettyPrint.Annotated.HughesPJ.$wreduceVert @ () (Text.PrettyPrint.Annotated.HughesPJ.vcat1 @ () (GHC.Types.: @ (Text.PrettyPrint.Annotated.HughesPJ.Doc ()) (let { s :: GHC.Base.String = GHC.CString.unpackAppendCString# "Crash!: "# msg } in case GHC.List.$wlenAcc @ GHC.Types.Char s 0# of ww2 { DEFAULT -> Text.PrettyPrint.Annotated.HughesPJ.TextBeside @ () (Text.PrettyPrint.Annotated.HughesPJ.NoAnnot @ () (Text.PrettyPrint.Annotated.HughesPJ.Str s) ww2) (Text.PrettyPrint.Annotated.HughesPJ.Empty @ ()) }) (let { g :: a -> Text.PrettyPrint.HughesPJ.Doc = Language.Fixpoint.Types.PrettyPrint.toFix @ a $dFixpoint } in letrec { go :: [a] -> [Text.PrettyPrint.Annotated.HughesPJ.Doc ()] {- Arity: 1, Strictness: -} = \ (ds1 :: [a]) -> case ds1 of wild1 { [] -> GHC.Types.[] @ (Text.PrettyPrint.Annotated.HughesPJ.Doc ()) : y ys -> GHC.Types.: @ (Text.PrettyPrint.Annotated.HughesPJ.Doc ()) (case (g y) `cast` (Text.PrettyPrint.HughesPJ.N:Doc[0]) of wild2 { DEFAULT -> case Language.Fixpoint.Types.Errors.resultDoc7 `cast` (Text.PrettyPrint.HughesPJ.N:Doc[0]) of wild3 { DEFAULT -> Text.PrettyPrint.Annotated.HughesPJ.Beside @ () wild3 GHC.Types.True wild2 Text.PrettyPrint.Annotated.HughesPJ.Empty -> wild2 } Text.PrettyPrint.Annotated.HughesPJ.Empty -> Language.Fixpoint.Types.Errors.resultDoc7 `cast` (Text.PrettyPrint.HughesPJ.N:Doc[0]) }) (go ys) } } in go xs))) of ww { (#,#) ww1 ww2 -> ww2 `cast` (Sym (Text.PrettyPrint.HughesPJ.N:Doc[0])) } Language.Fixpoint.Types.Errors.Safe -> Language.Fixpoint.Types.Errors.resultDoc5 Language.Fixpoint.Types.Errors.Unsafe xs -> case Text.PrettyPrint.Annotated.HughesPJ.$wreduceVert @ () (Text.PrettyPrint.Annotated.HughesPJ.vcat1 @ () (GHC.Types.: @ (Text.PrettyPrint.Annotated.HughesPJ.Doc ()) Language.Fixpoint.Types.Errors.resultDoc3 `cast` (Text.PrettyPrint.HughesPJ.N:Doc[0]) (let { g :: a -> Text.PrettyPrint.HughesPJ.Doc = Language.Fixpoint.Types.PrettyPrint.toFix @ a $dFixpoint } in letrec { go :: [a] -> [Text.PrettyPrint.Annotated.HughesPJ.Doc ()] {- Arity: 1, Strictness: -} = \ (ds1 :: [a]) -> case ds1 of wild1 { [] -> GHC.Types.[] @ (Text.PrettyPrint.Annotated.HughesPJ.Doc ()) : y ys -> GHC.Types.: @ (Text.PrettyPrint.Annotated.HughesPJ.Doc ()) (case (g y) `cast` (Text.PrettyPrint.HughesPJ.N:Doc[0]) of wild2 { DEFAULT -> case Language.Fixpoint.Types.Errors.resultDoc1 `cast` (Text.PrettyPrint.HughesPJ.N:Doc[0]) of wild3 { DEFAULT -> Text.PrettyPrint.Annotated.HughesPJ.Beside @ () wild3 GHC.Types.True wild2 Text.PrettyPrint.Annotated.HughesPJ.Empty -> wild2 } Text.PrettyPrint.Annotated.HughesPJ.Empty -> Language.Fixpoint.Types.Errors.resultDoc1 `cast` (Text.PrettyPrint.HughesPJ.N:Doc[0]) }) (go ys) } } in go xs))) of ww { (#,#) ww1 ww2 -> ww2 `cast` (Sym (Text.PrettyPrint.HughesPJ.N:Doc[0])) } }) -} 6e155e0af68b736543a5bbdf51d98da2 resultDoc1 :: Text.PrettyPrint.HughesPJ.Doc {- Unfolding: (case GHC.List.$wlenAcc @ GHC.Types.Char Language.Fixpoint.Types.Errors.resultDoc_s 0# of ww2 { DEFAULT -> (Text.PrettyPrint.Annotated.HughesPJ.TextBeside @ () (Text.PrettyPrint.Annotated.HughesPJ.NoAnnot @ () Language.Fixpoint.Types.Errors.resultDoc2 ww2) (Text.PrettyPrint.Annotated.HughesPJ.Empty @ ())) `cast` (Sym (Text.PrettyPrint.HughesPJ.N:Doc[0])) }) -} 5843ea84200cbb23fe9d176e1468c2b9 resultDoc2 :: Text.PrettyPrint.Annotated.HughesPJ.TextDetails {- Unfolding: (Text.PrettyPrint.Annotated.HughesPJ.Str Language.Fixpoint.Types.Errors.resultDoc_s) -} 845c7e86447c4b8ee6cc9b79055e508c resultDoc3 :: Text.PrettyPrint.HughesPJ.Doc {- Unfolding: (case GHC.List.$wlenAcc @ GHC.Types.Char Language.Fixpoint.Types.Errors.resultDoc_s1 0# of ww2 { DEFAULT -> (Text.PrettyPrint.Annotated.HughesPJ.TextBeside @ () (Text.PrettyPrint.Annotated.HughesPJ.NoAnnot @ () Language.Fixpoint.Types.Errors.resultDoc4 ww2) (Text.PrettyPrint.Annotated.HughesPJ.Empty @ ())) `cast` (Sym (Text.PrettyPrint.HughesPJ.N:Doc[0])) }) -} fe77f74ede74bba286ce0e77e32db569 resultDoc4 :: Text.PrettyPrint.Annotated.HughesPJ.TextDetails {- Unfolding: (Text.PrettyPrint.Annotated.HughesPJ.Str Language.Fixpoint.Types.Errors.resultDoc_s1) -} 6efb231968b38efbde5f004a80f918ad resultDoc5 :: Text.PrettyPrint.HughesPJ.Doc {- Unfolding: (case GHC.List.$wlenAcc @ GHC.Types.Char Language.Fixpoint.Types.Errors.$fExceptionFixResult3 0# of ww2 { DEFAULT -> (Text.PrettyPrint.Annotated.HughesPJ.TextBeside @ () (Text.PrettyPrint.Annotated.HughesPJ.NoAnnot @ () Language.Fixpoint.Types.Errors.resultDoc6 ww2) (Text.PrettyPrint.Annotated.HughesPJ.Empty @ ())) `cast` (Sym (Text.PrettyPrint.HughesPJ.N:Doc[0])) }) -} d071f56b9af37b9b8cfab93da9635c31 resultDoc6 :: Text.PrettyPrint.Annotated.HughesPJ.TextDetails {- Unfolding: (Text.PrettyPrint.Annotated.HughesPJ.Str Language.Fixpoint.Types.Errors.$fExceptionFixResult3) -} 6a6af9e2c6d197da8f32405873a0107c resultDoc7 :: Text.PrettyPrint.HughesPJ.Doc {- Unfolding: (case GHC.List.$wlenAcc @ GHC.Types.Char Language.Fixpoint.Types.Errors.resultDoc_s2 0# of ww2 { DEFAULT -> (Text.PrettyPrint.Annotated.HughesPJ.TextBeside @ () (Text.PrettyPrint.Annotated.HughesPJ.NoAnnot @ () Language.Fixpoint.Types.Errors.resultDoc8 ww2) (Text.PrettyPrint.Annotated.HughesPJ.Empty @ ())) `cast` (Sym (Text.PrettyPrint.HughesPJ.N:Doc[0])) }) -} e925800401e42413a5a8dbda5818666a resultDoc8 :: Text.PrettyPrint.Annotated.HughesPJ.TextDetails {- Unfolding: (Text.PrettyPrint.Annotated.HughesPJ.Str Language.Fixpoint.Types.Errors.resultDoc_s2) -} 599814b7947d142f0f4d5448c758c297 resultDoc_s :: GHC.Base.String {- Unfolding: (GHC.CString.unpackCString# "WARNING:"#) -} 94c5751065dc4698686359a5c12b5319 resultDoc_s1 :: GHC.Base.String {- Unfolding: (GHC.CString.unpackCString# "Unsafe:"#) -} 86350d3ff0a7b43fd30828e7af7dc1d7 resultDoc_s2 :: GHC.Base.String {- Unfolding: (GHC.CString.unpackCString# "CRASH:"#) -} instance Data.Binary.Class.Binary [Language.Fixpoint.Types.Errors.FixResult] = Language.Fixpoint.Types.Errors.$fBinaryFixResult instance Data.Data.Data [Language.Fixpoint.Types.Errors.FixResult] = Language.Fixpoint.Types.Errors.$fDataFixResult instance GHC.Classes.Eq [Language.Fixpoint.Types.Errors.Error] = Language.Fixpoint.Types.Errors.$fEqError instance GHC.Classes.Eq [Language.Fixpoint.Types.Errors.Error1] = Language.Fixpoint.Types.Errors.$fEqError1 instance GHC.Classes.Eq [Language.Fixpoint.Types.Errors.FixResult] = Language.Fixpoint.Types.Errors.$fEqFixResult instance GHC.Exception.Exception [Language.Fixpoint.Types.Errors.Error] = Language.Fixpoint.Types.Errors.$fExceptionError instance GHC.Exception.Exception [Language.Fixpoint.Types.Errors.FixResult] = Language.Fixpoint.Types.Errors.$fExceptionFixResult instance Language.Fixpoint.Types.PrettyPrint.Fixpoint [Language.Fixpoint.Types.Errors.Error1] = Language.Fixpoint.Types.Errors.$fFixpointError1 instance Data.Foldable.Foldable [Language.Fixpoint.Types.Errors.FixResult] = Language.Fixpoint.Types.Errors.$fFoldableFixResult instance GHC.Base.Functor [Language.Fixpoint.Types.Errors.FixResult] = Language.Fixpoint.Types.Errors.$fFunctorFixResult instance GHC.Generics.Generic [Text.PrettyPrint.Annotated.HughesPJ.AnnotDetails] = Language.Fixpoint.Types.Errors.$fGenericAnnotDetails instance GHC.Generics.Generic [Language.Fixpoint.Types.Errors.Error] = Language.Fixpoint.Types.Errors.$fGenericError instance GHC.Generics.Generic [Language.Fixpoint.Types.Errors.Error1] = Language.Fixpoint.Types.Errors.$fGenericError1 instance GHC.Generics.Generic [Language.Fixpoint.Types.Errors.FixResult] = Language.Fixpoint.Types.Errors.$fGenericFixResult instance GHC.Base.Monoid [Language.Fixpoint.Types.Errors.FixResult] = Language.Fixpoint.Types.Errors.$fMonoidFixResult instance Control.DeepSeq.NFData [Language.Fixpoint.Types.Errors.FixResult] = Language.Fixpoint.Types.Errors.$fNFDataFixResult instance GHC.Classes.Ord [Language.Fixpoint.Types.Errors.Error] = Language.Fixpoint.Types.Errors.$fOrdError instance GHC.Classes.Ord [Language.Fixpoint.Types.Errors.Error1] = Language.Fixpoint.Types.Errors.$fOrdError1 instance Language.Fixpoint.Types.PrettyPrint.PPrint [Language.Fixpoint.Types.Errors.Error] = Language.Fixpoint.Types.Errors.$fPPrintError instance Language.Fixpoint.Types.PrettyPrint.PPrint [Language.Fixpoint.Types.Errors.Error1] = Language.Fixpoint.Types.Errors.$fPPrintError1 instance Data.Serialize.Serialize [Text.PrettyPrint.Annotated.HughesPJ.AnnotDetails] = Language.Fixpoint.Types.Errors.$fSerializeAnnotDetails instance Data.Serialize.Serialize [Text.PrettyPrint.HughesPJ.Doc] = Language.Fixpoint.Types.Errors.$fSerializeDoc instance Data.Serialize.Serialize [Text.PrettyPrint.Annotated.HughesPJ.Doc] = Language.Fixpoint.Types.Errors.$fSerializeDoc0 instance Data.Serialize.Serialize [Language.Fixpoint.Types.Errors.Error] = Language.Fixpoint.Types.Errors.$fSerializeError instance Data.Serialize.Serialize [Language.Fixpoint.Types.Errors.Error1] = Language.Fixpoint.Types.Errors.$fSerializeError1 instance Data.Serialize.Serialize [Language.Fixpoint.Types.Errors.FixResult] = Language.Fixpoint.Types.Errors.$fSerializeFixResult instance Data.Serialize.Serialize [Text.PrettyPrint.Annotated.HughesPJ.TextDetails] = Language.Fixpoint.Types.Errors.$fSerializeTextDetails instance GHC.Show.Show [Language.Fixpoint.Types.Errors.Error] = Language.Fixpoint.Types.Errors.$fShowError instance GHC.Show.Show [Language.Fixpoint.Types.Errors.Error1] = Language.Fixpoint.Types.Errors.$fShowError1 instance GHC.Show.Show [Language.Fixpoint.Types.Errors.FixResult] = Language.Fixpoint.Types.Errors.$fShowFixResult instance Data.Traversable.Traversable [Language.Fixpoint.Types.Errors.FixResult] = Language.Fixpoint.Types.Errors.$fTraversableFixResult family instance GHC.Generics.Rep [Language.Fixpoint.Types.Errors.FixResult] = Language.Fixpoint.Types.Errors.Rep_FixResult family instance GHC.Generics.Rep [Language.Fixpoint.Types.Errors.Error] = Language.Fixpoint.Types.Errors.Rep_Error family instance GHC.Generics.Rep [Language.Fixpoint.Types.Errors.Error1] = Language.Fixpoint.Types.Errors.Rep_Error1 family instance GHC.Generics.Rep [Text.PrettyPrint.Annotated.HughesPJ.AnnotDetails] = Language.Fixpoint.Types.Errors.Rep_AnnotDetails "SPEC $cput @ ()" [ALWAYS] forall ($dSerialize :: Data.Serialize.Serialize ()) Language.Fixpoint.Types.Errors.$fSerializeDoc0_$cput @ () $dSerialize = Language.Fixpoint.Types.Errors.$fSerializeDoc_$s$cput "SPEC/Language.Fixpoint.Types.Errors $dmput @ (FixResult Error)" [ALWAYS] forall ($dGSerializePut :: Data.Serialize.GSerializePut (GHC.Generics.Rep (Language.Fixpoint.Types.Errors.FixResult Language.Fixpoint.Types.Errors.Error))) ($dGeneric :: GHC.Generics.Generic (Language.Fixpoint.Types.Errors.FixResult Language.Fixpoint.Types.Errors.Error)) ($dSerialize :: Data.Serialize.Serialize (Language.Fixpoint.Types.Errors.FixResult Language.Fixpoint.Types.Errors.Error)) Data.Serialize.$dmput @ (Language.Fixpoint.Types.Errors.FixResult Language.Fixpoint.Types.Errors.Error) $dSerialize $dGeneric $dGSerializePut = Language.Fixpoint.Types.Errors.$fSerializeFixResult_$s$dmput "SPEC/Language.Fixpoint.Types.Errors $dmput @ Doc" [ALWAYS] forall ($dGSerializePut :: Data.Serialize.GSerializePut (GHC.Generics.Rep Text.PrettyPrint.HughesPJ.Doc)) ($dGeneric :: GHC.Generics.Generic Text.PrettyPrint.HughesPJ.Doc) ($dSerialize :: Data.Serialize.Serialize Text.PrettyPrint.HughesPJ.Doc) Data.Serialize.$dmput @ Text.PrettyPrint.HughesPJ.Doc $dSerialize $dGeneric $dGSerializePut = Language.Fixpoint.Types.Errors.$fSerializeDoc_$s$dmput "SPEC/Language.Fixpoint.Types.Errors $dmput @ Error" [ALWAYS] forall ($dGSerializePut :: Data.Serialize.GSerializePut (GHC.Generics.Rep Language.Fixpoint.Types.Errors.Error)) ($dGeneric :: GHC.Generics.Generic Language.Fixpoint.Types.Errors.Error) ($dSerialize :: Data.Serialize.Serialize Language.Fixpoint.Types.Errors.Error) Data.Serialize.$dmput @ Language.Fixpoint.Types.Errors.Error $dSerialize $dGeneric $dGSerializePut = Language.Fixpoint.Types.Errors.$fSerializeError_$s$dmput "SPEC/Language.Fixpoint.Types.Errors $dmput @ Error1" [ALWAYS] forall ($dGSerializePut :: Data.Serialize.GSerializePut (GHC.Generics.Rep Language.Fixpoint.Types.Errors.Error1)) ($dGeneric :: GHC.Generics.Generic Language.Fixpoint.Types.Errors.Error1) ($dSerialize :: Data.Serialize.Serialize Language.Fixpoint.Types.Errors.Error1) Data.Serialize.$dmput @ Language.Fixpoint.Types.Errors.Error1 $dSerialize $dGeneric $dGSerializePut = Language.Fixpoint.Types.Errors.$fSerializeError1_$s$dmput "SPEC/Language.Fixpoint.Types.Errors $dmsimplify @ Error1" [ALWAYS] forall ($dFixpoint :: Language.Fixpoint.Types.PrettyPrint.Fixpoint Language.Fixpoint.Types.Errors.Error1) Language.Fixpoint.Types.PrettyPrint.$dmsimplify @ Language.Fixpoint.Types.Errors.Error1 $dFixpoint = Language.Fixpoint.Types.Errors.$fFixpointError1_$s$dmsimplify "SPEC/Language.Fixpoint.Types.Errors $fEq[]_$c/= @ Error1" [ALWAYS] forall ($dEq :: GHC.Classes.Eq Language.Fixpoint.Types.Errors.Error1) GHC.Classes.$fEq[]_$c/= @ Language.Fixpoint.Types.Errors.Error1 $dEq = Language.Fixpoint.Types.Errors.$fEqError_$s$fEq[]_$c/= "SPEC/Language.Fixpoint.Types.Errors $fOrd[]_$c< @ Error1" [ALWAYS] forall ($dOrd :: GHC.Classes.Ord Language.Fixpoint.Types.Errors.Error1) GHC.Classes.$fOrd[]_$c< @ Language.Fixpoint.Types.Errors.Error1 $dOrd = Language.Fixpoint.Types.Errors.$fOrdError_$s$fOrd[]_$c< "SPEC/Language.Fixpoint.Types.Errors $fOrd[]_$c<= @ Error1" [ALWAYS] forall ($dOrd :: GHC.Classes.Ord Language.Fixpoint.Types.Errors.Error1) GHC.Classes.$fOrd[]_$c<= @ Language.Fixpoint.Types.Errors.Error1 $dOrd = Language.Fixpoint.Types.Errors.$fOrdError_$s$fOrd[]_$c<= "SPEC/Language.Fixpoint.Types.Errors $fOrd[]_$c> @ Error1" [ALWAYS] forall ($dOrd :: GHC.Classes.Ord Language.Fixpoint.Types.Errors.Error1) GHC.Classes.$fOrd[]_$c> @ Language.Fixpoint.Types.Errors.Error1 $dOrd = Language.Fixpoint.Types.Errors.$fOrdError_$s$fOrd[]_$c> "SPEC/Language.Fixpoint.Types.Errors $fOrd[]_$c>= @ Error1" [ALWAYS] forall ($dOrd :: GHC.Classes.Ord Language.Fixpoint.Types.Errors.Error1) GHC.Classes.$fOrd[]_$c>= @ Language.Fixpoint.Types.Errors.Error1 $dOrd = Language.Fixpoint.Types.Errors.$fOrdError_$s$fOrd[]_$c>= "SPEC/Language.Fixpoint.Types.Errors $fOrd[]_$cmax @ Error1" [ALWAYS] forall ($dOrd :: GHC.Classes.Ord Language.Fixpoint.Types.Errors.Error1) GHC.Classes.$fOrd[]_$cmax @ Language.Fixpoint.Types.Errors.Error1 $dOrd = Language.Fixpoint.Types.Errors.$fOrdError_$s$fOrd[]_$cmax "SPEC/Language.Fixpoint.Types.Errors $fOrd[]_$cmin @ Error1" [ALWAYS] forall ($dOrd :: GHC.Classes.Ord Language.Fixpoint.Types.Errors.Error1) GHC.Classes.$fOrd[]_$cmin @ Language.Fixpoint.Types.Errors.Error1 $dOrd = Language.Fixpoint.Types.Errors.$fOrdError_$s$fOrd[]_$cmin "SPEC/Language.Fixpoint.Types.Errors pprint @ Error1" [ALWAYS] forall ($dPPrint :: Language.Fixpoint.Types.PrettyPrint.PPrint Language.Fixpoint.Types.Errors.Error1) Language.Fixpoint.Types.PrettyPrint.pprint @ Language.Fixpoint.Types.Errors.Error1 $dPPrint = Language.Fixpoint.Types.Errors.$fFixpointError1_$spprint vectorised variables: vectorised tycons: vectorised reused tycons: parallel variables: parallel tycons: trusted: none require own pkg trusted: False