==================== FINAL INTERFACE ==================== 2017-05-02 18:36:21.875402 UTC interface liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf:Language.Fixpoint.Types.Environments [orphan module] [family instance module] 8002 interface hash: 8a80bc80d2950634b7955092a93e9ede ABI hash: 39a7a5317852adad63623f9a402cc5a6 export-list hash: 0b4b7a69569980039fc5b65d426e2d6f orphan hash: f7b6b5da9218839e051f2a6395adc47e flag hash: 2096a597d0d6a69efcfed2db3188ea04 sig of: Nothing used TH splices: False where exports: Language.Fixpoint.Types.Environments.adjustBindEnv Language.Fixpoint.Types.Environments.bindEnvFromList Language.Fixpoint.Types.Environments.bindEnvToList Language.Fixpoint.Types.Environments.deleteIBindEnv Language.Fixpoint.Types.Environments.deleteSEnv Language.Fixpoint.Types.Environments.diffIBindEnv Language.Fixpoint.Types.Environments.differenceSEnv Language.Fixpoint.Types.Environments.elemsBindEnv Language.Fixpoint.Types.Environments.elemsIBindEnv Language.Fixpoint.Types.Environments.emptyBindEnv Language.Fixpoint.Types.Environments.emptyIBindEnv Language.Fixpoint.Types.Environments.emptySEnv Language.Fixpoint.Types.Environments.envCs Language.Fixpoint.Types.Environments.filterBindEnv Language.Fixpoint.Types.Environments.filterIBindEnv Language.Fixpoint.Types.Environments.filterSEnv Language.Fixpoint.Types.Environments.fromListSEnv Language.Fixpoint.Types.Environments.fromMapSEnv Language.Fixpoint.Types.Environments.getPack Language.Fixpoint.Types.Environments.insertBindEnv Language.Fixpoint.Types.Environments.insertSEnv Language.Fixpoint.Types.Environments.insertsIBindEnv Language.Fixpoint.Types.Environments.intersectWithSEnv Language.Fixpoint.Types.Environments.intersectionIBindEnv Language.Fixpoint.Types.Environments.lookupBindEnv Language.Fixpoint.Types.Environments.lookupSEnv Language.Fixpoint.Types.Environments.lookupSEnvWithDistance Language.Fixpoint.Types.Environments.makePack Language.Fixpoint.Types.Environments.mapBindEnv Language.Fixpoint.Types.Environments.mapMSEnv Language.Fixpoint.Types.Environments.mapSEnv Language.Fixpoint.Types.Environments.mapSEnvWithKey Language.Fixpoint.Types.Environments.mapWithKeyMBindEnv Language.Fixpoint.Types.Environments.memberIBindEnv Language.Fixpoint.Types.Environments.memberSEnv Language.Fixpoint.Types.Environments.nullIBindEnv Language.Fixpoint.Types.Environments.toListSEnv Language.Fixpoint.Types.Environments.unionIBindEnv Language.Fixpoint.Types.Environments.unionSEnv Language.Fixpoint.Types.Environments.unionSEnv' Language.Fixpoint.Types.Environments.BindEnv Language.Fixpoint.Types.Environments.BindId Language.Fixpoint.Types.Environments.BindMap Language.Fixpoint.Types.Environments.IBindEnv Language.Fixpoint.Types.Environments.Packs{Language.Fixpoint.Types.Environments.Packs packm} Language.Fixpoint.Types.Environments.SESearch{Language.Fixpoint.Types.Environments.Alts Language.Fixpoint.Types.Environments.Found} Language.Fixpoint.Types.Environments.SEnv Language.Fixpoint.Types.Environments.SizedEnv|{beBinds} Language.Fixpoint.Types.Environments.SolEnv{Language.Fixpoint.Types.Environments.SolEnv soeBinds} module dependencies: Language.Fixpoint.Misc Language.Fixpoint.Types.Names Language.Fixpoint.Types.PrettyPrint Language.Fixpoint.Types.Refinements Language.Fixpoint.Types.Sorts Language.Fixpoint.Types.Spans Language.Fixpoint.Types.Substitutions 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 intern-0.9.1.4@intern-0.9.1.4-L6DPHi71I8uFQt9sdHfbWx 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.Names liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf:Language.Fixpoint.Types.Refinements liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf:Language.Fixpoint.Types.Spans liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf:Language.Fixpoint.Types.Substitutions 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 intern-0.9.1.4@intern-0.9.1.4-L6DPHi71I8uFQt9sdHfbWx:Data.Interned.Internal.Text liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf:Language.Fixpoint.Types.Names liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf:Language.Fixpoint.Types.Refinements liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf:Language.Fixpoint.Types.Sorts 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: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.List 07ae2acca6538aa0800bd0a993ac6ac1 import -/ base-4.9.1.0:Data.Maybe d876c4ffe4b3c43755a781e8ad860d88 import -/ base-4.9.1.0:Data.OldList 27987919d8da2f92e3f472ca81f730f8 import -/ base-4.9.1.0:Data.Traversable 556020d7cf3c4a34a774600512918a37 import -/ base-4.9.1.0:Data.Tuple 7dc4bbb45d2e69c991ffac438beeca11 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.Generics 1dbec2bc7dd1c5bd8c89ed857eaed19b import -/ base-4.9.1.0:GHC.List ab8c4e523e6c479c549d3bcd5fc4a439 import -/ base-4.9.1.0:GHC.Num 00bfaa7b2f9d6084913c0697a8a49ec8 import -/ base-4.9.1.0:GHC.Show a027f5ac24879eaba752f44aa90fe511 import -/ base-4.9.1.0:Prelude 22dd289b8469a8fa8dc81cab7b237771 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 -/ deepseq-1.4.2.0@deepseq-1.4.2.0:Control.DeepSeq 0a99763cf6016b16bbf55422778a79b2 import -/ ghc-prim-0.5.0.0:GHC.Classes 0bdf3d057a415ec1b84a7b1994efbe47 import -/ hashable-1.2.6.0@hashable-1.2.6.0-3EXxoqeEgbfAKr6aGkye6x:Data.Hashable 7d10d34251a69a2590fb6d42e4140fe6 import -/ hashable-1.2.6.0@hashable-1.2.6.0-3EXxoqeEgbfAKr6aGkye6x:Data.Hashable.Class 8a5b5f72682ff3e25541f7e85c3ab8dc import -/ Language.Fixpoint.Misc 268edc2be2657e56d9ac2e0e5f861c66 exports: 0d4209a369f77ae55113ca41b56281c2 coalesce 17a5aa1e08f8a412b90c8a1683456312 editDistance ceeddc2c62bb641348c501fc486aa751 errorstar e13c48ac8d5f72547a0d41e4f1437551 fst3 d403c254371349110bdd0be2f09b4237 hashMapToAscList da9681d74f9e9e8aaa19c0da349c7ccd secondM 5bd51524e54059148447181e3f40360e import -/ Language.Fixpoint.Types.Names e10fad5e5b8ff170c535ac390b7d6df1 exports: 743e0e557751599295b6ae4810403574 Symbol 48f09ac5554b5659507cdde0ca23f8ac symbol bad58e97c0b3a81e2dad9c913729970a symbolString 819d69bd3146ce4a14769a9d11f1deac import -/ Language.Fixpoint.Types.PrettyPrint 9f8ba54128c047c2f5df631a58152645 exports: 8280ba96c3b943538085a23e8c114f93 Fixpoint cc7bdd91c6c79c1473a4d48904d3bc29 PPrint f926efd2d44310d1ff99c4868d82bc97 pprint 3b1416a258327e319f3edde9b9e2d64e pprintKVs f926efd2d44310d1ff99c4868d82bc97 pprintTidy 51116c55bcc153b0498f02ab688dd904 toFix adc72af29f82382843f845a7caada087 import -/ Language.Fixpoint.Types.Refinements 14ae5428586db5cedff3d8f72f8648b7 exports: 679e1835da47fa35bc6f2f814149dbeb KVar 9a92033bfe21324e80629facb0f6357f SortedReft 7fb70fb47d0302cfb4b9c12c86306141 import -/ Language.Fixpoint.Types.Substitutions 71387f94a50c084a205ef233a1922487 exports: a573d56a0ab0c7b358ce707e661d4756 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 import -/ unordered-containers-0.2.8.0@unordered-containers-0.2.8.0-1XEErQCPPPc2SEtcHHNx9o:Data.HashMap.Base 2b46c25df89b2b3ba6c50f91554dc6fe import -/ unordered-containers-0.2.8.0@unordered-containers-0.2.8.0-1XEErQCPPPc2SEtcHHNx9o:Data.HashMap.Strict 05b98a538bea7df232363274cae058f8 import -/ unordered-containers-0.2.8.0@unordered-containers-0.2.8.0-1XEErQCPPPc2SEtcHHNx9o:Data.HashSet ee03eb1144d3c6624c9254dd24f4ef67 e3017b5240cfe5e0f0a074e5188fb873 $c2kZ8jJ02SWUIgEgFgj8MIe :: Data.Data.Constr b7973c780b9739ddae3b90c3171d79ea $c4v5CIsTv9Ch4nAFqrNqrmN :: Data.Data.Constr c3f5170802430c71db642403f59c99f5 $fBinaryHashSet :: (Data.Hashable.Class.Hashable a, GHC.Classes.Eq a, Data.Binary.Class.Binary a) => Data.Binary.Class.Binary (Data.HashSet.HashSet a) DFunId {- Arity: 3, Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun: @ a ($dHashable :: Data.Hashable.Class.Hashable a) ($dEq :: GHC.Classes.Eq a) ($dBinary :: Data.Binary.Class.Binary a). @ (Data.HashSet.HashSet a) (Language.Fixpoint.Types.Environments.$fBinaryHashSet_$cput @ a $dHashable $dEq $dBinary) (Language.Fixpoint.Types.Environments.$fBinaryHashSet_$cget @ a $dHashable $dEq $dBinary) (Language.Fixpoint.Types.Environments.$fBinaryHashSet_$cputList @ a $dHashable $dEq $dBinary) -} 1961ca9215245151699a80eee3654e3c $fBinaryHashSet2 :: [GHC.Types.Int] -> Data.HashMap.Base.HashMap GHC.Types.Int () {- Arity: 1, Strictness: , Unfolding: (\ (eta :: [GHC.Types.Int]) -> Language.Fixpoint.Types.Environments.$fBinaryHashSet_go eta (Data.HashMap.Base.Empty @ GHC.Types.Int @ ())) -} fba50731547637dda5ffc56350564303 $fBinaryHashSet3 :: Data.HashSet.HashSet GHC.Types.Int -> Data.Binary.Put.PairS () {- Arity: 1, HasNoCafRefs, Strictness: m, Inline: INLINE[0], Unfolding: InlineRule (1, True, False) (\ (w :: Data.HashSet.HashSet GHC.Types.Int) -> case Language.Fixpoint.Types.Environments.$w$s$cput w of ww { (#,#) ww1 ww2 -> Data.Binary.Put.PairS @ () ww1 ww2 }) -} f6fe7c8de5986a0929f0c76991292242 $fBinaryHashSet4 :: [GHC.Int.Int64] -> (Data.ByteString.Builder.Internal.BufferRange -> GHC.Types.IO (Data.ByteString.Builder.Internal.BuildSignal 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: 4, HasNoCafRefs, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (4, True, False) (\ @ r (w :: [GHC.Int.Int64]) (w1 :: Data.ByteString.Builder.Internal.BufferRange -> GHC.Types.IO (Data.ByteString.Builder.Internal.BuildSignal r)) (w2 :: Data.ByteString.Builder.Internal.BufferRange) (w3 :: GHC.Prim.State# GHC.Prim.RealWorld)[OneShot] -> case w2 of ww { Data.ByteString.Builder.Internal.BufferRange ww1 ww2 -> Language.Fixpoint.Types.Environments.$wstep2 @ r w w1 ww1 ww2 w3 }) -} 563924c5dec95cbf1ab150f0bf12327d $fBinaryHashSet5 :: GHC.Types.Int -> GHC.Int.Int64 {- Arity: 1, HasNoCafRefs, Unfolding: (\ (x :: GHC.Types.Int) -> case x of wild { GHC.Types.I# x# -> GHC.Int.I64# x# }) -} 3ae8c3f6d81fd8b92ed942167c4795d3 $fBinaryHashSet6 :: (Data.Hashable.Class.Hashable a, GHC.Classes.Eq a, Data.Binary.Class.Binary a) => forall r. Data.ByteString.Internal.ByteString -> Data.Binary.Get.Internal.Success (Data.HashSet.HashSet a) r -> Data.Binary.Get.Internal.Decoder r {- Arity: 5, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (5, True, False) (\ @ a (w :: Data.Hashable.Class.Hashable a) (w1 :: GHC.Classes.Eq a) (w2 :: Data.Binary.Class.Binary a) @ r (w3 :: Data.ByteString.Internal.ByteString) (w4 :: Data.Binary.Get.Internal.Success (Data.HashSet.HashSet a) r) -> case w3 of ww { Data.ByteString.Internal.PS ww1 ww2 ww3 ww4 -> Language.Fixpoint.Types.Environments.$w$cget @ a w w1 w2 @ r ww1 ww2 ww3 ww4 w4 }) -} 69a77d1d0bd6637bfdebeb1fe4db2082 $fBinaryHashSet7 :: [a] -> Data.HashMap.Base.HashMap a () -> [a] {- Arity: 2, HasNoCafRefs, Strictness: -} a2fb23e6097127468e1cec8c6c4cf6c2 $fBinaryHashSet_$cget :: (Data.Hashable.Class.Hashable a, GHC.Classes.Eq a, Data.Binary.Class.Binary a) => Data.Binary.Get.Internal.Get (Data.HashSet.HashSet a) {- Arity: 5, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$fBinaryHashSet6 `cast` (forall (a :: <*>_N). _R ->_R _R ->_R _R ->_R Sym (Data.Binary.Get.Internal.N:Get[0] _R)) -} 25d6252d647469adf74bbbac734c77d0 $fBinaryHashSet_$cput :: (Data.Hashable.Class.Hashable a, GHC.Classes.Eq a, Data.Binary.Class.Binary a) => Data.HashSet.HashSet a -> Data.Binary.Put.Put {- Arity: 4, HasNoCafRefs, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (4, True, True) (\ @ a (w :: Data.Hashable.Class.Hashable a) (w1 :: GHC.Classes.Eq a) (w2 :: Data.Binary.Class.Binary a) (w3 :: Data.HashSet.HashSet a) -> Language.Fixpoint.Types.Environments.$w$cput @ a w2 w3) -} f1241913dda64b596d977edddc5b644c $fBinaryHashSet_$cputList :: (Data.Hashable.Class.Hashable a, GHC.Classes.Eq a, Data.Binary.Class.Binary a) => [Data.HashSet.HashSet a] -> Data.Binary.Put.Put {- Arity: 3, Strictness: -} 0da58f4558659a52e3aef28254d785a5 $fBinaryHashSet_go :: [GHC.Types.Int] -> Data.HashMap.Base.HashMap GHC.Types.Int () -> Data.HashMap.Base.HashMap GHC.Types.Int () {- Arity: 2, Strictness: -} cc5d34d096f81f6765ffe066533fa19b $fBinaryHashSet_go1 :: [GHC.Types.Int] -> Data.HashMap.Base.HashMap GHC.Types.Int () -> [GHC.Types.Int] {- Arity: 2, HasNoCafRefs, Strictness: -} dae79859b3442c211473f5cded0c14f7 $fBinaryIBindEnv :: Data.Binary.Class.Binary Language.Fixpoint.Types.Environments.IBindEnv DFunId {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Environments.IBindEnv Language.Fixpoint.Types.Environments.$fBinaryIBindEnv_$cput Language.Fixpoint.Types.Environments.$fBinaryIBindEnv_$cget Language.Fixpoint.Types.Environments.$fBinaryIBindEnv_$cputList -} dae79859b3442c211473f5cded0c14f7 $fBinaryIBindEnv1 :: Data.ByteString.Internal.ByteString -> Data.Binary.Get.Internal.Success Language.Fixpoint.Types.Environments.IBindEnv r -> Data.Binary.Get.Internal.Decoder r {- Arity: 2, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (2, True, False) (\ @ r (w :: Data.ByteString.Internal.ByteString) (w1 :: Data.Binary.Get.Internal.Success Language.Fixpoint.Types.Environments.IBindEnv r) -> case w of ww { Data.ByteString.Internal.PS ww1 ww2 ww3 ww4 -> Language.Fixpoint.Types.Environments.$w$cget1 @ r ww1 ww2 ww3 ww4 w1 }) -} dae79859b3442c211473f5cded0c14f7 $fBinaryIBindEnv_$cget :: Data.Binary.Get.Internal.Get Language.Fixpoint.Types.Environments.IBindEnv {- Arity: 2, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$fBinaryIBindEnv1 `cast` (Sym (Data.Binary.Get.Internal.N:Get[0] _R)) -} dae79859b3442c211473f5cded0c14f7 $fBinaryIBindEnv_$cput :: Language.Fixpoint.Types.Environments.IBindEnv -> Data.Binary.Put.Put {- Arity: 1, HasNoCafRefs, Strictness: m, Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$fBinaryHashSet3 `cast` (Sym (Language.Fixpoint.Types.Environments.N:IBindEnv[0]) ->_R Sym (Data.Binary.Put.N:PutM[0]) <()>_N) -} dae79859b3442c211473f5cded0c14f7 $fBinaryIBindEnv_$cputList :: [Language.Fixpoint.Types.Environments.IBindEnv] -> Data.Binary.Put.Put {- Arity: 1 -} 999de3bcf4ed26dd71bfcb519acbd47a $fBinaryPacks :: Data.Binary.Class.Binary Language.Fixpoint.Types.Environments.Packs DFunId {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Environments.Packs Language.Fixpoint.Types.Environments.$fBinaryPacks_$s$dmput Language.Fixpoint.Types.Environments.$fBinaryPacks_$cget Language.Fixpoint.Types.Environments.$fBinaryPacks_$cputList -} 999de3bcf4ed26dd71bfcb519acbd47a $fBinaryPacks1 :: Data.ByteString.Internal.ByteString -> Data.Binary.Get.Internal.Success Language.Fixpoint.Types.Environments.Packs r -> Data.Binary.Get.Internal.Decoder r {- Arity: 2, Strictness: , Unfolding: (\ @ r (i :: Data.ByteString.Internal.ByteString) (ks :: Data.Binary.Get.Internal.Success Language.Fixpoint.Types.Environments.Packs r) -> (Language.Fixpoint.Types.Refinements.$fBinaryHashMap_$cget @ Language.Fixpoint.Types.Refinements.KVar @ GHC.Types.Int Language.Fixpoint.Types.Refinements.$fHashableKVar Language.Fixpoint.Types.Refinements.$fEqKVar Language.Fixpoint.Types.Refinements.$fBinaryKVar Data.Binary.Class.$fBinaryInt) `cast` (Data.Binary.Get.Internal.N:Get[0] _R) @ r i (\ (i' :: Data.ByteString.Internal.ByteString) (a1 :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar GHC.Types.Int) -> ks i' a1 `cast` (Sym (Language.Fixpoint.Types.Environments.N:Packs[0])))) -} 999de3bcf4ed26dd71bfcb519acbd47a $fBinaryPacks2 :: Language.Fixpoint.Types.Environments.Packs -> Language.Fixpoint.Types.Environments.Packs {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (1, True, True) (\ @ x (x1 :: Language.Fixpoint.Types.Environments.Packs) -> x1) -} c6181e40abe600fd05f939f820a0ac94 $fBinaryPacks3 :: Data.Binary.Class.GBinaryPut (GHC.Generics.D1 ('GHC.Generics.MetaData "Packs" "Language.Fixpoint.Types.Environments" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.True) (GHC.Generics.C1 ('GHC.Generics.MetaCons "Packs" 'GHC.Generics.PrefixI 'GHC.Types.True) (GHC.Generics.S1 ('GHC.Generics.MetaSel ('GHC.Base.Just "packm") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar GHC.Types.Int))))) {- Arity: 1, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$fBinaryPacks4 `cast` (Sym (Data.Binary.Class.N:GBinaryPut[0] _N)) -} 2d29bfdf6324b0b0990bc08dea97cf72 $fBinaryPacks4 :: GHC.Generics.M1 GHC.Generics.D ('GHC.Generics.MetaData "Packs" "Language.Fixpoint.Types.Environments" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.True) (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Packs" 'GHC.Generics.PrefixI 'GHC.Types.True) (GHC.Generics.S1 ('GHC.Generics.MetaSel ('GHC.Base.Just "packm") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar GHC.Types.Int)))) t -> Data.Binary.Put.Put {- Arity: 1, Strictness: , Unfolding: InlineRule (1, True, False) (\ @ t (eta :: GHC.Generics.M1 GHC.Generics.D ('GHC.Generics.MetaData "Packs" "Language.Fixpoint.Types.Environments" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.True) (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Packs" 'GHC.Generics.PrefixI 'GHC.Types.True) (GHC.Generics.S1 ('GHC.Generics.MetaSel ('GHC.Base.Just "packm") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar GHC.Types.Int)))) t) -> Data.Binary.Class.$fBinary(,)_$cputList @ Language.Fixpoint.Types.Refinements.KVar @ GHC.Types.Int Language.Fixpoint.Types.Refinements.$fBinaryKVar Data.Binary.Class.$fBinaryInt (Data.HashMap.Base.toList @ Language.Fixpoint.Types.Refinements.KVar @ GHC.Types.Int eta `cast` (Trans (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaData "Packs" "Language.Fixpoint.Types.Environments" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.True>_P _R) (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "Packs" 'GHC.Generics.PrefixI 'GHC.Types.True>_P _R) (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel ('GHC.Base.Just "packm") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy>_P _R)) _N) (GHC.Generics.N:K1[0] _P _R _P)))) -} 999de3bcf4ed26dd71bfcb519acbd47a $fBinaryPacks_$cfrom :: Language.Fixpoint.Types.Environments.Packs -> GHC.Generics.Rep Language.Fixpoint.Types.Environments.Packs x {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$fBinaryPacks2 `cast` (forall (x :: _N). _R ->_R Trans (Language.Fixpoint.Types.Environments.N:Packs[0]) (Trans (Sym (GHC.Generics.N:K1[0] _P _R _P)) (Trans (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel ('GHC.Base.Just "packm") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy>_P _R)) (Trans (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "Packs" 'GHC.Generics.PrefixI 'GHC.Types.True>_P _R)) (Trans (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaData "Packs" "Language.Fixpoint.Types.Environments" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.True>_P _R)) (Sub (Sym (Language.Fixpoint.Types.Environments.Rep_Packs[0]))))) _N))) -} 999de3bcf4ed26dd71bfcb519acbd47a $fBinaryPacks_$cget :: Data.Binary.Get.Internal.Get Language.Fixpoint.Types.Environments.Packs {- Arity: 2, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$fBinaryPacks1 `cast` (Sym (Data.Binary.Get.Internal.N:Get[0] _R)) -} 999de3bcf4ed26dd71bfcb519acbd47a $fBinaryPacks_$cputList :: [Language.Fixpoint.Types.Environments.Packs] -> Data.Binary.Put.Put {- Arity: 1 -} 999de3bcf4ed26dd71bfcb519acbd47a $fBinaryPacks_$s$dmput :: Language.Fixpoint.Types.Environments.Packs -> Data.Binary.Put.Put {- Arity: 1, Strictness: , Unfolding: InlineRule (-3, True, False) (\ (eta :: Language.Fixpoint.Types.Environments.Packs) -> Language.Fixpoint.Types.Environments.$fBinaryPacks3 `cast` (Data.Binary.Class.N:GBinaryPut[0] (Sym (Language.Fixpoint.Types.Environments.Rep_Packs[0]))) @ GHC.Prim.Any (Language.Fixpoint.Types.Environments.$fBinaryPacks_$cfrom @ GHC.Prim.Any eta)) -} ae9741409aa049333ef008f3802cfecf $fBinarySEnv :: Data.Binary.Class.Binary a => Data.Binary.Class.Binary (Language.Fixpoint.Types.Environments.SEnv a) DFunId {- Arity: 1, Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun: @ a ($dBinary :: Data.Binary.Class.Binary a). @ (Language.Fixpoint.Types.Environments.SEnv a) (Language.Fixpoint.Types.Environments.$fBinarySEnv_$cput @ a $dBinary) (Language.Fixpoint.Types.Environments.$fBinarySEnv_$cget @ a $dBinary) (Language.Fixpoint.Types.Environments.$fBinarySEnv_$cputList @ a $dBinary) -} ae9741409aa049333ef008f3802cfecf $fBinarySEnv1 :: Data.Binary.Class.Binary a => forall r. Data.ByteString.Internal.ByteString -> Data.Binary.Get.Internal.Success (Language.Fixpoint.Types.Environments.SEnv a) r -> Data.Binary.Get.Internal.Decoder r {- Arity: 3, Strictness: , Unfolding: (\ @ a ($dBinary :: Data.Binary.Class.Binary a) @ r (eta :: Data.ByteString.Internal.ByteString) (eta1 :: Data.Binary.Get.Internal.Success (Language.Fixpoint.Types.Environments.SEnv a) r) -> (Language.Fixpoint.Types.Refinements.$fBinaryHashMap_$cget @ Language.Fixpoint.Types.Names.Symbol @ a Language.Fixpoint.Types.Names.$fHashableSymbol Language.Fixpoint.Types.Names.$fEqSymbol Language.Fixpoint.Types.Names.$fBinarySymbol $dBinary) `cast` (Data.Binary.Get.Internal.N:Get[0] _R) @ r eta (\ (i' :: Data.ByteString.Internal.ByteString) (a1 :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a) -> eta1 i' a1 `cast` (Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N))) -} ae9741409aa049333ef008f3802cfecf $fBinarySEnv_$cget :: Data.Binary.Class.Binary a => Data.Binary.Get.Internal.Get (Language.Fixpoint.Types.Environments.SEnv a) {- Arity: 3, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$fBinarySEnv1 `cast` (forall (a :: <*>_N). _R ->_R Sym (Data.Binary.Get.Internal.N:Get[0] _R)) -} ae9741409aa049333ef008f3802cfecf $fBinarySEnv_$cput :: Data.Binary.Class.Binary a => Language.Fixpoint.Types.Environments.SEnv a -> Data.Binary.Put.Put {- Arity: 2, Strictness: , Unfolding: InlineRule (2, True, False) (\ @ a ($dBinary :: Data.Binary.Class.Binary a) (eta :: Language.Fixpoint.Types.Environments.SEnv a) -> Data.Binary.Class.$fBinary(,)_$cputList @ Language.Fixpoint.Types.Names.Symbol @ a Language.Fixpoint.Types.Names.$fBinarySymbol $dBinary (Data.HashMap.Base.toList @ Language.Fixpoint.Types.Names.Symbol @ a eta `cast` (Language.Fixpoint.Types.Environments.N:SEnv[0] _N))) -} ae9741409aa049333ef008f3802cfecf $fBinarySEnv_$cputList :: Data.Binary.Class.Binary a => [Language.Fixpoint.Types.Environments.SEnv a] -> Data.Binary.Put.Put {- Arity: 1, Strictness: -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fBinarySizedEnv :: Data.Binary.Class.Binary Language.Fixpoint.Types.Environments.BindEnv DFunId {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Environments.BindEnv Language.Fixpoint.Types.Environments.$fBinarySizedEnv_$cput Language.Fixpoint.Types.Environments.$fBinarySizedEnv_$cget Language.Fixpoint.Types.Environments.$fBinarySizedEnv_$cputList -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fBinarySizedEnv1 :: Data.ByteString.Internal.ByteString -> Data.Binary.Get.Internal.Success Language.Fixpoint.Types.Environments.BindEnv r -> Data.Binary.Get.Internal.Decoder r {- Arity: 2, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (2, True, False) (\ @ r (w :: Data.ByteString.Internal.ByteString) (w1 :: Data.Binary.Get.Internal.Success Language.Fixpoint.Types.Environments.BindEnv r) -> case w of ww { Data.ByteString.Internal.PS ww1 ww2 ww3 ww4 -> Language.Fixpoint.Types.Environments.$w$cget2 @ r ww1 ww2 ww3 ww4 w1 }) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fBinarySizedEnv_$cget :: Data.Binary.Get.Internal.Get Language.Fixpoint.Types.Environments.BindEnv {- Arity: 2, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$fBinarySizedEnv1 `cast` (Sym (Data.Binary.Get.Internal.N:Get[0] _R)) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fBinarySizedEnv_$cput :: Language.Fixpoint.Types.Environments.BindEnv -> Data.Binary.Put.Put {- Arity: 1, Strictness: m, Inline: INLINE[0], Unfolding: InlineRule (1, True, False) (\ (w :: Language.Fixpoint.Types.Environments.BindEnv) -> case w of ww { Language.Fixpoint.Types.Environments.BE ww1 ww2 -> case Language.Fixpoint.Types.Environments.$w$cput1 ww1 ww2 of ww3 { (#,#) ww4 ww5 -> (Data.Binary.Put.PairS @ () ww4 ww5) `cast` (Sym (Data.Binary.Put.N:PutM[0]) <()>_N) } }) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fBinarySizedEnv_$cputList :: [Language.Fixpoint.Types.Environments.BindEnv] -> Data.Binary.Put.Put {- Arity: 1 -} 2183bf06aead6cc6acb26f258a183771 $fBinarySizedEnv_$s$fBinary(,) :: Data.Binary.Class.Binary (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) (Data.Binary.Class.$fBinary(,)_$cput @ Language.Fixpoint.Types.Names.Symbol @ Language.Fixpoint.Types.Refinements.SortedReft Language.Fixpoint.Types.Names.$fBinarySymbol Language.Fixpoint.Types.Refinements.$fBinarySortedReft) (Data.Binary.Class.$fBinary(,)_$cget @ Language.Fixpoint.Types.Names.Symbol @ Language.Fixpoint.Types.Refinements.SortedReft Language.Fixpoint.Types.Names.$fBinarySymbol Language.Fixpoint.Types.Refinements.$fBinarySortedReft) (Data.Binary.Class.$fBinary(,)_$cputList @ Language.Fixpoint.Types.Names.Symbol @ Language.Fixpoint.Types.Refinements.SortedReft Language.Fixpoint.Types.Names.$fBinarySymbol Language.Fixpoint.Types.Refinements.$fBinarySortedReft) -} c174bdbfcbff4de2c9f83aca41307d6a $fBinarySizedEnv_f :: [(GHC.Types.Int, (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft))] -> Data.Binary.Put.Put {- Unfolding: (Data.Binary.Class.$fBinary(,)_$cputList @ GHC.Types.Int @ (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) Data.Binary.Class.$fBinaryInt Language.Fixpoint.Types.Environments.$fBinarySizedEnv_$s$fBinary(,)) -} 0cd3c3fdee30265cc62488729d22f803 $fBinarySizedEnv_go1 :: [(GHC.Types.Int, (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft))] -> Data.HashMap.Base.HashMap GHC.Types.Int (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) -> [(GHC.Types.Int, (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft))] {- Arity: 2, HasNoCafRefs, Strictness: -} dae79859b3442c211473f5cded0c14f7 $fDataIBindEnv :: Data.Data.Data Language.Fixpoint.Types.Environments.IBindEnv DFunId {- Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Environments.IBindEnv Language.Fixpoint.Types.Environments.$fDataIBindEnv_$cp1Data Language.Fixpoint.Types.Environments.$fDataIBindEnv_$cgfoldl Language.Fixpoint.Types.Environments.$fDataIBindEnv_$cgunfold Language.Fixpoint.Types.Environments.$fDataIBindEnv_$ctoConstr Language.Fixpoint.Types.Environments.$fDataIBindEnv_$cdataTypeOf Language.Fixpoint.Types.Environments.$fDataIBindEnv_$s$dmdataCast1 Language.Fixpoint.Types.Environments.$fDataIBindEnv_$s$dmdataCast2 Language.Fixpoint.Types.Environments.$fDataIBindEnv_$cgmapT Language.Fixpoint.Types.Environments.$fDataIBindEnv_$cgmapQl Language.Fixpoint.Types.Environments.$fDataIBindEnv_$cgmapQr Language.Fixpoint.Types.Environments.$fDataIBindEnv_$cgmapQ Language.Fixpoint.Types.Environments.$fDataIBindEnv_$cgmapQi Language.Fixpoint.Types.Environments.$fDataIBindEnv_$cgmapM Language.Fixpoint.Types.Environments.$fDataIBindEnv_$cgmapMp Language.Fixpoint.Types.Environments.$fDataIBindEnv_$cgmapMo -} dae79859b3442c211473f5cded0c14f7 $fDataIBindEnv1 :: (Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId -> Language.Fixpoint.Types.Environments.IBindEnv, GHC.Types.Bool) {- HasNoCafRefs, Unfolding: ((Language.Fixpoint.Types.Environments.$fDataIBindEnv2 `cast` (_R ->_R Sym (Language.Fixpoint.Types.Environments.N:IBindEnv[0])), GHC.Types.False)) -} 2fe3f8f8ab68fd864a5f12d78cc2bffa $fDataIBindEnv10 :: [GHC.Types.Char] {- Unfolding: (GHC.CString.unpackCString# "IBindEnv"#) -} dae79859b3442c211473f5cded0c14f7 $fDataIBindEnv11 :: GHC.Prim.Proxy# Language.Fixpoint.Types.Environments.IBindEnv -> Data.Typeable.Internal.TypeRep {- Arity: 1, Strictness: , Unfolding: InlineRule (1, True, True) (\ (wild :: GHC.Prim.Proxy# Language.Fixpoint.Types.Environments.IBindEnv) -> Language.Fixpoint.Types.Environments.$fDataIBindEnv12) -} 18fe8f851217e4bcb547e65e5c33fe3d $fDataIBindEnv12 :: 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.Environments.$fDataIBindEnv13 kt_fps) of dt { GHC.Fingerprint.Type.Fingerprint dt1 dt2 -> Data.Typeable.Internal.TypeRep dt1 dt2 Language.Fixpoint.Types.Environments.$tcIBindEnv (GHC.Types.[] @ Data.Typeable.Internal.TypeRep) (GHC.Types.[] @ Data.Typeable.Internal.TypeRep) } }) -} 418e4ddc94d00fd373e5b5c9668b6c52 $fDataIBindEnv13 :: GHC.Fingerprint.Type.Fingerprint {- HasNoCafRefs, Unfolding: (GHC.Fingerprint.Type.Fingerprint 16603441310162428276## 853371338253927225##) -} 31ec9489b639350a6b456371a1ca3593 $fDataIBindEnv2 :: Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId -> Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (1, True, True) (\ (tpl :: Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId) -> tpl) -} 0aaf263de1ad3275db3265eb04825fb5 $fDataIBindEnv3 :: Data.Typeable.Internal.Typeable t => (forall d e. (Data.Data.Data d, Data.Data.Data e) => c (t d e)) -> GHC.Base.Maybe (c (Data.HashSet.HashSet GHC.Types.Int)) {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: InlineRule (2, True, True) (\ @ (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 (Data.HashSet.HashSet GHC.Types.Int))) -} fc74f3f85bf4ca80f6b19ad1ce9a9f55 $fDataIBindEnv4 :: Data.Typeable.Internal.Typeable t => (forall d. Data.Data.Data d => c (t d)) -> GHC.Base.Maybe (c (Data.HashSet.HashSet GHC.Types.Int)) {- Arity: 2, Strictness: , Unfolding: (\ @ (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 Data.HashSet.$fDataHashSet8 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 (Data.HashSet.HashSet GHC.Types.Int)) GHC.Types.True -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.eqWord# dt1 dt3) of wild4 { GHC.Types.False -> GHC.Base.Nothing @ (c (Data.HashSet.HashSet GHC.Types.Int)) GHC.Types.True -> GHC.Base.Just @ (c (Data.HashSet.HashSet GHC.Types.Int)) (f @ GHC.Types.Int Data.Data.$fDataInt) `cast` (_R (UnsafeCo nominal t Data.HashSet.HashSet _N)) } } } }) -} 341572c505c9c9737ed2dfa43ffb5f3e $fDataIBindEnv5 :: Data.HashSet.HashSet GHC.Types.Int -> Data.Data.DataType {- Arity: 1, Strictness: m, Unfolding: InlineRule (1, True, True) (\ (ds :: Data.HashSet.HashSet GHC.Types.Int) -> Data.HashSet.hashSetDataType) -} 0d3a53b6752ed8c8377bcd10a3d9ca03 $fDataIBindEnv6 :: Data.HashSet.HashSet GHC.Types.Int -> Data.Data.Constr {- Arity: 1, Strictness: , Unfolding: InlineRule (1, True, True) (\ (ds :: Data.HashSet.HashSet GHC.Types.Int) -> Data.HashSet.fromListConstr) -} dae79859b3442c211473f5cded0c14f7 $fDataIBindEnv7 :: (forall b. Data.Data.Data b => b -> b) -> Language.Fixpoint.Types.Environments.IBindEnv -> Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId {- Arity: 2, Strictness: , Unfolding: InlineRule (2, True, True) (\ (ds :: forall b. Data.Data.Data b => b -> b) (x0 :: Language.Fixpoint.Types.Environments.IBindEnv) -> ds @ (Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId) Language.Fixpoint.Types.Environments.$fDataIBindEnv_$s$fDataHashSet x0 `cast` (Language.Fixpoint.Types.Environments.N:IBindEnv[0])) -} 78a56d7910b1e52343b5f3ece2c8d5fe $fDataIBindEnv8 :: Data.Data.DataRep {- Strictness: m1, Unfolding: (Data.Data.AlgRep Language.Fixpoint.Types.Environments.$fDataIBindEnv9) -} 8120c13d171cd57c67557de4e8b5f1fc $fDataIBindEnv9 :: [Data.Data.Constr] {- Strictness: m2, Unfolding: (GHC.Types.: @ Data.Data.Constr Language.Fixpoint.Types.Environments.$c4v5CIsTv9Ch4nAFqrNqrmN (GHC.Types.[] @ Data.Data.Constr)) -} dae79859b3442c211473f5cded0c14f7 $fDataIBindEnv_$cdataTypeOf :: Language.Fixpoint.Types.Environments.IBindEnv -> Data.Data.DataType {- Arity: 1, Strictness: m, Unfolding: InlineRule (1, True, True) (\ (ds :: Language.Fixpoint.Types.Environments.IBindEnv) -> Language.Fixpoint.Types.Environments.$tFzbslrEMRyVKDg48SEkL9E) -} dae79859b3442c211473f5cded0c14f7 $fDataIBindEnv_$cgfoldl :: (forall d b. Data.Data.Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> Language.Fixpoint.Types.Environments.IBindEnv -> c Language.Fixpoint.Types.Environments.IBindEnv {- Arity: 3, Strictness: , Unfolding: InlineRule (3, True, False) (\ @ (c :: * -> *) (k :: forall d b. Data.Data.Data d => c (d -> b) -> d -> c b) (z :: forall g. g -> c g) (ds :: Language.Fixpoint.Types.Environments.IBindEnv) -> k @ (Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId) @ Language.Fixpoint.Types.Environments.IBindEnv Language.Fixpoint.Types.Environments.$fDataIBindEnv_$s$fDataHashSet (z @ (Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId -> Language.Fixpoint.Types.Environments.IBindEnv) Language.Fixpoint.Types.Environments.$fDataIBindEnv2 `cast` (_R ->_R Sym (Language.Fixpoint.Types.Environments.N:IBindEnv[0]))) ds `cast` (Language.Fixpoint.Types.Environments.N:IBindEnv[0])) -} dae79859b3442c211473f5cded0c14f7 $fDataIBindEnv_$cgmapM :: GHC.Base.Monad m => (forall d. Data.Data.Data d => d -> m d) -> Language.Fixpoint.Types.Environments.IBindEnv -> m Language.Fixpoint.Types.Environments.IBindEnv {- Arity: 3, Strictness: , Unfolding: (\ @ (m :: * -> *) ($dMonad :: GHC.Base.Monad m) (ds :: forall d. Data.Data.Data d => d -> m d) (eta :: Language.Fixpoint.Types.Environments.IBindEnv) -> let { lvl68 :: m (Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId) = ds @ (Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId) Language.Fixpoint.Types.Environments.$fDataIBindEnv_$s$fDataHashSet eta `cast` (Language.Fixpoint.Types.Environments.N:IBindEnv[0]) } in GHC.Base.>>= @ m $dMonad @ (Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId -> Language.Fixpoint.Types.Environments.IBindEnv) @ Language.Fixpoint.Types.Environments.IBindEnv (GHC.Base.return @ m $dMonad @ (Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId -> Language.Fixpoint.Types.Environments.IBindEnv) Language.Fixpoint.Types.Environments.$fDataIBindEnv2 `cast` (_R ->_R Sym (Language.Fixpoint.Types.Environments.N:IBindEnv[0]))) (\ (c' :: Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId -> Language.Fixpoint.Types.Environments.IBindEnv) -> GHC.Base.>>= @ m $dMonad @ (Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId) @ Language.Fixpoint.Types.Environments.IBindEnv lvl68 (\ (x' :: Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId) -> GHC.Base.return @ m $dMonad @ Language.Fixpoint.Types.Environments.IBindEnv (c' x')))) -} dae79859b3442c211473f5cded0c14f7 $fDataIBindEnv_$cgmapMo :: GHC.Base.MonadPlus m => (forall d. Data.Data.Data d => d -> m d) -> Language.Fixpoint.Types.Environments.IBindEnv -> m Language.Fixpoint.Types.Environments.IBindEnv {- Arity: 3, Strictness: , Unfolding: (\ @ (m :: * -> *) ($dMonadPlus :: GHC.Base.MonadPlus m) (ds :: forall d. Data.Data.Data d => d -> m d) (eta1 :: Language.Fixpoint.Types.Environments.IBindEnv) -> let { $dMonad :: GHC.Base.Monad m = GHC.Base.$p2MonadPlus @ m $dMonadPlus } in let { lvl68 :: m Language.Fixpoint.Types.Environments.IBindEnv = GHC.Base.mzero @ m $dMonadPlus @ Language.Fixpoint.Types.Environments.IBindEnv } in GHC.Base.>>= @ m $dMonad @ (Language.Fixpoint.Types.Environments.IBindEnv, GHC.Types.Bool) @ Language.Fixpoint.Types.Environments.IBindEnv (let { lvl69 :: m (Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId) = ds @ (Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId) Language.Fixpoint.Types.Environments.$fDataIBindEnv_$s$fDataHashSet eta1 `cast` (Language.Fixpoint.Types.Environments.N:IBindEnv[0]) } in GHC.Base.>>= @ m $dMonad @ (Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId -> Language.Fixpoint.Types.Environments.IBindEnv, GHC.Types.Bool) @ (Language.Fixpoint.Types.Environments.IBindEnv, GHC.Types.Bool) (GHC.Base.return @ m $dMonad @ (Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId -> Language.Fixpoint.Types.Environments.IBindEnv, GHC.Types.Bool) Language.Fixpoint.Types.Environments.$fDataIBindEnv1) (\ (ds1 :: (Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId -> Language.Fixpoint.Types.Environments.IBindEnv, GHC.Types.Bool)) -> case ds1 of wild { (,) h b1 -> case b1 of wild1 { GHC.Types.False -> GHC.Base.mplus @ m $dMonadPlus @ (Language.Fixpoint.Types.Environments.IBindEnv, GHC.Types.Bool) (GHC.Base.>>= @ m $dMonad @ (Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId) @ (Language.Fixpoint.Types.Environments.IBindEnv, GHC.Types.Bool) lvl69 (\ (y' :: Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId) -> GHC.Base.return @ m $dMonad @ (Language.Fixpoint.Types.Environments.IBindEnv, GHC.Types.Bool) (h y', GHC.Types.True))) (GHC.Base.return @ m $dMonad @ (Language.Fixpoint.Types.Environments.IBindEnv, GHC.Types.Bool) (h eta1 `cast` (Language.Fixpoint.Types.Environments.N:IBindEnv[0]), GHC.Types.False)) GHC.Types.True -> GHC.Base.return @ m $dMonad @ (Language.Fixpoint.Types.Environments.IBindEnv, GHC.Types.Bool) (h eta1 `cast` (Language.Fixpoint.Types.Environments.N:IBindEnv[0]), GHC.Types.True) } })) (\ (ds1 :: (Language.Fixpoint.Types.Environments.IBindEnv, GHC.Types.Bool)) -> case ds1 of wild { (,) x' b -> case b of wild1 { GHC.Types.False -> lvl68 GHC.Types.True -> GHC.Base.return @ m $dMonad @ Language.Fixpoint.Types.Environments.IBindEnv x' } })) -} dae79859b3442c211473f5cded0c14f7 $fDataIBindEnv_$cgmapMp :: GHC.Base.MonadPlus m => (forall d. Data.Data.Data d => d -> m d) -> Language.Fixpoint.Types.Environments.IBindEnv -> m Language.Fixpoint.Types.Environments.IBindEnv {- Arity: 3, Strictness: , Unfolding: (\ @ (m :: * -> *) ($dMonadPlus :: GHC.Base.MonadPlus m) (ds :: forall d. Data.Data.Data d => d -> m d) (eta1 :: Language.Fixpoint.Types.Environments.IBindEnv) -> let { $dMonad :: GHC.Base.Monad m = GHC.Base.$p2MonadPlus @ m $dMonadPlus } in let { lvl68 :: m Language.Fixpoint.Types.Environments.IBindEnv = GHC.Base.mzero @ m $dMonadPlus @ Language.Fixpoint.Types.Environments.IBindEnv } in GHC.Base.>>= @ m $dMonad @ (Language.Fixpoint.Types.Environments.IBindEnv, GHC.Types.Bool) @ Language.Fixpoint.Types.Environments.IBindEnv (let { lvl69 :: m (Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId) = ds @ (Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId) Language.Fixpoint.Types.Environments.$fDataIBindEnv_$s$fDataHashSet eta1 `cast` (Language.Fixpoint.Types.Environments.N:IBindEnv[0]) } in GHC.Base.>>= @ m $dMonad @ (Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId -> Language.Fixpoint.Types.Environments.IBindEnv, GHC.Types.Bool) @ (Language.Fixpoint.Types.Environments.IBindEnv, GHC.Types.Bool) (GHC.Base.return @ m $dMonad @ (Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId -> Language.Fixpoint.Types.Environments.IBindEnv, GHC.Types.Bool) Language.Fixpoint.Types.Environments.$fDataIBindEnv1) (\ (ds1 :: (Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId -> Language.Fixpoint.Types.Environments.IBindEnv, GHC.Types.Bool)) -> case ds1 of wild { (,) h b1 -> GHC.Base.mplus @ m $dMonadPlus @ (Language.Fixpoint.Types.Environments.IBindEnv, GHC.Types.Bool) (GHC.Base.>>= @ m $dMonad @ (Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId) @ (Language.Fixpoint.Types.Environments.IBindEnv, GHC.Types.Bool) lvl69 (\ (y' :: Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId) -> GHC.Base.return @ m $dMonad @ (Language.Fixpoint.Types.Environments.IBindEnv, GHC.Types.Bool) (h y', GHC.Types.True))) (GHC.Base.return @ m $dMonad @ (Language.Fixpoint.Types.Environments.IBindEnv, GHC.Types.Bool) (h eta1 `cast` (Language.Fixpoint.Types.Environments.N:IBindEnv[0]), b1)) })) (\ (ds1 :: (Language.Fixpoint.Types.Environments.IBindEnv, GHC.Types.Bool)) -> case ds1 of wild { (,) x' b -> case b of wild1 { GHC.Types.False -> lvl68 GHC.Types.True -> GHC.Base.return @ m $dMonad @ Language.Fixpoint.Types.Environments.IBindEnv x' } })) -} dae79859b3442c211473f5cded0c14f7 $fDataIBindEnv_$cgmapQ :: (forall d. Data.Data.Data d => d -> u) -> Language.Fixpoint.Types.Environments.IBindEnv -> [u] {- Arity: 2, Strictness: m2, Unfolding: InlineRule (2, True, False) (\ @ u (ds :: forall d. Data.Data.Data d => d -> u) (x0 :: Language.Fixpoint.Types.Environments.IBindEnv) -> GHC.Types.: @ u (ds @ (Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId) Language.Fixpoint.Types.Environments.$fDataIBindEnv_$s$fDataHashSet x0 `cast` (Language.Fixpoint.Types.Environments.N:IBindEnv[0])) (GHC.Types.[] @ u)) -} dae79859b3442c211473f5cded0c14f7 $fDataIBindEnv_$cgmapQi :: GHC.Types.Int -> (forall d. Data.Data.Data d => d -> u) -> Language.Fixpoint.Types.Environments.IBindEnv -> u {- Arity: 3, Strictness: , Unfolding: InlineRule (3, True, False) (\ @ u (ds :: GHC.Types.Int) (ds1 :: forall d. Data.Data.Data d => d -> u) (x :: Language.Fixpoint.Types.Environments.IBindEnv) -> case ds of wild { GHC.Types.I# x1 -> case x1 of wild1 { DEFAULT -> Data.Maybe.fromJust1 @ u 0# -> ds1 @ (Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId) Language.Fixpoint.Types.Environments.$fDataIBindEnv_$s$fDataHashSet x `cast` (Language.Fixpoint.Types.Environments.N:IBindEnv[0]) } }) -} dae79859b3442c211473f5cded0c14f7 $fDataIBindEnv_$cgmapQl :: (r -> r' -> r) -> r -> (forall d. Data.Data.Data d => d -> r') -> Language.Fixpoint.Types.Environments.IBindEnv -> r {- Arity: 4, Strictness: , Unfolding: InlineRule (4, True, False) (\ @ r @ r' (ds :: r -> r' -> r) (ds1 :: r) (ds2 :: forall d. Data.Data.Data d => d -> r') (eta :: Language.Fixpoint.Types.Environments.IBindEnv) -> ds ds1 (ds2 @ (Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId) Language.Fixpoint.Types.Environments.$fDataIBindEnv_$s$fDataHashSet eta `cast` (Language.Fixpoint.Types.Environments.N:IBindEnv[0]))) -} dae79859b3442c211473f5cded0c14f7 $fDataIBindEnv_$cgmapQr :: (r' -> r -> r) -> r -> (forall d. Data.Data.Data d => d -> r') -> Language.Fixpoint.Types.Environments.IBindEnv -> r {- Arity: 4, Strictness: , Unfolding: InlineRule (4, True, False) (\ @ r @ r' (ds :: r' -> r -> r) (ds1 :: r) (ds2 :: forall d. Data.Data.Data d => d -> r') (x0 :: Language.Fixpoint.Types.Environments.IBindEnv) -> ds (ds2 @ (Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId) Language.Fixpoint.Types.Environments.$fDataIBindEnv_$s$fDataHashSet x0 `cast` (Language.Fixpoint.Types.Environments.N:IBindEnv[0])) ds1) -} dae79859b3442c211473f5cded0c14f7 $fDataIBindEnv_$cgmapT :: (forall b. Data.Data.Data b => b -> b) -> Language.Fixpoint.Types.Environments.IBindEnv -> Language.Fixpoint.Types.Environments.IBindEnv {- Arity: 2, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$fDataIBindEnv7 `cast` ( b -> b>_R ->_R _R ->_R Sym (Language.Fixpoint.Types.Environments.N:IBindEnv[0])) -} dae79859b3442c211473f5cded0c14f7 $fDataIBindEnv_$cgunfold :: (forall b r. Data.Data.Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Data.Data.Constr -> c Language.Fixpoint.Types.Environments.IBindEnv {- Arity: 3, Strictness: , Unfolding: InlineRule (3, True, False) (\ @ (c :: * -> *) (k :: forall b r. Data.Data.Data b => c (b -> r) -> c r) (z :: forall r. r -> c r) (ds :: Data.Data.Constr) -> k @ (Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId) @ Language.Fixpoint.Types.Environments.IBindEnv Language.Fixpoint.Types.Environments.$fDataIBindEnv_$s$fDataHashSet (z @ (Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId -> Language.Fixpoint.Types.Environments.IBindEnv) Language.Fixpoint.Types.Environments.$fDataIBindEnv2 `cast` (_R ->_R Sym (Language.Fixpoint.Types.Environments.N:IBindEnv[0])))) -} dae79859b3442c211473f5cded0c14f7 $fDataIBindEnv_$cp1Data :: Data.Typeable.Internal.Typeable Language.Fixpoint.Types.Environments.IBindEnv {- Arity: 1, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$fDataIBindEnv11 `cast` (Sym (Data.Typeable.Internal.N:Typeable[0] <*>_N _N)) -} dae79859b3442c211473f5cded0c14f7 $fDataIBindEnv_$ctoConstr :: Language.Fixpoint.Types.Environments.IBindEnv -> Data.Data.Constr {- Arity: 1, Strictness: , Unfolding: InlineRule (1, True, True) (\ (ds :: Language.Fixpoint.Types.Environments.IBindEnv) -> Language.Fixpoint.Types.Environments.$c4v5CIsTv9Ch4nAFqrNqrmN) -} dae79859b3442c211473f5cded0c14f7 $fDataIBindEnv_$s$dmdataCast1 :: Data.Typeable.Internal.Typeable t => (forall d. Data.Data.Data d => c (t d)) -> GHC.Base.Maybe (c Language.Fixpoint.Types.Environments.IBindEnv) {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: InlineRule (-1, True, True) (\ @ (t :: * -> *) @ (c :: * -> *) ($dTypeable :: Data.Typeable.Internal.Typeable t) (ds :: forall d. Data.Data.Data d => c (t d)) -> GHC.Base.Nothing @ (c Language.Fixpoint.Types.Environments.IBindEnv)) -} dae79859b3442c211473f5cded0c14f7 $fDataIBindEnv_$s$dmdataCast2 :: 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.Environments.IBindEnv) {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: InlineRule (-1, True, True) (\ @ (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.Environments.IBindEnv)) -} fd4cff6534526ae5dff98415ac84a372 $fDataIBindEnv_$s$fDataHashSet :: Data.Data.Data (Data.HashSet.HashSet GHC.Types.Int) {- Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ (Data.HashSet.HashSet GHC.Types.Int) (Data.HashSet.$fDataHashSet_$cp1Data @ GHC.Types.Int Data.Data.$fDataInt GHC.Classes.$fEqInt Data.Hashable.Class.$fHashableInt) (Data.HashSet.$fDataHashSet_$cgfoldl @ GHC.Types.Int Data.Data.$fDataInt GHC.Classes.$fEqInt Data.Hashable.Class.$fHashableInt) (Data.HashSet.$fDataHashSet_$cgunfold @ GHC.Types.Int Data.Data.$fDataInt GHC.Classes.$fEqInt Data.Hashable.Class.$fHashableInt) Language.Fixpoint.Types.Environments.$fDataIBindEnv6 Language.Fixpoint.Types.Environments.$fDataIBindEnv5 Language.Fixpoint.Types.Environments.$fDataIBindEnv4 Language.Fixpoint.Types.Environments.$fDataIBindEnv3 (Data.HashSet.$fDataHashSet_$cgmapT @ GHC.Types.Int Data.Data.$fDataInt GHC.Classes.$fEqInt Data.Hashable.Class.$fHashableInt) (Data.HashSet.$fDataHashSet_$cgmapQl @ GHC.Types.Int Data.Data.$fDataInt GHC.Classes.$fEqInt Data.Hashable.Class.$fHashableInt) (Data.HashSet.$fDataHashSet_$cgmapQr @ GHC.Types.Int Data.Data.$fDataInt GHC.Classes.$fEqInt Data.Hashable.Class.$fHashableInt) (Data.HashSet.$fDataHashSet_$cgmapQ @ GHC.Types.Int Data.Data.$fDataInt GHC.Classes.$fEqInt Data.Hashable.Class.$fHashableInt) (Data.HashSet.$fDataHashSet_$cgmapQi @ GHC.Types.Int Data.Data.$fDataInt GHC.Classes.$fEqInt Data.Hashable.Class.$fHashableInt) (Data.HashSet.$fDataHashSet_$cgmapM @ GHC.Types.Int Data.Data.$fDataInt GHC.Classes.$fEqInt Data.Hashable.Class.$fHashableInt) (Data.HashSet.$fDataHashSet_$cgmapMp @ GHC.Types.Int Data.Data.$fDataInt GHC.Classes.$fEqInt Data.Hashable.Class.$fHashableInt) (Data.HashSet.$fDataHashSet_$cgmapMo @ GHC.Types.Int Data.Data.$fDataInt GHC.Classes.$fEqInt Data.Hashable.Class.$fHashableInt) -} ae9741409aa049333ef008f3802cfecf $fDataSEnv :: Data.Data.Data a => Data.Data.Data (Language.Fixpoint.Types.Environments.SEnv a) DFunId {- Arity: 1, Strictness: , Inline: [ALWAYS] CONLIKE, Unfolding: DFun: @ a ($dData :: Data.Data.Data a). @ (Language.Fixpoint.Types.Environments.SEnv a) (Language.Fixpoint.Types.Environments.$fDataSEnv_$cp1Data @ a $dData) (Language.Fixpoint.Types.Environments.$fDataSEnv_$cgfoldl @ a $dData) (Language.Fixpoint.Types.Environments.$fDataSEnv_$cgunfold @ a $dData) (Language.Fixpoint.Types.Environments.$fDataSEnv_$ctoConstr @ a $dData) (Language.Fixpoint.Types.Environments.$fDataSEnv_$cdataTypeOf @ a $dData) (Language.Fixpoint.Types.Environments.$fDataSEnv_$cdataCast1 @ a $dData) (Language.Fixpoint.Types.Environments.$fDataSEnv_$cdataCast2 @ a $dData) (Language.Fixpoint.Types.Environments.$fDataSEnv_$cgmapT @ a $dData) (Language.Fixpoint.Types.Environments.$fDataSEnv_$cgmapQl @ a $dData) (Language.Fixpoint.Types.Environments.$fDataSEnv_$cgmapQr @ a $dData) (Language.Fixpoint.Types.Environments.$fDataSEnv_$cgmapQ @ a $dData) (Language.Fixpoint.Types.Environments.$fDataSEnv_$cgmapQi @ a $dData) (Language.Fixpoint.Types.Environments.$fDataSEnv_$cgmapM @ a $dData) (Language.Fixpoint.Types.Environments.$fDataSEnv_$cgmapMp @ a $dData) (Language.Fixpoint.Types.Environments.$fDataSEnv_$cgmapMo @ a $dData) -} ae9741409aa049333ef008f3802cfecf $fDataSEnv1 :: (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a -> Language.Fixpoint.Types.Environments.SEnv a, GHC.Types.Bool) {- HasNoCafRefs, Unfolding: (\ @ a -> ((Language.Fixpoint.Types.Environments.$fDataSEnv2 @ a) `cast` (_R ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N), GHC.Types.False)) -} 91c8c409a5f4b23aa521c7a8551bcd48 $fDataSEnv2 :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol b -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol b {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (1, True, True) (\ @ b (b1 :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol b) -> b1) -} ae9741409aa049333ef008f3802cfecf $fDataSEnv3 :: Data.Data.Data a => (forall b. Data.Data.Data b => b -> b) -> Language.Fixpoint.Types.Environments.SEnv a -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a {- Arity: 3, Strictness: , Unfolding: InlineRule (3, True, False) (\ @ a ($dData :: Data.Data.Data a) (ds :: forall b. Data.Data.Data b => b -> b) (eta :: Language.Fixpoint.Types.Environments.SEnv a) -> ds @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a) (Data.HashMap.Base.$fDataHashMap @ Language.Fixpoint.Types.Names.Symbol @ a Language.Fixpoint.Types.Names.$fDataSymbol $dData Language.Fixpoint.Types.Names.$fEqSymbol Language.Fixpoint.Types.Names.$fHashableSymbol) eta `cast` (Language.Fixpoint.Types.Environments.N:SEnv[0] _N)) -} e6fa09b804a04da8434821756f749489 $fDataSEnv4 :: 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.Environments.$fDataSEnv5 kt_fps) of dt { GHC.Fingerprint.Type.Fingerprint dt1 dt2 -> Data.Typeable.Internal.TypeRep dt1 dt2 Language.Fixpoint.Types.Environments.$tcSEnv (GHC.Types.[] @ Data.Typeable.Internal.TypeRep) (GHC.Types.[] @ Data.Typeable.Internal.TypeRep) } }) -} 3e0977b72edaf5d46025b7967c990b3e $fDataSEnv5 :: GHC.Fingerprint.Type.Fingerprint {- HasNoCafRefs, Unfolding: (GHC.Fingerprint.Type.Fingerprint 435480431205523914## 7377899865707558582##) -} dd9c8f1433a44557cf4f6cd083469f93 $fDataSEnv6 :: Data.Data.DataRep {- Strictness: m1, Unfolding: (Data.Data.AlgRep Language.Fixpoint.Types.Environments.$fDataSEnv7) -} d49551a05440dbbfa8322778de2495d0 $fDataSEnv7 :: [Data.Data.Constr] {- Strictness: m2, Unfolding: (GHC.Types.: @ Data.Data.Constr Language.Fixpoint.Types.Environments.$c2kZ8jJ02SWUIgEgFgj8MIe (GHC.Types.[] @ Data.Data.Constr)) -} 63da7b2846c38e4d102982a5f3317b33 $fDataSEnv8 :: [GHC.Types.Char] {- Unfolding: (GHC.CString.unpackCString# "SEnv"#) -} ae9741409aa049333ef008f3802cfecf $fDataSEnv_$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.Environments.SEnv 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.Environments.$fDataSEnv4 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.Environments.SEnv 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.Environments.SEnv a)) GHC.Types.True -> GHC.Base.Just @ (c (Language.Fixpoint.Types.Environments.SEnv a)) (f @ a $dData) `cast` (_R (UnsafeCo nominal t Language.Fixpoint.Types.Environments.SEnv _N)) } } } }) -} ae9741409aa049333ef008f3802cfecf $fDataSEnv_$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.Environments.SEnv 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.Environments.SEnv a))) -} ae9741409aa049333ef008f3802cfecf $fDataSEnv_$cdataTypeOf :: Data.Data.Data a => Language.Fixpoint.Types.Environments.SEnv a -> Data.Data.DataType {- Arity: 2, Strictness: m, Unfolding: InlineRule (2, True, True) (\ @ a ($dData :: Data.Data.Data a) (ds :: Language.Fixpoint.Types.Environments.SEnv a) -> Language.Fixpoint.Types.Environments.$t5yRZoXKf80xBucM0CYlTgS) -} ae9741409aa049333ef008f3802cfecf $fDataSEnv_$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.Environments.SEnv a -> c (Language.Fixpoint.Types.Environments.SEnv a) {- Arity: 1, Strictness: , Unfolding: (\ @ a ($dData :: Data.Data.Data a) @ (c :: * -> *) -> let { $dData1 :: Data.Data.Data (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a) = Data.HashMap.Base.$fDataHashMap @ Language.Fixpoint.Types.Names.Symbol @ a Language.Fixpoint.Types.Names.$fDataSymbol $dData Language.Fixpoint.Types.Names.$fEqSymbol Language.Fixpoint.Types.Names.$fHashableSymbol } in \ (k :: forall d b. Data.Data.Data d => c (d -> b) -> d -> c b) (z :: forall g. g -> c g) (ds :: Language.Fixpoint.Types.Environments.SEnv a) -> k @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a) @ (Language.Fixpoint.Types.Environments.SEnv a) $dData1 (z @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a -> Language.Fixpoint.Types.Environments.SEnv a) (Language.Fixpoint.Types.Environments.$fDataSEnv2 @ a) `cast` (_R ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N)) ds `cast` (Language.Fixpoint.Types.Environments.N:SEnv[0] _N)) -} ae9741409aa049333ef008f3802cfecf $fDataSEnv_$cgmapM :: Data.Data.Data a => forall (m :: * -> *). GHC.Base.Monad m => (forall d. Data.Data.Data d => d -> m d) -> Language.Fixpoint.Types.Environments.SEnv a -> m (Language.Fixpoint.Types.Environments.SEnv 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) -> let { $dData1 :: Data.Data.Data (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a) = Data.HashMap.Base.$fDataHashMap @ Language.Fixpoint.Types.Names.Symbol @ a Language.Fixpoint.Types.Names.$fDataSymbol $dData Language.Fixpoint.Types.Names.$fEqSymbol Language.Fixpoint.Types.Names.$fHashableSymbol } in let { lvl68 :: m (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a -> Language.Fixpoint.Types.Environments.SEnv a) = GHC.Base.return @ m $dMonad @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a -> Language.Fixpoint.Types.Environments.SEnv a) (Language.Fixpoint.Types.Environments.$fDataSEnv2 @ a) `cast` (_R ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N) } in \ (ds1 :: Language.Fixpoint.Types.Environments.SEnv a) -> let { lvl69 :: m (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a) = ds @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a) $dData1 ds1 `cast` (Language.Fixpoint.Types.Environments.N:SEnv[0] _N) } in GHC.Base.>>= @ m $dMonad @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a -> Language.Fixpoint.Types.Environments.SEnv a) @ (Language.Fixpoint.Types.Environments.SEnv a) lvl68 (\ (c' :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a -> Language.Fixpoint.Types.Environments.SEnv a) -> GHC.Base.>>= @ m $dMonad @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a) @ (Language.Fixpoint.Types.Environments.SEnv a) lvl69 (\ (x' :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a) -> GHC.Base.return @ m $dMonad @ (Language.Fixpoint.Types.Environments.SEnv a) (c' x')))) -} ae9741409aa049333ef008f3802cfecf $fDataSEnv_$cgmapMo :: Data.Data.Data a => forall (m :: * -> *). GHC.Base.MonadPlus m => (forall d. Data.Data.Data d => d -> m d) -> Language.Fixpoint.Types.Environments.SEnv a -> m (Language.Fixpoint.Types.Environments.SEnv 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.Environments.SEnv a) -> let { $dMonad :: GHC.Base.Monad m = GHC.Base.$p2MonadPlus @ m $dMonadPlus } in let { lvl68 :: m (Language.Fixpoint.Types.Environments.SEnv a) = GHC.Base.mzero @ m $dMonadPlus @ (Language.Fixpoint.Types.Environments.SEnv a) } in GHC.Base.>>= @ m $dMonad @ (Language.Fixpoint.Types.Environments.SEnv a, GHC.Types.Bool) @ (Language.Fixpoint.Types.Environments.SEnv a) (let { lvl69 :: m (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a) = ds @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a) (Data.HashMap.Base.$fDataHashMap @ Language.Fixpoint.Types.Names.Symbol @ a Language.Fixpoint.Types.Names.$fDataSymbol $dData Language.Fixpoint.Types.Names.$fEqSymbol Language.Fixpoint.Types.Names.$fHashableSymbol) eta `cast` (Language.Fixpoint.Types.Environments.N:SEnv[0] _N) } in GHC.Base.>>= @ m $dMonad @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a -> Language.Fixpoint.Types.Environments.SEnv a, GHC.Types.Bool) @ (Language.Fixpoint.Types.Environments.SEnv a, GHC.Types.Bool) (GHC.Base.return @ m $dMonad @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a -> Language.Fixpoint.Types.Environments.SEnv a, GHC.Types.Bool) (Language.Fixpoint.Types.Environments.$fDataSEnv1 @ a)) (\ (ds1 :: (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a -> Language.Fixpoint.Types.Environments.SEnv a, GHC.Types.Bool)) -> case ds1 of wild { (,) h b1 -> case b1 of wild1 { GHC.Types.False -> GHC.Base.mplus @ m $dMonadPlus @ (Language.Fixpoint.Types.Environments.SEnv a, GHC.Types.Bool) (GHC.Base.>>= @ m $dMonad @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a) @ (Language.Fixpoint.Types.Environments.SEnv a, GHC.Types.Bool) lvl69 (\ (y' :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a) -> GHC.Base.return @ m $dMonad @ (Language.Fixpoint.Types.Environments.SEnv a, GHC.Types.Bool) (h y', GHC.Types.True))) (GHC.Base.return @ m $dMonad @ (Language.Fixpoint.Types.Environments.SEnv a, GHC.Types.Bool) (h eta `cast` (Language.Fixpoint.Types.Environments.N:SEnv[0] _N), GHC.Types.False)) GHC.Types.True -> GHC.Base.return @ m $dMonad @ (Language.Fixpoint.Types.Environments.SEnv a, GHC.Types.Bool) (h eta `cast` (Language.Fixpoint.Types.Environments.N:SEnv[0] _N), GHC.Types.True) } })) (\ (ds1 :: (Language.Fixpoint.Types.Environments.SEnv a, GHC.Types.Bool)) -> case ds1 of wild { (,) x' b -> case b of wild1 { GHC.Types.False -> lvl68 GHC.Types.True -> GHC.Base.return @ m $dMonad @ (Language.Fixpoint.Types.Environments.SEnv a) x' } })) -} ae9741409aa049333ef008f3802cfecf $fDataSEnv_$cgmapMp :: Data.Data.Data a => forall (m :: * -> *). GHC.Base.MonadPlus m => (forall d. Data.Data.Data d => d -> m d) -> Language.Fixpoint.Types.Environments.SEnv a -> m (Language.Fixpoint.Types.Environments.SEnv 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.Environments.SEnv a) -> let { $dMonad :: GHC.Base.Monad m = GHC.Base.$p2MonadPlus @ m $dMonadPlus } in let { lvl68 :: m (Language.Fixpoint.Types.Environments.SEnv a) = GHC.Base.mzero @ m $dMonadPlus @ (Language.Fixpoint.Types.Environments.SEnv a) } in GHC.Base.>>= @ m $dMonad @ (Language.Fixpoint.Types.Environments.SEnv a, GHC.Types.Bool) @ (Language.Fixpoint.Types.Environments.SEnv a) (let { lvl69 :: m (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a) = ds @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a) (Data.HashMap.Base.$fDataHashMap @ Language.Fixpoint.Types.Names.Symbol @ a Language.Fixpoint.Types.Names.$fDataSymbol $dData Language.Fixpoint.Types.Names.$fEqSymbol Language.Fixpoint.Types.Names.$fHashableSymbol) eta `cast` (Language.Fixpoint.Types.Environments.N:SEnv[0] _N) } in GHC.Base.>>= @ m $dMonad @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a -> Language.Fixpoint.Types.Environments.SEnv a, GHC.Types.Bool) @ (Language.Fixpoint.Types.Environments.SEnv a, GHC.Types.Bool) (GHC.Base.return @ m $dMonad @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a -> Language.Fixpoint.Types.Environments.SEnv a, GHC.Types.Bool) (Language.Fixpoint.Types.Environments.$fDataSEnv1 @ a)) (\ (ds1 :: (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a -> Language.Fixpoint.Types.Environments.SEnv a, GHC.Types.Bool)) -> case ds1 of wild { (,) h b1 -> GHC.Base.mplus @ m $dMonadPlus @ (Language.Fixpoint.Types.Environments.SEnv a, GHC.Types.Bool) (GHC.Base.>>= @ m $dMonad @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a) @ (Language.Fixpoint.Types.Environments.SEnv a, GHC.Types.Bool) lvl69 (\ (y' :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a) -> GHC.Base.return @ m $dMonad @ (Language.Fixpoint.Types.Environments.SEnv a, GHC.Types.Bool) (h y', GHC.Types.True))) (GHC.Base.return @ m $dMonad @ (Language.Fixpoint.Types.Environments.SEnv a, GHC.Types.Bool) (h eta `cast` (Language.Fixpoint.Types.Environments.N:SEnv[0] _N), b1)) })) (\ (ds1 :: (Language.Fixpoint.Types.Environments.SEnv a, GHC.Types.Bool)) -> case ds1 of wild { (,) x' b -> case b of wild1 { GHC.Types.False -> lvl68 GHC.Types.True -> GHC.Base.return @ m $dMonad @ (Language.Fixpoint.Types.Environments.SEnv a) x' } })) -} ae9741409aa049333ef008f3802cfecf $fDataSEnv_$cgmapQ :: Data.Data.Data a => forall u. (forall d. Data.Data.Data d => d -> u) -> Language.Fixpoint.Types.Environments.SEnv a -> [u] {- Arity: 3, Strictness: m2, Unfolding: InlineRule (3, True, False) (\ @ a ($dData :: Data.Data.Data a) @ u (ds :: forall d. Data.Data.Data d => d -> u) (eta :: Language.Fixpoint.Types.Environments.SEnv a) -> GHC.Types.: @ u (ds @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a) (Data.HashMap.Base.$fDataHashMap @ Language.Fixpoint.Types.Names.Symbol @ a Language.Fixpoint.Types.Names.$fDataSymbol $dData Language.Fixpoint.Types.Names.$fEqSymbol Language.Fixpoint.Types.Names.$fHashableSymbol) eta `cast` (Language.Fixpoint.Types.Environments.N:SEnv[0] _N)) (GHC.Types.[] @ u)) -} ae9741409aa049333ef008f3802cfecf $fDataSEnv_$cgmapQi :: Data.Data.Data a => forall u. GHC.Types.Int -> (forall d. Data.Data.Data d => d -> u) -> Language.Fixpoint.Types.Environments.SEnv a -> u {- Arity: 4, Strictness: , Unfolding: InlineRule (4, True, False) (\ @ a ($dData :: Data.Data.Data a) @ u (ds :: GHC.Types.Int) (ds1 :: forall d. Data.Data.Data d => d -> u) (eta :: Language.Fixpoint.Types.Environments.SEnv a) -> case ds of wild { GHC.Types.I# x -> case x of wild1 { DEFAULT -> Data.Maybe.fromJust1 @ u 0# -> ds1 @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a) (Data.HashMap.Base.$fDataHashMap @ Language.Fixpoint.Types.Names.Symbol @ a Language.Fixpoint.Types.Names.$fDataSymbol $dData Language.Fixpoint.Types.Names.$fEqSymbol Language.Fixpoint.Types.Names.$fHashableSymbol) eta `cast` (Language.Fixpoint.Types.Environments.N:SEnv[0] _N) } }) -} ae9741409aa049333ef008f3802cfecf $fDataSEnv_$cgmapQl :: Data.Data.Data a => forall r r'. (r -> r' -> r) -> r -> (forall d. Data.Data.Data d => d -> r') -> Language.Fixpoint.Types.Environments.SEnv 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 { $dData1 :: Data.Data.Data (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a) = Data.HashMap.Base.$fDataHashMap @ Language.Fixpoint.Types.Names.Symbol @ a Language.Fixpoint.Types.Names.$fDataSymbol $dData Language.Fixpoint.Types.Names.$fEqSymbol Language.Fixpoint.Types.Names.$fHashableSymbol } in \ (x :: Language.Fixpoint.Types.Environments.SEnv a) -> ds ds1 (ds2 @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a) $dData1 x `cast` (Language.Fixpoint.Types.Environments.N:SEnv[0] _N))) -} ae9741409aa049333ef008f3802cfecf $fDataSEnv_$cgmapQr :: Data.Data.Data a => forall r r'. (r' -> r -> r) -> r -> (forall d. Data.Data.Data d => d -> r') -> Language.Fixpoint.Types.Environments.SEnv a -> r {- Arity: 5, Strictness: , Unfolding: InlineRule (5, True, False) (\ @ 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.Environments.SEnv a) -> ds (ds2 @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a) (Data.HashMap.Base.$fDataHashMap @ Language.Fixpoint.Types.Names.Symbol @ a Language.Fixpoint.Types.Names.$fDataSymbol $dData Language.Fixpoint.Types.Names.$fEqSymbol Language.Fixpoint.Types.Names.$fHashableSymbol) eta `cast` (Language.Fixpoint.Types.Environments.N:SEnv[0] _N)) ds1) -} ae9741409aa049333ef008f3802cfecf $fDataSEnv_$cgmapT :: Data.Data.Data a => (forall b. Data.Data.Data b => b -> b) -> Language.Fixpoint.Types.Environments.SEnv a -> Language.Fixpoint.Types.Environments.SEnv a {- Arity: 3, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$fDataSEnv3 `cast` (forall (a :: <*>_N). _R ->_R b -> b>_R ->_R _R ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N) -} ae9741409aa049333ef008f3802cfecf $fDataSEnv_$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.Environments.SEnv a) {- Arity: 1, Strictness: , Unfolding: (\ @ a ($dData :: Data.Data.Data a) @ (c :: * -> *) -> let { $dData1 :: Data.Data.Data (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a) = Data.HashMap.Base.$fDataHashMap @ Language.Fixpoint.Types.Names.Symbol @ a Language.Fixpoint.Types.Names.$fDataSymbol $dData Language.Fixpoint.Types.Names.$fEqSymbol Language.Fixpoint.Types.Names.$fHashableSymbol } in \ (k :: forall b r. Data.Data.Data b => c (b -> r) -> c r) (z :: forall r. r -> c r) (ds :: Data.Data.Constr) -> k @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a) @ (Language.Fixpoint.Types.Environments.SEnv a) $dData1 (z @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a -> Language.Fixpoint.Types.Environments.SEnv a) (Language.Fixpoint.Types.Environments.$fDataSEnv2 @ a) `cast` (_R ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N))) -} ae9741409aa049333ef008f3802cfecf $fDataSEnv_$cp1Data :: Data.Data.Data a => Data.Typeable.Internal.Typeable (Language.Fixpoint.Types.Environments.SEnv a) {- Arity: 1, Strictness: , Unfolding: (\ @ a ($dData :: Data.Data.Data a) -> let { ds :: Data.Typeable.Internal.TypeRep = case Language.Fixpoint.Types.Environments.$fDataSEnv4 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.Environments.SEnv a)) -> ds) `cast` (Sym (Data.Typeable.Internal.N:Typeable[0] <*>_N _N))) -} ae9741409aa049333ef008f3802cfecf $fDataSEnv_$ctoConstr :: Data.Data.Data a => Language.Fixpoint.Types.Environments.SEnv a -> Data.Data.Constr {- Arity: 2, Strictness: , Unfolding: InlineRule (2, True, True) (\ @ a ($dData :: Data.Data.Data a) (ds :: Language.Fixpoint.Types.Environments.SEnv a) -> Language.Fixpoint.Types.Environments.$c2kZ8jJ02SWUIgEgFgj8MIe) -} dae79859b3442c211473f5cded0c14f7 $fEqIBindEnv :: GHC.Classes.Eq Language.Fixpoint.Types.Environments.IBindEnv DFunId {- HasNoCafRefs, Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Environments.IBindEnv Language.Fixpoint.Types.Environments.$fEqIBindEnv_$c== Language.Fixpoint.Types.Environments.$fEqIBindEnv_$c/= -} dae79859b3442c211473f5cded0c14f7 $fEqIBindEnv_$c/= :: Language.Fixpoint.Types.Environments.IBindEnv -> Language.Fixpoint.Types.Environments.IBindEnv -> GHC.Types.Bool {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$fEqIBindEnv_$s$fEqHashSet_$c/= `cast` (Sym (Language.Fixpoint.Types.Environments.N:IBindEnv[0]) ->_R Sym (Language.Fixpoint.Types.Environments.N:IBindEnv[0]) ->_R _R) -} dae79859b3442c211473f5cded0c14f7 $fEqIBindEnv_$c== :: Language.Fixpoint.Types.Environments.IBindEnv -> Language.Fixpoint.Types.Environments.IBindEnv -> GHC.Types.Bool {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$fEqIBindEnv_$s$fEqHashSet_$c== `cast` (Sym (Language.Fixpoint.Types.Environments.N:IBindEnv[0]) ->_R Sym (Language.Fixpoint.Types.Environments.N:IBindEnv[0]) ->_R _R) -} 57eafd9fdaeacec4e9aea2af7670a3ca $fEqIBindEnv_$s$fEqHashSet_$c/= :: Data.HashSet.HashSet GHC.Types.Int -> Data.HashSet.HashSet GHC.Types.Int -> GHC.Types.Bool {- Arity: 2, HasNoCafRefs, Strictness: , Inline: INLINE (sat-args=2), Unfolding: InlineRule (2, False, False) (\ (x :: Data.HashSet.HashSet GHC.Types.Int) (y :: Data.HashSet.HashSet GHC.Types.Int) -> GHC.Classes.not (Data.HashMap.Base.equalKeys @ GHC.Types.Int @ GHC.Types.Int @ () @ () GHC.Classes.eqInt x `cast` (Data.HashSet.N:HashSet[0] _N) y `cast` (Data.HashSet.N:HashSet[0] _N))) -} b7b700b5f413fcf90412092d2e997a6f $fEqIBindEnv_$s$fEqHashSet_$c== :: Data.HashSet.HashSet GHC.Types.Int -> Data.HashSet.HashSet GHC.Types.Int -> GHC.Types.Bool {- Arity: 2, HasNoCafRefs, Strictness: , Inline: INLINE (sat-args=2), Unfolding: InlineRule (2, False, False) (\ (ds :: Data.HashSet.HashSet GHC.Types.Int) (ds1 :: Data.HashSet.HashSet GHC.Types.Int) -> Data.HashMap.Base.equalKeys @ GHC.Types.Int @ GHC.Types.Int @ () @ () GHC.Classes.eqInt ds `cast` (Data.HashSet.N:HashSet[0] _N) ds1 `cast` (Data.HashSet.N:HashSet[0] _N)) -} 999de3bcf4ed26dd71bfcb519acbd47a $fEqPacks :: GHC.Classes.Eq Language.Fixpoint.Types.Environments.Packs DFunId {- HasNoCafRefs, Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Environments.Packs Language.Fixpoint.Types.Environments.$fEqPacks_$c== Language.Fixpoint.Types.Environments.$fEqPacks_$c/= -} 999de3bcf4ed26dd71bfcb519acbd47a $fEqPacks_$c/= :: Language.Fixpoint.Types.Environments.Packs -> Language.Fixpoint.Types.Environments.Packs -> GHC.Types.Bool {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$fEqPacks_$s$fEqHashMap_$c/= `cast` (Sym (Language.Fixpoint.Types.Environments.N:Packs[0]) ->_R Sym (Language.Fixpoint.Types.Environments.N:Packs[0]) ->_R _R) -} 999de3bcf4ed26dd71bfcb519acbd47a $fEqPacks_$c== :: Language.Fixpoint.Types.Environments.Packs -> Language.Fixpoint.Types.Environments.Packs -> GHC.Types.Bool {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$fEqPacks_$s$fEqHashMap_$c== `cast` (Sym (Language.Fixpoint.Types.Environments.N:Packs[0]) ->_R Sym (Language.Fixpoint.Types.Environments.N:Packs[0]) ->_R _R) -} b8f4f11e2361b281b0f42d32469b52f8 $fEqPacks_$s$fEqHashMap_$c/= :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar GHC.Types.Int -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar GHC.Types.Int -> GHC.Types.Bool {- Arity: 2, HasNoCafRefs, Strictness: , Inline: INLINE (sat-args=2), Unfolding: InlineRule (2, False, False) (\ (x :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar GHC.Types.Int) (y :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar GHC.Types.Int) -> GHC.Classes.not (Language.Fixpoint.Types.Environments.$fEqPacks_$s$fEqHashMap_$c== x y)) -} 40e7fe0ae59c6f11c6e8c4d228d844d8 $fEqPacks_$s$fEqHashMap_$c== :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar GHC.Types.Int -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar GHC.Types.Int -> GHC.Types.Bool {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: InlineRule (2, True, False) (\ (eta :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar GHC.Types.Int) (eta1 :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar GHC.Types.Int) -> Data.HashMap.Base.equal @ Language.Fixpoint.Types.Refinements.KVar @ Language.Fixpoint.Types.Refinements.KVar @ GHC.Types.Int @ GHC.Types.Int Language.Fixpoint.Types.Refinements.$fEqKVar_$c== GHC.Classes.eqInt eta eta1) -} ae9741409aa049333ef008f3802cfecf $fEqSEnv :: GHC.Classes.Eq a => GHC.Classes.Eq (Language.Fixpoint.Types.Environments.SEnv a) DFunId {- Arity: 1, HasNoCafRefs, Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun: @ a ($dEq :: GHC.Classes.Eq a). @ (Language.Fixpoint.Types.Environments.SEnv a) (Language.Fixpoint.Types.Environments.$fEqSEnv_$c== @ a $dEq) (Language.Fixpoint.Types.Environments.$fEqSEnv_$c/= @ a $dEq) -} a3f28b668114d3738e77eba4a59984ea $fEqSEnv1 :: GHC.Classes.Eq a => Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a -> GHC.Types.Bool {- Arity: 3, HasNoCafRefs, Strictness: , Unfolding: InlineRule (1, True, False) (\ @ a ($dEq :: GHC.Classes.Eq a) (eta :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a) (eta1 :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a) -> GHC.Classes.not (Data.HashMap.Base.$fEqHashMap_$c== @ Language.Fixpoint.Types.Names.Symbol @ a Language.Fixpoint.Types.Names.$fEqSymbol $dEq eta eta1)) -} b70cc04f46f5f0c514d174cbce7c6600 $fEqSEnv2 :: GHC.Classes.Eq a => Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a -> GHC.Types.Bool {- Arity: 3, HasNoCafRefs, Strictness: , Unfolding: InlineRule (3, True, False) (\ @ a ($dEq :: GHC.Classes.Eq a) (eta :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a) (eta1 :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a) -> Data.HashMap.Base.equal @ Language.Fixpoint.Types.Names.Symbol @ Language.Fixpoint.Types.Names.Symbol @ a @ a Language.Fixpoint.Types.Names.$fEqSymbol_$c== (GHC.Classes.== @ a $dEq) eta eta1) -} ae9741409aa049333ef008f3802cfecf $fEqSEnv_$c/= :: GHC.Classes.Eq a => Language.Fixpoint.Types.Environments.SEnv a -> Language.Fixpoint.Types.Environments.SEnv a -> GHC.Types.Bool {- Arity: 3, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$fEqSEnv1 `cast` (forall (a :: <*>_N). _R ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N ->_R _R) -} ae9741409aa049333ef008f3802cfecf $fEqSEnv_$c== :: GHC.Classes.Eq a => Language.Fixpoint.Types.Environments.SEnv a -> Language.Fixpoint.Types.Environments.SEnv a -> GHC.Types.Bool {- Arity: 3, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$fEqSEnv2 `cast` (forall (a :: <*>_N). _R ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N ->_R _R) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fEqSizedEnv :: GHC.Classes.Eq a => GHC.Classes.Eq (Language.Fixpoint.Types.Environments.SizedEnv a) DFunId {- Arity: 1, HasNoCafRefs, Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun: @ a ($dEq :: GHC.Classes.Eq a). @ (Language.Fixpoint.Types.Environments.SizedEnv a) (Language.Fixpoint.Types.Environments.$fEqSizedEnv_$c== @ a $dEq) (Language.Fixpoint.Types.Environments.$fEqSizedEnv_$c/= @ a $dEq) -} 05c4c08cc6981f9f36aa4d9ba8d2915c $fEqSizedEnv1 :: (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) -> (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) -> GHC.Types.Bool {- Arity: 2, HasNoCafRefs, Unfolding: (\ (w2 :: (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) (w3 :: (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft))[OneShot] -> case w2 of ww { (,) ww1 ww2 -> case w3 of ww3 { (,) ww4 ww5 -> case ww1 of wild { Language.Fixpoint.Types.Names.S dt ds2 ds3 -> case ww4 of wild1 { Language.Fixpoint.Types.Names.S dt1 ds4 ds5 -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# dt dt1) of wild2 { GHC.Types.False -> GHC.Types.False GHC.Types.True -> Language.Fixpoint.Types.Refinements.$fEqSortedReft_$c== ww2 ww5 } } } } }) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fEqSizedEnv_$c/= :: GHC.Classes.Eq a => Language.Fixpoint.Types.Environments.SizedEnv a -> Language.Fixpoint.Types.Environments.SizedEnv a -> GHC.Types.Bool {- Arity: 3, HasNoCafRefs, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (3, True, False) (\ @ a (w :: GHC.Classes.Eq a) (w1 :: Language.Fixpoint.Types.Environments.SizedEnv a) (w2 :: Language.Fixpoint.Types.Environments.SizedEnv a) -> case w1 of ww { Language.Fixpoint.Types.Environments.BE ww1 ww2 -> case w2 of ww3 { Language.Fixpoint.Types.Environments.BE ww4 ww5 -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww1 ww4) of wild { GHC.Types.False -> GHC.Types.True GHC.Types.True -> case Data.HashMap.Base.equal @ GHC.Types.Int @ GHC.Types.Int @ a @ a GHC.Classes.eqInt (GHC.Classes.== @ a w) ww2 ww5 of wild1 { GHC.Types.False -> GHC.Types.True GHC.Types.True -> GHC.Types.False } } } }) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fEqSizedEnv_$c== :: GHC.Classes.Eq a => Language.Fixpoint.Types.Environments.SizedEnv a -> Language.Fixpoint.Types.Environments.SizedEnv a -> GHC.Types.Bool {- Arity: 3, HasNoCafRefs, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (3, True, False) (\ @ a (w :: GHC.Classes.Eq a) (w1 :: Language.Fixpoint.Types.Environments.SizedEnv a) (w2 :: Language.Fixpoint.Types.Environments.SizedEnv a) -> case w1 of ww { Language.Fixpoint.Types.Environments.BE ww1 ww2 -> case w2 of ww3 { Language.Fixpoint.Types.Environments.BE ww4 ww5 -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww1 ww4) of wild { GHC.Types.False -> GHC.Types.False GHC.Types.True -> Data.HashMap.Base.equal @ GHC.Types.Int @ GHC.Types.Int @ a @ a GHC.Classes.eqInt (GHC.Classes.== @ a w) ww2 ww5 } } }) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fEqSolEnv :: GHC.Classes.Eq Language.Fixpoint.Types.Environments.SolEnv DFunId {- HasNoCafRefs, Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Environments.SolEnv Language.Fixpoint.Types.Environments.$fEqSolEnv_$c== Language.Fixpoint.Types.Environments.$fEqSolEnv_$c/= -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fEqSolEnv_$c/= :: Language.Fixpoint.Types.Environments.SolEnv -> Language.Fixpoint.Types.Environments.SolEnv -> GHC.Types.Bool {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: InlineRule (2, True, False) (\ (a :: Language.Fixpoint.Types.Environments.SolEnv) (b :: Language.Fixpoint.Types.Environments.SolEnv) -> case Language.Fixpoint.Types.Environments.$fEqSolEnv_$c== a b of wild { GHC.Types.False -> GHC.Types.True GHC.Types.True -> GHC.Types.False }) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fEqSolEnv_$c== :: Language.Fixpoint.Types.Environments.SolEnv -> Language.Fixpoint.Types.Environments.SolEnv -> GHC.Types.Bool {- Arity: 2, HasNoCafRefs, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (2, True, False) (\ (w :: Language.Fixpoint.Types.Environments.SolEnv) (w1 :: Language.Fixpoint.Types.Environments.SolEnv) -> case w of ww { Language.Fixpoint.Types.Environments.SolEnv ww1 -> case ww1 of ww2 { Language.Fixpoint.Types.Environments.BE ww3 ww4 -> case w1 of ww5 { Language.Fixpoint.Types.Environments.SolEnv ww6 -> case ww6 of ww7 { Language.Fixpoint.Types.Environments.BE ww8 ww9 -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww3 ww8) of wild { GHC.Types.False -> GHC.Types.False GHC.Types.True -> Data.HashMap.Base.equal @ GHC.Types.Int @ GHC.Types.Int @ (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) @ (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) GHC.Classes.eqInt Language.Fixpoint.Types.Environments.$fEqSizedEnv1 ww4 ww9 } } } } }) -} dae79859b3442c211473f5cded0c14f7 $fFixpointIBindEnv :: Language.Fixpoint.Types.PrettyPrint.Fixpoint Language.Fixpoint.Types.Environments.IBindEnv DFunId {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Environments.IBindEnv Language.Fixpoint.Types.Environments.$fFixpointIBindEnv_$ctoFix Language.Fixpoint.Types.Environments.$fFixpointIBindEnv_$s$dmsimplify -} 9d5741b9a53fae598eb20e332f21a2b7 $fFixpointIBindEnv1 :: Text.PrettyPrint.HughesPJ.Doc {- Unfolding: (case GHC.List.$wlenAcc @ GHC.Types.Char Language.Fixpoint.Types.Environments.$fFixpointIBindEnv_s 0# of ww2 { DEFAULT -> (Text.PrettyPrint.Annotated.HughesPJ.TextBeside @ () (Text.PrettyPrint.Annotated.HughesPJ.NoAnnot @ () Language.Fixpoint.Types.Environments.$fFixpointIBindEnv2 ww2) (Text.PrettyPrint.Annotated.HughesPJ.Empty @ ())) `cast` (Sym (Text.PrettyPrint.HughesPJ.N:Doc[0])) }) -} dd7b61c1864e877daadda592761fdb07 $fFixpointIBindEnv2 :: Text.PrettyPrint.Annotated.HughesPJ.TextDetails {- Unfolding: (Text.PrettyPrint.Annotated.HughesPJ.Str Language.Fixpoint.Types.Environments.$fFixpointIBindEnv_s) -} dae79859b3442c211473f5cded0c14f7 $fFixpointIBindEnv_$ctoFix :: Language.Fixpoint.Types.Environments.IBindEnv -> Text.PrettyPrint.HughesPJ.Doc {- Arity: 1, Strictness: m7, Inline: INLINE[0], Unfolding: InlineRule (1, True, False) (\ (w :: Language.Fixpoint.Types.Environments.IBindEnv) -> letrec { go6 :: [GHC.Types.Int] -> [Text.PrettyPrint.Annotated.HughesPJ.Doc ()] {- Arity: 1, Strictness: -} = \ (ds :: [GHC.Types.Int]) -> case ds of wild { [] -> GHC.Types.[] @ (Text.PrettyPrint.Annotated.HughesPJ.Doc ()) : y ys -> GHC.Types.: @ (Text.PrettyPrint.Annotated.HughesPJ.Doc ()) (Language.Fixpoint.Types.PrettyPrint.$fFixpointInt_$ctoFix y) `cast` (Text.PrettyPrint.HughesPJ.N:Doc[0]) (go6 ys) } } in case Text.PrettyPrint.Annotated.HughesPJ.punctuate @ () Language.Fixpoint.Types.PrettyPrint.$fFixpointHashSet5 `cast` (Text.PrettyPrint.HughesPJ.N:Doc[0]) (go6 (Data.OldList.sortBy @ GHC.Types.Int GHC.Classes.compareInt (Language.Fixpoint.Types.PrettyPrint.$fFixpointHashSet1 @ GHC.Types.Int (GHC.Types.[] @ GHC.Types.Int) w `cast` (Trans (Language.Fixpoint.Types.Environments.N:IBindEnv[0]) (Data.HashSet.N:HashSet[0] _N))))) of wild { [] -> case Language.Fixpoint.Types.Environments.$fFixpointIBindEnv1 `cast` (Text.PrettyPrint.HughesPJ.N:Doc[0]) of wild1 { DEFAULT -> (Text.PrettyPrint.Annotated.HughesPJ.Beside @ () wild1 GHC.Types.True (Text.PrettyPrint.Annotated.HughesPJ.Beside @ () Text.PrettyPrint.HughesPJ.brackets4 GHC.Types.False Text.PrettyPrint.HughesPJ.brackets1)) `cast` (Sym (Text.PrettyPrint.HughesPJ.N:Doc[0])) Text.PrettyPrint.Annotated.HughesPJ.Empty -> (Text.PrettyPrint.Annotated.HughesPJ.Beside @ () Text.PrettyPrint.HughesPJ.brackets4 GHC.Types.False Text.PrettyPrint.HughesPJ.brackets1) `cast` (Sym (Text.PrettyPrint.HughesPJ.N:Doc[0])) } : p ps -> case Text.PrettyPrint.Annotated.HughesPJ.$wsep1 @ () GHC.Types.True (Text.PrettyPrint.Annotated.HughesPJ.reduceDoc @ () p) 0# ps of wild1 { DEFAULT -> case Language.Fixpoint.Types.Environments.$fFixpointIBindEnv1 `cast` (Text.PrettyPrint.HughesPJ.N:Doc[0]) of wild2 { DEFAULT -> (Text.PrettyPrint.Annotated.HughesPJ.Beside @ () wild2 GHC.Types.True (Text.PrettyPrint.Annotated.HughesPJ.Beside @ () (Text.PrettyPrint.Annotated.HughesPJ.Beside @ () Text.PrettyPrint.HughesPJ.brackets4 GHC.Types.False wild1) GHC.Types.False Text.PrettyPrint.HughesPJ.brackets1)) `cast` (Sym (Text.PrettyPrint.HughesPJ.N:Doc[0])) Text.PrettyPrint.Annotated.HughesPJ.Empty -> (Text.PrettyPrint.Annotated.HughesPJ.Beside @ () (Text.PrettyPrint.Annotated.HughesPJ.Beside @ () Text.PrettyPrint.HughesPJ.brackets4 GHC.Types.False wild1) GHC.Types.False Text.PrettyPrint.HughesPJ.brackets1) `cast` (Sym (Text.PrettyPrint.HughesPJ.N:Doc[0])) } Text.PrettyPrint.Annotated.HughesPJ.Empty -> case Language.Fixpoint.Types.Environments.$fFixpointIBindEnv1 `cast` (Text.PrettyPrint.HughesPJ.N:Doc[0]) of wild2 { DEFAULT -> (Text.PrettyPrint.Annotated.HughesPJ.Beside @ () wild2 GHC.Types.True (Text.PrettyPrint.Annotated.HughesPJ.Beside @ () Text.PrettyPrint.HughesPJ.brackets4 GHC.Types.False Text.PrettyPrint.HughesPJ.brackets1)) `cast` (Sym (Text.PrettyPrint.HughesPJ.N:Doc[0])) Text.PrettyPrint.Annotated.HughesPJ.Empty -> (Text.PrettyPrint.Annotated.HughesPJ.Beside @ () Text.PrettyPrint.HughesPJ.brackets4 GHC.Types.False Text.PrettyPrint.HughesPJ.brackets1) `cast` (Sym (Text.PrettyPrint.HughesPJ.N:Doc[0])) } } }) -} dae79859b3442c211473f5cded0c14f7 $fFixpointIBindEnv_$s$dmsimplify :: Language.Fixpoint.Types.Environments.IBindEnv -> Language.Fixpoint.Types.Environments.IBindEnv {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (-1, True, True) (GHC.Base.id @ Language.Fixpoint.Types.Environments.IBindEnv) -} 857addb8bed2d63173b639935d345509 $fFixpointIBindEnv_s :: GHC.Base.String {- Unfolding: (GHC.CString.unpackCString# "env"#) -} 999de3bcf4ed26dd71bfcb519acbd47a $fFixpointPacks :: Language.Fixpoint.Types.PrettyPrint.Fixpoint Language.Fixpoint.Types.Environments.Packs DFunId {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Environments.Packs Language.Fixpoint.Types.Environments.$fFixpointPacks_$ctoFix Language.Fixpoint.Types.Environments.$fFixpointPacks_$s$dmsimplify -} 905d99e4ea4cf085b8a1b367f768b43e $fFixpointPacks1 :: (Language.Fixpoint.Types.Refinements.KVar, GHC.Types.Int) -> (Language.Fixpoint.Types.Refinements.KVar, GHC.Types.Int) -> GHC.Types.Ordering {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: InlineRule (2, True, False) (\ (x :: (Language.Fixpoint.Types.Refinements.KVar, GHC.Types.Int)) (y :: (Language.Fixpoint.Types.Refinements.KVar, GHC.Types.Int)) -> case x of wild { (,) ds1 y1 -> case y1 of wild1 { GHC.Types.I# x# -> case y of wild2 { (,) ds2 y2 -> case y2 of wild3 { GHC.Types.I# y# -> GHC.Classes.compareInt# x# y# } } } }) -} 999de3bcf4ed26dd71bfcb519acbd47a $fFixpointPacks_$ctoFix :: Language.Fixpoint.Types.Environments.Packs -> Text.PrettyPrint.HughesPJ.Doc {- Arity: 1, Strictness: , Unfolding: (\ (ds :: Language.Fixpoint.Types.Environments.Packs) -> case Text.PrettyPrint.Annotated.HughesPJ.$wreduceVert @ () (Text.PrettyPrint.Annotated.HughesPJ.vcat1 @ () (Language.Fixpoint.Types.Environments.$fFixpointPacks_go (Data.OldList.sortBy @ (Language.Fixpoint.Types.Refinements.KVar, GHC.Types.Int) Language.Fixpoint.Types.Environments.$fFixpointPacks1 (Language.Fixpoint.Types.Environments.$fFixpointPacks_go1 (GHC.Types.[] @ (Language.Fixpoint.Types.Refinements.KVar, GHC.Types.Int)) ds `cast` (Language.Fixpoint.Types.Environments.N:Packs[0]))))) of ww { (#,#) ww1 ww2 -> ww2 `cast` (Sym (Text.PrettyPrint.HughesPJ.N:Doc[0])) }) -} 999de3bcf4ed26dd71bfcb519acbd47a $fFixpointPacks_$s$dmsimplify :: Language.Fixpoint.Types.Environments.Packs -> Language.Fixpoint.Types.Environments.Packs {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (-1, True, True) (GHC.Base.id @ Language.Fixpoint.Types.Environments.Packs) -} 759f82d874673397c40deb2dd4ed9292 $fFixpointPacks_go :: [(Language.Fixpoint.Types.Refinements.KVar, GHC.Types.Int)] -> [Text.PrettyPrint.Annotated.HughesPJ.Doc ()] {- Arity: 1, Strictness: -} f073a2c8c9210c5577d54eaa9a937046 $fFixpointPacks_go1 :: [(Language.Fixpoint.Types.Refinements.KVar, GHC.Types.Int)] -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar GHC.Types.Int -> [(Language.Fixpoint.Types.Refinements.KVar, GHC.Types.Int)] {- Arity: 2, HasNoCafRefs, Strictness: -} ae9741409aa049333ef008f3802cfecf $fFixpointSEnv :: Language.Fixpoint.Types.PrettyPrint.Fixpoint a => Language.Fixpoint.Types.PrettyPrint.Fixpoint (Language.Fixpoint.Types.Environments.SEnv a) DFunId {- Arity: 1, Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun: @ a ($dFixpoint :: Language.Fixpoint.Types.PrettyPrint.Fixpoint a). @ (Language.Fixpoint.Types.Environments.SEnv a) (Language.Fixpoint.Types.Environments.$fFixpointSEnv_$ctoFix @ a $dFixpoint) (Language.Fixpoint.Types.Environments.$fFixpointSEnv_$csimplify @ a $dFixpoint) -} ae9741409aa049333ef008f3802cfecf $fFixpointSEnv_$csimplify :: Language.Fixpoint.Types.PrettyPrint.Fixpoint a => Language.Fixpoint.Types.Environments.SEnv a -> Language.Fixpoint.Types.Environments.SEnv a {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: InlineRule (2, True, True) (\ @ a ($dFixpoint :: Language.Fixpoint.Types.PrettyPrint.Fixpoint a) (eta :: Language.Fixpoint.Types.Environments.SEnv a) -> eta) -} ae9741409aa049333ef008f3802cfecf $fFixpointSEnv_$ctoFix :: Language.Fixpoint.Types.PrettyPrint.Fixpoint a => Language.Fixpoint.Types.Environments.SEnv a -> Text.PrettyPrint.HughesPJ.Doc {- Arity: 2, Strictness: m7, Inline: INLINE[0], Unfolding: InlineRule (2, True, False) (\ @ a (w :: Language.Fixpoint.Types.PrettyPrint.Fixpoint a) (w1 :: Language.Fixpoint.Types.Environments.SEnv a) -> case Language.Fixpoint.Types.Environments.$w$ctoFix @ a w w1 of ww { (#,,#) ww1 ww2 ww3 -> (Text.PrettyPrint.Annotated.HughesPJ.Beside @ () ww1 ww2 ww3) `cast` (Sym (Text.PrettyPrint.HughesPJ.N:Doc[0])) }) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fFixpointSizedEnv :: Language.Fixpoint.Types.PrettyPrint.Fixpoint Language.Fixpoint.Types.Environments.BindEnv DFunId {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Environments.BindEnv Language.Fixpoint.Types.Environments.$fFixpointSizedEnv_$ctoFix Language.Fixpoint.Types.Environments.$fFixpointSizedEnv_$s$dmsimplify -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fFixpointSizedEnv_$ctoFix :: Language.Fixpoint.Types.Environments.BindEnv -> Text.PrettyPrint.HughesPJ.Doc {- Arity: 1, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (1, True, False) (\ (w :: Language.Fixpoint.Types.Environments.BindEnv) -> case w of ww { Language.Fixpoint.Types.Environments.BE ww1 ww2 -> Language.Fixpoint.Types.Environments.$w$ctoFix1 ww2 }) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fFixpointSizedEnv_$s$dmsimplify :: Language.Fixpoint.Types.Environments.BindEnv -> Language.Fixpoint.Types.Environments.BindEnv {- Arity: 1, HasNoCafRefs, Strictness: m, Unfolding: InlineRule (-1, True, True) (GHC.Base.id @ Language.Fixpoint.Types.Environments.BindEnv) -} 0fab027972de563e959dc3cdea754bd6 $fFixpointSizedEnv_go :: [(Language.Fixpoint.Types.Environments.BindId, (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft))] -> [Text.PrettyPrint.Annotated.HughesPJ.Doc ()] {- Arity: 1, Strictness: -} ae9741409aa049333ef008f3802cfecf $fFoldableSEnv :: Data.Foldable.Foldable Language.Fixpoint.Types.Environments.SEnv DFunId {- Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Environments.SEnv Language.Fixpoint.Types.Environments.$fFoldableSEnv_$cfold Language.Fixpoint.Types.Environments.$fFoldableSEnv_$cfoldMap Language.Fixpoint.Types.Environments.$fFoldableSEnv_$cfoldr Language.Fixpoint.Types.Environments.$fFoldableSEnv_$cfoldr' Language.Fixpoint.Types.Environments.$fFoldableSEnv_$cfoldl Language.Fixpoint.Types.Environments.$fFoldableSEnv_$cfoldl' Language.Fixpoint.Types.Environments.$fFoldableSEnv_$cfoldr1 Language.Fixpoint.Types.Environments.$fFoldableSEnv_$cfoldl1 Language.Fixpoint.Types.Environments.$fFoldableSEnv_$ctoList Language.Fixpoint.Types.Environments.$fFoldableSEnv_$cnull Language.Fixpoint.Types.Environments.$fFoldableSEnv_$clength Language.Fixpoint.Types.Environments.$fFoldableSEnv_$celem Language.Fixpoint.Types.Environments.$fFoldableSEnv_$cmaximum Language.Fixpoint.Types.Environments.$fFoldableSEnv_$cminimum Language.Fixpoint.Types.Environments.$fFoldableSEnv_$csum Language.Fixpoint.Types.Environments.$fFoldableSEnv_$cproduct -} ae9741409aa049333ef008f3802cfecf $fFoldableSEnv_$celem :: GHC.Classes.Eq a => a -> Language.Fixpoint.Types.Environments.SEnv a -> GHC.Types.Bool {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) (Data.HashMap.Base.$fFoldableHashMap_$celem @ Language.Fixpoint.Types.Names.Symbol) `cast` (forall (a :: <*>_N). _R ->_R _R ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N ->_R _R) -} ae9741409aa049333ef008f3802cfecf $fFoldableSEnv_$cfold :: GHC.Base.Monoid m => Language.Fixpoint.Types.Environments.SEnv m -> m {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) (Data.HashMap.Base.$fFoldableHashMap_$cfold @ Language.Fixpoint.Types.Names.Symbol) `cast` (forall (m :: <*>_N). _R ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N ->_R _R) -} ae9741409aa049333ef008f3802cfecf $fFoldableSEnv_$cfoldMap :: GHC.Base.Monoid m => (a -> m) -> Language.Fixpoint.Types.Environments.SEnv a -> m {- Arity: 2, Strictness: , Unfolding: InlineRule (0, True, True) (Data.HashMap.Base.$fFoldableHashMap_$cfoldMap @ Language.Fixpoint.Types.Names.Symbol) `cast` (forall (m :: <*>_N) (a :: <*>_N). _R ->_R m>_R ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N ->_R _R) -} ae9741409aa049333ef008f3802cfecf $fFoldableSEnv_$cfoldl :: (b -> a -> b) -> b -> Language.Fixpoint.Types.Environments.SEnv a -> b {- Arity: 3, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) (Data.HashMap.Base.$fFoldableHashMap_$cfoldl @ Language.Fixpoint.Types.Names.Symbol) `cast` (forall (b :: <*>_N) (a :: <*>_N). a -> b>_R ->_R _R ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N ->_R _R) -} ae9741409aa049333ef008f3802cfecf $fFoldableSEnv_$cfoldl' :: (b -> a -> b) -> b -> Language.Fixpoint.Types.Environments.SEnv a -> b {- Arity: 3, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) (Data.HashMap.Base.$fFoldableHashMap_$cfoldl' @ Language.Fixpoint.Types.Names.Symbol) `cast` (forall (b :: <*>_N) (a :: <*>_N). a -> b>_R ->_R _R ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N ->_R _R) -} ae9741409aa049333ef008f3802cfecf $fFoldableSEnv_$cfoldl1 :: (a -> a -> a) -> Language.Fixpoint.Types.Environments.SEnv a -> a {- Arity: 2, Strictness: , Unfolding: InlineRule (0, True, True) (Data.HashMap.Base.$fFoldableHashMap_$cfoldl1 @ Language.Fixpoint.Types.Names.Symbol) `cast` (forall (a :: <*>_N). a -> a>_R ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N ->_R _R) -} ae9741409aa049333ef008f3802cfecf $fFoldableSEnv_$cfoldr :: (a -> b -> b) -> b -> Language.Fixpoint.Types.Environments.SEnv a -> b {- Arity: 3, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) (Data.HashMap.Base.$fFoldableHashMap_$cfoldr @ Language.Fixpoint.Types.Names.Symbol) `cast` (forall (a :: <*>_N) (b :: <*>_N). b -> b>_R ->_R _R ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N ->_R _R) -} ae9741409aa049333ef008f3802cfecf $fFoldableSEnv_$cfoldr' :: (a -> b -> b) -> b -> Language.Fixpoint.Types.Environments.SEnv a -> b {- Arity: 3, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) (Data.HashMap.Base.$fFoldableHashMap_$cfoldr' @ Language.Fixpoint.Types.Names.Symbol) `cast` (forall (a :: <*>_N) (b :: <*>_N). b -> b>_R ->_R _R ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N ->_R _R) -} ae9741409aa049333ef008f3802cfecf $fFoldableSEnv_$cfoldr1 :: (a -> a -> a) -> Language.Fixpoint.Types.Environments.SEnv a -> a {- Arity: 2, Strictness: , Unfolding: InlineRule (0, True, True) (Data.HashMap.Base.$fFoldableHashMap_$cfoldr1 @ Language.Fixpoint.Types.Names.Symbol) `cast` (forall (a :: <*>_N). a -> a>_R ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N ->_R _R) -} ae9741409aa049333ef008f3802cfecf $fFoldableSEnv_$clength :: Language.Fixpoint.Types.Environments.SEnv a -> GHC.Types.Int {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) (Data.HashMap.Base.$fFoldableHashMap_$clength @ Language.Fixpoint.Types.Names.Symbol) `cast` (forall (a :: <*>_N). Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N ->_R _R) -} ae9741409aa049333ef008f3802cfecf $fFoldableSEnv_$cmaximum :: GHC.Classes.Ord a => Language.Fixpoint.Types.Environments.SEnv a -> a {- Arity: 2, Strictness: , Unfolding: InlineRule (0, True, True) (Data.HashMap.Base.$fFoldableHashMap_$cmaximum @ Language.Fixpoint.Types.Names.Symbol) `cast` (forall (a :: <*>_N). _R ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N ->_R _R) -} ae9741409aa049333ef008f3802cfecf $fFoldableSEnv_$cminimum :: GHC.Classes.Ord a => Language.Fixpoint.Types.Environments.SEnv a -> a {- Arity: 2, Strictness: , Unfolding: InlineRule (0, True, True) (Data.HashMap.Base.$fFoldableHashMap_$cminimum @ Language.Fixpoint.Types.Names.Symbol) `cast` (forall (a :: <*>_N). _R ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N ->_R _R) -} ae9741409aa049333ef008f3802cfecf $fFoldableSEnv_$cnull :: Language.Fixpoint.Types.Environments.SEnv a -> GHC.Types.Bool {- Arity: 1, HasNoCafRefs, Unfolding: InlineRule (0, True, True) (Data.HashMap.Base.$fFoldableHashMap_$cnull @ Language.Fixpoint.Types.Names.Symbol) `cast` (forall (a :: <*>_N). Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N ->_R _R) -} ae9741409aa049333ef008f3802cfecf $fFoldableSEnv_$cproduct :: GHC.Num.Num a => Language.Fixpoint.Types.Environments.SEnv a -> a {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) (Data.HashMap.Base.$fFoldableHashMap1 @ Language.Fixpoint.Types.Names.Symbol) `cast` (forall (a :: <*>_N). _R ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N ->_R Data.Monoid.N:Product[0] _R) -} ae9741409aa049333ef008f3802cfecf $fFoldableSEnv_$csum :: GHC.Num.Num a => Language.Fixpoint.Types.Environments.SEnv a -> a {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) (Data.HashMap.Base.$fFoldableHashMap2 @ Language.Fixpoint.Types.Names.Symbol) `cast` (forall (a :: <*>_N). _R ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N ->_R Data.Monoid.N:Sum[0] _R) -} ae9741409aa049333ef008f3802cfecf $fFoldableSEnv_$ctoList :: Language.Fixpoint.Types.Environments.SEnv a -> [a] {- Arity: 1, Strictness: , Unfolding: InlineRule (0, True, True) (Data.HashMap.Base.$fFoldableHashMap_$ctoList @ Language.Fixpoint.Types.Names.Symbol) `cast` (forall (a :: <*>_N). Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N ->_R <[a]>_R) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fFoldableSizedEnv :: Data.Foldable.Foldable Language.Fixpoint.Types.Environments.SizedEnv DFunId {- Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Environments.SizedEnv Language.Fixpoint.Types.Environments.$fFoldableSizedEnv_$cfold Language.Fixpoint.Types.Environments.$fFoldableSizedEnv_$cfoldMap Language.Fixpoint.Types.Environments.$fFoldableSizedEnv_$cfoldr Language.Fixpoint.Types.Environments.$fFoldableSizedEnv_$cfoldr' Language.Fixpoint.Types.Environments.$fFoldableSizedEnv_$cfoldl Language.Fixpoint.Types.Environments.$fFoldableSizedEnv_$cfoldl' Language.Fixpoint.Types.Environments.$fFoldableSizedEnv_$cfoldr1 Language.Fixpoint.Types.Environments.$fFoldableSizedEnv_$cfoldl1 Language.Fixpoint.Types.Environments.$fFoldableSizedEnv_$ctoList Language.Fixpoint.Types.Environments.$fFoldableSizedEnv_$cnull Language.Fixpoint.Types.Environments.$fFoldableSizedEnv_$clength Language.Fixpoint.Types.Environments.$fFoldableSizedEnv_$celem Language.Fixpoint.Types.Environments.$fFoldableSizedEnv_$cmaximum Language.Fixpoint.Types.Environments.$fFoldableSizedEnv_$cminimum Language.Fixpoint.Types.Environments.$fFoldableSizedEnv_$csum Language.Fixpoint.Types.Environments.$fFoldableSizedEnv_$cproduct -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fFoldableSizedEnv1 :: GHC.Num.Num a => Language.Fixpoint.Types.Environments.SizedEnv a -> Data.Monoid.Product a {- Arity: 2, HasNoCafRefs, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (2, True, False) (\ @ a (w :: GHC.Num.Num a) (w1 :: Language.Fixpoint.Types.Environments.SizedEnv a) -> case w1 of ww { Language.Fixpoint.Types.Environments.BE ww1 ww2 -> Language.Fixpoint.Types.Environments.$w$cproduct @ a w ww2 }) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fFoldableSizedEnv2 :: GHC.Num.Num a => Language.Fixpoint.Types.Environments.SizedEnv a -> Data.Monoid.Sum a {- Arity: 2, HasNoCafRefs, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (2, True, False) (\ @ a (w :: GHC.Num.Num a) (w1 :: Language.Fixpoint.Types.Environments.SizedEnv a) -> case w1 of ww { Language.Fixpoint.Types.Environments.BE ww1 ww2 -> Language.Fixpoint.Types.Environments.$w$csum @ a w ww2 }) -} ce61bc1fb286c4acc8ed881fdd227eed $fFoldableSizedEnv3 :: a {- Strictness: x -} 7cabac16ef5081e483e049f576e06b88 $fFoldableSizedEnv4 :: a {- Strictness: x -} d32551bdb03b7bb6daff63ee1ecec580 $fFoldableSizedEnv5 :: GHC.Types.Int {- HasNoCafRefs, Strictness: m, Unfolding: (GHC.Types.I# 0#) -} aad417875f2010a5c8532507c74be128 $fFoldableSizedEnv6 :: a -> (GHC.Types.Int -> GHC.Types.Int) -> GHC.Types.Int -> GHC.Types.Int {- Arity: 3, HasNoCafRefs, Unfolding: (\ @ a (x :: a) (k :: GHC.Types.Int -> GHC.Types.Int)[OneShot] (z :: GHC.Types.Int) -> case z of wild { GHC.Types.I# x1 -> k (GHC.Types.I# (GHC.Prim.+# x1 1#)) }) -} bb3cbd331e5b5e44bf6c6d10ad6885d2 $fFoldableSizedEnv7 :: a {- Strictness: x -} b1d3cfbe4805cfce61df46dfef9e67b0 $fFoldableSizedEnv8 :: a {- Strictness: x -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fFoldableSizedEnv_$celem :: GHC.Classes.Eq a => a -> Language.Fixpoint.Types.Environments.SizedEnv 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 let { lvl68 :: a -> GHC.Types.Bool -> GHC.Types.Bool {- Arity: 2 -} = \ (x :: a) (ds1 :: GHC.Types.Bool)[OneShot] -> case f x of wild { GHC.Types.False -> ds1 GHC.Types.True -> GHC.Types.True } } in (\ (ds :: Language.Fixpoint.Types.Environments.SizedEnv a) -> case ds of wild { Language.Fixpoint.Types.Environments.BE dt a2 -> Data.HashMap.Base.$fFoldableHashMap_$cfoldr @ GHC.Types.Int @ a @ Data.Monoid.Any lvl68 `cast` (_R ->_R Sym (Data.Monoid.N:Any[0]) ->_R Sym (Data.Monoid.N:Any[0])) GHC.Types.False `cast` (Sym (Data.Monoid.N:Any[0])) a2 }) `cast` (_R ->_R Data.Monoid.N:Any[0])) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fFoldableSizedEnv_$cfold :: GHC.Base.Monoid m => Language.Fixpoint.Types.Environments.SizedEnv m -> m {- Arity: 2, HasNoCafRefs, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (2, True, False) (\ @ m (w :: GHC.Base.Monoid m) (w1 :: Language.Fixpoint.Types.Environments.SizedEnv m) -> case w1 of ww { Language.Fixpoint.Types.Environments.BE ww1 ww2 -> Language.Fixpoint.Types.Environments.$w$cfold @ m w ww2 }) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fFoldableSizedEnv_$cfoldMap :: GHC.Base.Monoid m => (a -> m) -> Language.Fixpoint.Types.Environments.SizedEnv a -> m {- Arity: 3, HasNoCafRefs, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (3, True, False) (\ @ m @ a (w :: GHC.Base.Monoid m) (w1 :: a -> m) (w2 :: Language.Fixpoint.Types.Environments.SizedEnv a) -> case w2 of ww { Language.Fixpoint.Types.Environments.BE ww1 ww2 -> Language.Fixpoint.Types.Environments.$w$cfoldMap @ m @ a w w1 ww2 }) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fFoldableSizedEnv_$cfoldl :: (b -> a -> b) -> b -> Language.Fixpoint.Types.Environments.SizedEnv a -> b {- Arity: 3, HasNoCafRefs, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (3, True, False) (\ @ b @ a (w :: b -> a -> b) (w1 :: b) (w2 :: Language.Fixpoint.Types.Environments.SizedEnv a) -> case w2 of ww { Language.Fixpoint.Types.Environments.BE ww1 ww2 -> Language.Fixpoint.Types.Environments.$w$cfoldl @ b @ a w w1 ww2 }) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fFoldableSizedEnv_$cfoldl' :: (b -> a -> b) -> b -> Language.Fixpoint.Types.Environments.SizedEnv a -> b {- Arity: 3, HasNoCafRefs, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (3, True, False) (\ @ b @ a (w :: b -> a -> b) (w1 :: b) (w2 :: Language.Fixpoint.Types.Environments.SizedEnv a) -> case w2 of ww { Language.Fixpoint.Types.Environments.BE ww1 ww2 -> Language.Fixpoint.Types.Environments.$w$cfoldl' @ b @ a w w1 ww2 }) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fFoldableSizedEnv_$cfoldl1 :: (a -> a -> a) -> Language.Fixpoint.Types.Environments.SizedEnv a -> a {- Arity: 2, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (2, True, False) (\ @ a (w :: a -> a -> a) (w1 :: Language.Fixpoint.Types.Environments.SizedEnv a) -> case w1 of ww { Language.Fixpoint.Types.Environments.BE ww1 ww2 -> Language.Fixpoint.Types.Environments.$w$cfoldl1 @ a w ww2 }) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fFoldableSizedEnv_$cfoldr :: (a -> b -> b) -> b -> Language.Fixpoint.Types.Environments.SizedEnv a -> b {- Arity: 3, HasNoCafRefs, Strictness: , Unfolding: InlineRule (3, True, False) (\ @ a @ b (f :: a -> b -> b) (z :: b) (ds :: Language.Fixpoint.Types.Environments.SizedEnv a) -> case ds of wild { Language.Fixpoint.Types.Environments.BE dt a2 -> Data.HashMap.Base.$fFoldableHashMap_$cfoldr @ GHC.Types.Int @ a @ b f z a2 }) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fFoldableSizedEnv_$cfoldr' :: (a -> b -> b) -> b -> Language.Fixpoint.Types.Environments.SizedEnv a -> b {- Arity: 3, HasNoCafRefs, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (3, True, False) (\ @ a @ b (w :: a -> b -> b) (w1 :: b) (w2 :: Language.Fixpoint.Types.Environments.SizedEnv a) -> case w2 of ww { Language.Fixpoint.Types.Environments.BE ww1 ww2 -> Language.Fixpoint.Types.Environments.$w$cfoldr' @ a @ b w w1 ww2 }) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fFoldableSizedEnv_$cfoldr1 :: (a -> a -> a) -> Language.Fixpoint.Types.Environments.SizedEnv a -> a {- Arity: 2, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (2, True, False) (\ @ a (w :: a -> a -> a) (w1 :: Language.Fixpoint.Types.Environments.SizedEnv a) -> case w1 of ww { Language.Fixpoint.Types.Environments.BE ww1 ww2 -> Language.Fixpoint.Types.Environments.$w$cfoldr1 @ a w ww2 }) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fFoldableSizedEnv_$clength :: Language.Fixpoint.Types.Environments.SizedEnv a -> GHC.Types.Int {- Arity: 1, HasNoCafRefs, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (1, True, False) (\ @ a (w :: Language.Fixpoint.Types.Environments.SizedEnv a) -> case w of ww { Language.Fixpoint.Types.Environments.BE ww1 ww2 -> Data.HashMap.Base.$fFoldableHashMap_$cfoldr @ GHC.Types.Int @ a @ (GHC.Types.Int -> GHC.Types.Int) (Language.Fixpoint.Types.Environments.$fFoldableSizedEnv6 @ a) (GHC.Base.id @ GHC.Types.Int) ww2 Language.Fixpoint.Types.Environments.$fFoldableSizedEnv5 }) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fFoldableSizedEnv_$cmaximum :: GHC.Classes.Ord a => Language.Fixpoint.Types.Environments.SizedEnv a -> a {- Arity: 2, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (2, True, False) (\ @ a (w :: GHC.Classes.Ord a) (w1 :: Language.Fixpoint.Types.Environments.SizedEnv a) -> case w1 of ww { Language.Fixpoint.Types.Environments.BE ww1 ww2 -> Language.Fixpoint.Types.Environments.$w$cmaximum @ a w ww2 }) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fFoldableSizedEnv_$cminimum :: GHC.Classes.Ord a => Language.Fixpoint.Types.Environments.SizedEnv a -> a {- Arity: 2, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (2, True, False) (\ @ a (w :: GHC.Classes.Ord a) (w1 :: Language.Fixpoint.Types.Environments.SizedEnv a) -> case w1 of ww { Language.Fixpoint.Types.Environments.BE ww1 ww2 -> Language.Fixpoint.Types.Environments.$w$cminimum @ a w ww2 }) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fFoldableSizedEnv_$cnull :: Language.Fixpoint.Types.Environments.SizedEnv a -> GHC.Types.Bool {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (1, True, False) (\ @ a (ds :: Language.Fixpoint.Types.Environments.SizedEnv a) -> case ds of wild { Language.Fixpoint.Types.Environments.BE dt a2 -> Data.HashMap.Base.$fFoldableHashMap_$cfoldr @ GHC.Types.Int @ a @ GHC.Types.Bool (Language.Fixpoint.Types.Environments.$fFoldableSizedEnv_f @ a) GHC.Types.True a2 }) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fFoldableSizedEnv_$cproduct :: GHC.Num.Num a => Language.Fixpoint.Types.Environments.SizedEnv a -> a {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$fFoldableSizedEnv1 `cast` (forall (a :: <*>_N). _R ->_R _R ->_R Data.Monoid.N:Product[0] _R) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fFoldableSizedEnv_$csum :: GHC.Num.Num a => Language.Fixpoint.Types.Environments.SizedEnv a -> a {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$fFoldableSizedEnv2 `cast` (forall (a :: <*>_N). _R ->_R _R ->_R Data.Monoid.N:Sum[0] _R) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fFoldableSizedEnv_$ctoList :: Language.Fixpoint.Types.Environments.SizedEnv a -> [a] {- Arity: 1, Strictness: , Inline: INLINE (sat-args=1), Unfolding: InlineRule (1, False, False) (\ @ a (t1 :: Language.Fixpoint.Types.Environments.SizedEnv a) -> GHC.Base.build @ a (\ @ b (c :: a -> b -> b)[OneShot] (n :: b)[OneShot] -> Language.Fixpoint.Types.Environments.$fFoldableSizedEnv_$cfoldr @ a @ b c n t1)) -} f9f63cb1406bb11d92f37c59529a53fb $fFoldableSizedEnv_f :: 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) -} ae9741409aa049333ef008f3802cfecf $fFunctorSEnv :: GHC.Base.Functor Language.Fixpoint.Types.Environments.SEnv DFunId {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Environments.SEnv Language.Fixpoint.Types.Environments.mapSEnv Language.Fixpoint.Types.Environments.$fFunctorSEnv_$c<$ -} ae9741409aa049333ef008f3802cfecf $fFunctorSEnv1 :: a -> Language.Fixpoint.Types.Environments.SEnv b -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a {- Arity: 2, Strictness: , Unfolding: InlineRule (2, True, False) (\ @ b @ a (eta :: a) (eta1 :: Language.Fixpoint.Types.Environments.SEnv b) -> Language.Fixpoint.Types.Environments.$fFunctorSEnv2 @ b @ a (\ (ds :: b) -> eta) eta1) -} ae9741409aa049333ef008f3802cfecf $fFunctorSEnv2 :: (a -> b) -> Language.Fixpoint.Types.Environments.SEnv a -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol b {- Arity: 2, Strictness: -} ae9741409aa049333ef008f3802cfecf $fFunctorSEnv_$c<$ :: a -> Language.Fixpoint.Types.Environments.SEnv b -> Language.Fixpoint.Types.Environments.SEnv a {- Arity: 2, Strictness: , Unfolding: InlineRule (0, True, True) (\ @ a @ b -> Language.Fixpoint.Types.Environments.$fFunctorSEnv1 @ b @ a) `cast` (forall (a :: <*>_N) (b :: <*>_N). _R ->_R _R ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fFunctorSizedEnv :: GHC.Base.Functor Language.Fixpoint.Types.Environments.SizedEnv DFunId {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Environments.SizedEnv Language.Fixpoint.Types.Environments.$fFunctorSizedEnv_$cfmap Language.Fixpoint.Types.Environments.$fFunctorSizedEnv_$c<$ -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fFunctorSizedEnv_$c<$ :: a -> Language.Fixpoint.Types.Environments.SizedEnv b -> Language.Fixpoint.Types.Environments.SizedEnv a {- Arity: 2, Strictness: m, Unfolding: InlineRule (2, True, False) (\ @ a @ b (eta :: a) (eta1 :: Language.Fixpoint.Types.Environments.SizedEnv b) -> Language.Fixpoint.Types.Environments.$fFunctorSizedEnv_$cfmap @ b @ a (\ (ds :: b) -> eta) eta1) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fFunctorSizedEnv_$cfmap :: (a -> b) -> Language.Fixpoint.Types.Environments.SizedEnv a -> Language.Fixpoint.Types.Environments.SizedEnv b {- Arity: 2, Strictness: m, Inline: INLINE[0], Unfolding: InlineRule (2, True, False) (\ @ a @ b (w :: a -> b) (w1 :: Language.Fixpoint.Types.Environments.SizedEnv a) -> case w1 of ww { Language.Fixpoint.Types.Environments.BE ww1 ww2 -> case Language.Fixpoint.Types.Environments.$w$cfmap @ a @ b w ww1 ww2 of ww3 { (#,#) ww4 ww5 -> Language.Fixpoint.Types.Environments.BE @ b ww4 ww5 } }) -} dae79859b3442c211473f5cded0c14f7 $fGenericIBindEnv :: GHC.Generics.Generic Language.Fixpoint.Types.Environments.IBindEnv DFunId {- HasNoCafRefs, Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Environments.IBindEnv Language.Fixpoint.Types.Environments.$fGenericIBindEnv_$cfrom Language.Fixpoint.Types.Environments.$fGenericIBindEnv_$cto -} dae79859b3442c211473f5cded0c14f7 $fGenericIBindEnv1 :: GHC.Generics.Rep Language.Fixpoint.Types.Environments.IBindEnv x -> GHC.Generics.Rep Language.Fixpoint.Types.Environments.IBindEnv x {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (1, True, True) (\ @ x (ds :: GHC.Generics.Rep Language.Fixpoint.Types.Environments.IBindEnv x) -> ds) -} dae79859b3442c211473f5cded0c14f7 $fGenericIBindEnv2 :: Language.Fixpoint.Types.Environments.IBindEnv -> Language.Fixpoint.Types.Environments.IBindEnv {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (1, True, True) (\ @ x (x1 :: Language.Fixpoint.Types.Environments.IBindEnv) -> x1) -} dae79859b3442c211473f5cded0c14f7 $fGenericIBindEnv_$cfrom :: Language.Fixpoint.Types.Environments.IBindEnv -> GHC.Generics.Rep Language.Fixpoint.Types.Environments.IBindEnv x {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$fGenericIBindEnv2 `cast` (forall (x :: _N). _R ->_R Trans (Language.Fixpoint.Types.Environments.N:IBindEnv[0]) (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)) (Trans (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "FB" 'GHC.Generics.PrefixI 'GHC.Types.False>_P _R)) (Trans (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaData "IBindEnv" "Language.Fixpoint.Types.Environments" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.True>_P _R)) (Sub (Sym (Language.Fixpoint.Types.Environments.Rep_IBindEnv[0]))))) _N))) -} dae79859b3442c211473f5cded0c14f7 $fGenericIBindEnv_$cto :: GHC.Generics.Rep Language.Fixpoint.Types.Environments.IBindEnv x -> Language.Fixpoint.Types.Environments.IBindEnv {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$fGenericIBindEnv1 `cast` (forall (x :: _N). _R ->_R Trans (Trans (Sub (Language.Fixpoint.Types.Environments.Rep_IBindEnv[0])) (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaData "IBindEnv" "Language.Fixpoint.Types.Environments" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.True>_P _R) (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "FB" '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 _R _P) (Sym (Language.Fixpoint.Types.Environments.N:IBindEnv[0])))) -} 999de3bcf4ed26dd71bfcb519acbd47a $fGenericPacks :: GHC.Generics.Generic Language.Fixpoint.Types.Environments.Packs DFunId {- HasNoCafRefs, Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Environments.Packs Language.Fixpoint.Types.Environments.$fBinaryPacks_$cfrom Language.Fixpoint.Types.Environments.$fGenericPacks_$cto -} 999de3bcf4ed26dd71bfcb519acbd47a $fGenericPacks1 :: GHC.Generics.Rep Language.Fixpoint.Types.Environments.Packs x -> GHC.Generics.Rep Language.Fixpoint.Types.Environments.Packs x {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (1, True, True) (\ @ x (ds :: GHC.Generics.Rep Language.Fixpoint.Types.Environments.Packs x) -> ds) -} 999de3bcf4ed26dd71bfcb519acbd47a $fGenericPacks_$cto :: GHC.Generics.Rep Language.Fixpoint.Types.Environments.Packs x -> Language.Fixpoint.Types.Environments.Packs {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$fGenericPacks1 `cast` (forall (x :: _N). _R ->_R Trans (Trans (Sub (Language.Fixpoint.Types.Environments.Rep_Packs[0])) (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaData "Packs" "Language.Fixpoint.Types.Environments" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.True>_P _R) (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "Packs" 'GHC.Generics.PrefixI 'GHC.Types.True>_P _R) (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel ('GHC.Base.Just "packm") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy>_P _R))) _N) (Trans (GHC.Generics.N:K1[0] _P _R _P) (Sym (Language.Fixpoint.Types.Environments.N:Packs[0])))) -} ae9741409aa049333ef008f3802cfecf $fGenericSEnv :: GHC.Generics.Generic (Language.Fixpoint.Types.Environments.SEnv a) DFunId {- HasNoCafRefs, Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun: @ a. @ (Language.Fixpoint.Types.Environments.SEnv a) (Language.Fixpoint.Types.Environments.$fGenericSEnv_$cfrom @ a) (Language.Fixpoint.Types.Environments.$fGenericSEnv_$cto @ a) -} ae9741409aa049333ef008f3802cfecf $fGenericSEnv1 :: GHC.Generics.Rep (Language.Fixpoint.Types.Environments.SEnv a) x -> GHC.Generics.Rep (Language.Fixpoint.Types.Environments.SEnv a) x {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (1, True, True) (\ @ a @ x (ds :: GHC.Generics.Rep (Language.Fixpoint.Types.Environments.SEnv a) x) -> ds) -} ae9741409aa049333ef008f3802cfecf $fGenericSEnv2 :: Language.Fixpoint.Types.Environments.SEnv a -> Language.Fixpoint.Types.Environments.SEnv a {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (1, True, True) (\ @ a @ x (x1 :: Language.Fixpoint.Types.Environments.SEnv a) -> x1) -} ae9741409aa049333ef008f3802cfecf $fGenericSEnv_$cfrom :: Language.Fixpoint.Types.Environments.SEnv a -> GHC.Generics.Rep (Language.Fixpoint.Types.Environments.SEnv a) x {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$fGenericSEnv2 `cast` (forall (a :: <*>_N) (x :: _N). _R ->_R Trans (Language.Fixpoint.Types.Environments.N:SEnv[0] _N) (Trans (Sym (GHC.Generics.N:K1[0] _P _R _P)) (Trans (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel ('GHC.Base.Just "seBinds") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy>_P _R)) (Trans (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "SE" 'GHC.Generics.PrefixI 'GHC.Types.True>_P _R)) (Trans (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaData "SEnv" "Language.Fixpoint.Types.Environments" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.True>_P _R)) (Sub (Sym (Language.Fixpoint.Types.Environments.Rep_SEnv[0] _N))))) _N))) -} ae9741409aa049333ef008f3802cfecf $fGenericSEnv_$cto :: GHC.Generics.Rep (Language.Fixpoint.Types.Environments.SEnv a) x -> Language.Fixpoint.Types.Environments.SEnv a {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$fGenericSEnv1 `cast` (forall (a :: <*>_N) (x :: _N). _R ->_R Trans (Trans (Sub (Language.Fixpoint.Types.Environments.Rep_SEnv[0] _N)) (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaData "SEnv" "Language.Fixpoint.Types.Environments" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.True>_P _R) (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "SE" 'GHC.Generics.PrefixI 'GHC.Types.True>_P _R) (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel ('GHC.Base.Just "seBinds") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy>_P _R))) _N) (Trans (GHC.Generics.N:K1[0] _P _R _P) (Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N))) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fGenericSizedEnv :: GHC.Generics.Generic (Language.Fixpoint.Types.Environments.SizedEnv a) DFunId {- HasNoCafRefs, Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun: @ a. @ (Language.Fixpoint.Types.Environments.SizedEnv a) (Language.Fixpoint.Types.Environments.$fGenericSizedEnv_$cfrom @ a) (Language.Fixpoint.Types.Environments.$fGenericSizedEnv_$cto @ a) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fGenericSizedEnv1 :: Language.Fixpoint.Types.Environments.SizedEnv a -> GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "BE" 'GHC.Generics.PrefixI 'GHC.Types.True) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel ('GHC.Base.Just "_beSize") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedUnpack) (GHC.Generics.K1 GHC.Generics.R GHC.Types.Int) GHC.Generics.:*: GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel ('GHC.Base.Just "beBinds") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict) (GHC.Generics.K1 GHC.Generics.R (Language.Fixpoint.Types.Environments.BindMap a))) x {- Arity: 1, HasNoCafRefs, Strictness: m, Unfolding: InlineRule (1, True, False) (\ @ a @ x (x1 :: Language.Fixpoint.Types.Environments.SizedEnv a) -> case x1 of wild { Language.Fixpoint.Types.Environments.BE dt g2 -> (GHC.Generics.:*: @ (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel ('GHC.Base.Just "_beSize") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedUnpack) (GHC.Generics.K1 GHC.Generics.R GHC.Types.Int)) @ (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel ('GHC.Base.Just "beBinds") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict) (GHC.Generics.K1 GHC.Generics.R (Language.Fixpoint.Types.Environments.BindMap a))) @ x (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.Just "_beSize") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedUnpack>_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 "beBinds") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict>_P _R) _N))) `cast` (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "BE" 'GHC.Generics.PrefixI 'GHC.Types.True>_P _R) _N) }) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fGenericSizedEnv_$cfrom :: Language.Fixpoint.Types.Environments.SizedEnv a -> GHC.Generics.Rep (Language.Fixpoint.Types.Environments.SizedEnv a) x {- Arity: 1, HasNoCafRefs, Strictness: m, Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$fGenericSizedEnv1 `cast` (forall (a :: <*>_N) (x :: _N). _R ->_R Trans (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaData "SizedEnv" "Language.Fixpoint.Types.Environments" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.False>_P _R)) (Sub (Sym (Language.Fixpoint.Types.Environments.Rep_SizedEnv[0] _N))) _N) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fGenericSizedEnv_$cto :: GHC.Generics.Rep (Language.Fixpoint.Types.Environments.SizedEnv a) x -> Language.Fixpoint.Types.Environments.SizedEnv a {- Arity: 1, HasNoCafRefs, Strictness: m, Unfolding: InlineRule (1, True, False) (\ @ a @ x (ds :: GHC.Generics.Rep (Language.Fixpoint.Types.Environments.SizedEnv a) x) -> case ds `cast` (Trans (Sub (Language.Fixpoint.Types.Environments.Rep_SizedEnv[0] _N)) (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaData "SizedEnv" "Language.Fixpoint.Types.Environments" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.False>_P _R) (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "BE" 'GHC.Generics.PrefixI 'GHC.Types.True>_P _R)) _N) of wild { GHC.Generics.:*: ds1 ds2 -> Language.Fixpoint.Types.Environments.$WBE @ a ds1 `cast` (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel ('GHC.Base.Just "_beSize") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedUnpack>_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 "beBinds") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict>_P _R _N) (GHC.Generics.N:K1[0] _P _R _P)) }) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fGenericSolEnv :: GHC.Generics.Generic Language.Fixpoint.Types.Environments.SolEnv DFunId {- HasNoCafRefs, Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Environments.SolEnv Language.Fixpoint.Types.Environments.$fGenericSolEnv_$cfrom Language.Fixpoint.Types.Environments.$fGenericSolEnv_$cto -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fGenericSolEnv1 :: Language.Fixpoint.Types.Environments.SolEnv -> GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "SolEnv" 'GHC.Generics.PrefixI 'GHC.Types.True) (GHC.Generics.M1 GHC.Generics.S ('GHC.Generics.MetaSel ('GHC.Base.Just "soeBinds") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict) (GHC.Generics.K1 GHC.Generics.R Language.Fixpoint.Types.Environments.BindEnv)) x {- Arity: 1, HasNoCafRefs, Strictness: m, Unfolding: InlineRule (1, True, False) (\ @ x (x1 :: Language.Fixpoint.Types.Environments.SolEnv) -> case x1 of wild { Language.Fixpoint.Types.Environments.SolEnv g1 -> 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.Just "soeBinds") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict>_P _R)) (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "SolEnv" 'GHC.Generics.PrefixI 'GHC.Types.True>_P _R)) _N)) }) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fGenericSolEnv_$cfrom :: Language.Fixpoint.Types.Environments.SolEnv -> GHC.Generics.Rep Language.Fixpoint.Types.Environments.SolEnv x {- Arity: 1, HasNoCafRefs, Strictness: m, Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$fGenericSolEnv1 `cast` (forall (x :: _N). _R ->_R Trans (Sym (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaData "SolEnv" "Language.Fixpoint.Types.Environments" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.False>_P _R)) (Sub (Sym (Language.Fixpoint.Types.Environments.Rep_SolEnv[0]))) _N) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fGenericSolEnv_$cto :: GHC.Generics.Rep Language.Fixpoint.Types.Environments.SolEnv x -> Language.Fixpoint.Types.Environments.SolEnv {- Arity: 1, HasNoCafRefs, Strictness: m, Unfolding: InlineRule (1, True, True) (\ @ x (ds :: GHC.Generics.Rep Language.Fixpoint.Types.Environments.SolEnv x) -> Language.Fixpoint.Types.Environments.$WSolEnv ds `cast` (Trans (Trans (Sub (Language.Fixpoint.Types.Environments.Rep_SolEnv[0])) (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaData "SolEnv" "Language.Fixpoint.Types.Environments" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.False>_P _R) (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "SolEnv" 'GHC.Generics.PrefixI 'GHC.Types.True>_P _R) (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel ('GHC.Base.Just "soeBinds") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict>_P _R))) _N) (GHC.Generics.N:K1[0] _P _R _P))) -} dae79859b3442c211473f5cded0c14f7 $fMonoidIBindEnv :: GHC.Base.Monoid Language.Fixpoint.Types.Environments.IBindEnv DFunId {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Environments.IBindEnv Language.Fixpoint.Types.Environments.emptyIBindEnv Language.Fixpoint.Types.Environments.$fMonoidIBindEnv_$cmappend Language.Fixpoint.Types.Environments.$fMonoidIBindEnv_$cmconcat -} dae79859b3442c211473f5cded0c14f7 $fMonoidIBindEnv_$cmappend :: Language.Fixpoint.Types.Environments.IBindEnv -> Language.Fixpoint.Types.Environments.IBindEnv -> Language.Fixpoint.Types.Environments.IBindEnv {- Arity: 2, Unfolding: InlineRule (0, True, True) (Language.Fixpoint.Types.Environments.$fMonoidIBindEnv_$s$wunion @ ()) `cast` (Trans (Sym (Data.HashSet.N:HashSet[0] _N)) (Sym (Language.Fixpoint.Types.Environments.N:IBindEnv[0])) ->_R Trans (Sym (Data.HashSet.N:HashSet[0] _N)) (Sym (Language.Fixpoint.Types.Environments.N:IBindEnv[0])) ->_R Trans (Sym (Data.HashSet.N:HashSet[0] _N)) (Sym (Language.Fixpoint.Types.Environments.N:IBindEnv[0]))) -} dae79859b3442c211473f5cded0c14f7 $fMonoidIBindEnv_$cmconcat :: [Language.Fixpoint.Types.Environments.IBindEnv] -> Language.Fixpoint.Types.Environments.IBindEnv {- Arity: 1, Strictness: , Unfolding: (\ (eta :: [Language.Fixpoint.Types.Environments.IBindEnv]) -> Language.Fixpoint.Types.Environments.$fMonoidIBindEnv_go eta) -} 14b71c19bb6f273e98868aeef3724d76 $fMonoidIBindEnv_$s$wunion :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId v -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId v -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId v {- Arity: 2, Inline: [0], Unfolding: (\ @ v (w :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId v) (w1 :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId v) -> Language.Fixpoint.Types.Environments.$wpoly_go1 @ v 0# w w1) -} dae79859b3442c211473f5cded0c14f7 $fMonoidIBindEnv_go :: [Language.Fixpoint.Types.Environments.IBindEnv] -> Language.Fixpoint.Types.Environments.IBindEnv {- Arity: 1, Strictness: -} 999de3bcf4ed26dd71bfcb519acbd47a $fMonoidPacks :: GHC.Base.Monoid Language.Fixpoint.Types.Environments.Packs DFunId {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Environments.Packs Language.Fixpoint.Types.Environments.$fMonoidPacks_$cmempty Language.Fixpoint.Types.Environments.$fMonoidPacks_$cmappend Language.Fixpoint.Types.Environments.$fMonoidPacks_$cmconcat -} 999de3bcf4ed26dd71bfcb519acbd47a $fMonoidPacks_$cmappend :: Language.Fixpoint.Types.Environments.Packs -> Language.Fixpoint.Types.Environments.Packs -> Language.Fixpoint.Types.Environments.Packs {- Arity: 2, Unfolding: InlineRule (0, True, True) (Language.Fixpoint.Types.Environments.$fMonoidPacks_$s$wunion @ GHC.Types.Int) `cast` (Sym (Language.Fixpoint.Types.Environments.N:Packs[0]) ->_R Sym (Language.Fixpoint.Types.Environments.N:Packs[0]) ->_R Sym (Language.Fixpoint.Types.Environments.N:Packs[0])) -} 999de3bcf4ed26dd71bfcb519acbd47a $fMonoidPacks_$cmconcat :: [Language.Fixpoint.Types.Environments.Packs] -> Language.Fixpoint.Types.Environments.Packs {- Arity: 1, Strictness: , Unfolding: (\ (eta :: [Language.Fixpoint.Types.Environments.Packs]) -> Language.Fixpoint.Types.Environments.$fMonoidPacks_go eta) -} 999de3bcf4ed26dd71bfcb519acbd47a $fMonoidPacks_$cmempty :: Language.Fixpoint.Types.Environments.Packs {- HasNoCafRefs, Unfolding: InlineRule (0, True, True) (Data.HashMap.Base.Empty @ Language.Fixpoint.Types.Refinements.KVar @ GHC.Types.Int) `cast` (Sym (Language.Fixpoint.Types.Environments.N:Packs[0])) -} d409ebb906a0e190c89ff5dec83a0eef $fMonoidPacks_$s$wunion :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar v -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar v -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar v {- Arity: 2, Inline: [0], Unfolding: (\ @ v (w :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar v) (w1 :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar v) -> Language.Fixpoint.Types.Environments.$wpoly_go2 @ v 0# w w1) -} 999de3bcf4ed26dd71bfcb519acbd47a $fMonoidPacks_go :: [Language.Fixpoint.Types.Environments.Packs] -> Language.Fixpoint.Types.Environments.Packs {- Arity: 1, Strictness: -} ae9741409aa049333ef008f3802cfecf $fMonoidSEnv :: GHC.Base.Monoid (Language.Fixpoint.Types.Environments.SEnv a) DFunId {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun: @ a. @ (Language.Fixpoint.Types.Environments.SEnv a) (Data.HashMap.Base.empty @ Language.Fixpoint.Types.Names.Symbol @ a) `cast` (Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N) (Language.Fixpoint.Types.Environments.$fMonoidSEnv_$cmappend @ a) (Language.Fixpoint.Types.Environments.$fMonoidSEnv_$cmconcat @ a) -} ae9741409aa049333ef008f3802cfecf $fMonoidSEnv1 :: [Language.Fixpoint.Types.Environments.SEnv a] -> Language.Fixpoint.Types.Environments.SEnv a {- Arity: 1, Strictness: -} ae9741409aa049333ef008f3802cfecf $fMonoidSEnv_$cmappend :: Language.Fixpoint.Types.Environments.SEnv a -> Language.Fixpoint.Types.Environments.SEnv a -> Language.Fixpoint.Types.Environments.SEnv a {- Arity: 2, Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$fMonoidSEnv_$s$wunion `cast` (forall (a :: <*>_N). Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N) -} ae9741409aa049333ef008f3802cfecf $fMonoidSEnv_$cmconcat :: [Language.Fixpoint.Types.Environments.SEnv a] -> Language.Fixpoint.Types.Environments.SEnv a {- Arity: 1, Strictness: , Unfolding: (\ @ a (eta :: [Language.Fixpoint.Types.Environments.SEnv a]) -> Language.Fixpoint.Types.Environments.$fMonoidSEnv1 @ a eta) -} 5c12660296c8ea6f28f457637a125725 $fMonoidSEnv_$s$wunion :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol v -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol v -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol v {- Arity: 2, Inline: [0], Unfolding: (\ @ v (w :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol v) (w1 :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol v) -> Language.Fixpoint.Types.Environments.$wpoly_go3 @ v 0# w w1) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fMonoidSizedEnv :: GHC.Base.Monoid Language.Fixpoint.Types.Environments.BindEnv DFunId {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Environments.BindEnv Language.Fixpoint.Types.Environments.$fMonoidSizedEnv_$cmempty Language.Fixpoint.Types.Environments.$fMonoidSizedEnv_$cmappend Language.Fixpoint.Types.Environments.$fMonoidSizedEnv_$cmconcat -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fMonoidSizedEnv1 :: Language.Fixpoint.Types.Environments.BindEnv {- Strictness: x -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fMonoidSizedEnv_$cmappend :: Language.Fixpoint.Types.Environments.BindEnv -> Language.Fixpoint.Types.Environments.BindEnv -> Language.Fixpoint.Types.Environments.BindEnv {- Arity: 2, Strictness: m, Unfolding: InlineRule (2, True, False) (\ (ds :: Language.Fixpoint.Types.Environments.SizedEnv (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) (b :: Language.Fixpoint.Types.Environments.BindEnv) -> case ds of wild { Language.Fixpoint.Types.Environments.BE dt ds1 -> case dt of ds2 { DEFAULT -> case b of wild1 { Language.Fixpoint.Types.Environments.BE dt1 ds3 -> case dt1 of ds4 { DEFAULT -> Language.Fixpoint.Types.Environments.$fMonoidSizedEnv1 0# -> wild } } 0# -> b } }) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fMonoidSizedEnv_$cmconcat :: [Language.Fixpoint.Types.Environments.BindEnv] -> Language.Fixpoint.Types.Environments.BindEnv {- Arity: 1, Strictness: m, Inline: INLINE[0], Unfolding: InlineRule (1, True, False) (\ (w :: [Language.Fixpoint.Types.Environments.BindEnv]) -> case Language.Fixpoint.Types.Environments.$wgo w of ww { (#,#) ww1 ww2 -> Language.Fixpoint.Types.Environments.BE @ (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) ww1 ww2 }) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fMonoidSizedEnv_$cmempty :: Language.Fixpoint.Types.Environments.BindEnv {- Strictness: m, Unfolding: (Language.Fixpoint.Types.Environments.emptyBindEnv) -} dae79859b3442c211473f5cded0c14f7 $fNFDataIBindEnv :: Control.DeepSeq.NFData Language.Fixpoint.Types.Environments.IBindEnv DFunId {- Arity: 1, HasNoCafRefs, Strictness: , Inline: INLINE (sat-args=0), Unfolding: InlineRule (0, False, True) Language.Fixpoint.Types.Environments.$fNFDataIBindEnv_$s$dmrnf `cast` (Sym (Control.DeepSeq.N:NFData[0] _N)) -} b0eccf13cdd1d6aea5632a9a10f5133f $fNFDataIBindEnv1 :: Control.DeepSeq.GNFData (GHC.Generics.D1 ('GHC.Generics.MetaData "IBindEnv" "Language.Fixpoint.Types.Environments" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.True) (GHC.Generics.C1 ('GHC.Generics.MetaCons "FB" '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 (Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId))))) {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$fNFDataIBindEnv2 `cast` (Sym (Control.DeepSeq.N:GNFData[0] _N _N)) -} 31f76863e31c4835d0b9d50cc5b737e8 $fNFDataIBindEnv2 :: GHC.Generics.M1 GHC.Generics.D ('GHC.Generics.MetaData "IBindEnv" "Language.Fixpoint.Types.Environments" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.True) (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "FB" '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 (Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId)))) a1 -> () {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (1, True, False) (\ @ a1 (x :: GHC.Generics.M1 GHC.Generics.D ('GHC.Generics.MetaData "IBindEnv" "Language.Fixpoint.Types.Environments" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.True) (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "FB" '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 (Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId)))) a1) -> Data.HashMap.Base.$fNFDataHashMap_$crnf @ GHC.Types.Int @ () Control.DeepSeq.$fNFDataInt_$crnf `cast` (Sym (Control.DeepSeq.N:NFData[0] _N)) Control.DeepSeq.$fNFData()_$crnf `cast` (Sym (Control.DeepSeq.N:NFData[0] <()>_N)) x `cast` (Trans (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaData "IBindEnv" "Language.Fixpoint.Types.Environments" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.True>_P _R) (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "FB" '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 _R _P) (Data.HashSet.N:HashSet[0] _N)))) -} dae79859b3442c211473f5cded0c14f7 $fNFDataIBindEnv_$s$dmrnf :: Language.Fixpoint.Types.Environments.IBindEnv -> () {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (-3, True, False) (\ (eta :: Language.Fixpoint.Types.Environments.IBindEnv) -> Language.Fixpoint.Types.Environments.$fNFDataIBindEnv1 `cast` (Control.DeepSeq.N:GNFData[0] _N (Sym (Language.Fixpoint.Types.Environments.Rep_IBindEnv[0]))) @ GHC.Prim.Any (Language.Fixpoint.Types.Environments.$fGenericIBindEnv_$cfrom @ GHC.Prim.Any eta)) -} 999de3bcf4ed26dd71bfcb519acbd47a $fNFDataPacks :: Control.DeepSeq.NFData Language.Fixpoint.Types.Environments.Packs DFunId {- Arity: 1, HasNoCafRefs, Strictness: , Inline: INLINE (sat-args=0), Unfolding: InlineRule (0, False, True) Language.Fixpoint.Types.Environments.$fNFDataPacks_$s$dmrnf `cast` (Sym (Control.DeepSeq.N:NFData[0] _N)) -} 7ef38370df6fcbaeb92f65a76fa48cc2 $fNFDataPacks1 :: Control.DeepSeq.GNFData (GHC.Generics.D1 ('GHC.Generics.MetaData "Packs" "Language.Fixpoint.Types.Environments" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.True) (GHC.Generics.C1 ('GHC.Generics.MetaCons "Packs" 'GHC.Generics.PrefixI 'GHC.Types.True) (GHC.Generics.S1 ('GHC.Generics.MetaSel ('GHC.Base.Just "packm") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar GHC.Types.Int))))) {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$fNFDataPacks2 `cast` (Sym (Control.DeepSeq.N:GNFData[0] _N _N)) -} be1e9f14c7a8f8ff2dafd6b15d10e6c3 $fNFDataPacks2 :: GHC.Generics.M1 GHC.Generics.D ('GHC.Generics.MetaData "Packs" "Language.Fixpoint.Types.Environments" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.True) (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Packs" 'GHC.Generics.PrefixI 'GHC.Types.True) (GHC.Generics.S1 ('GHC.Generics.MetaSel ('GHC.Base.Just "packm") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar GHC.Types.Int)))) a1 -> () {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (1, True, False) (\ @ a1 (x :: GHC.Generics.M1 GHC.Generics.D ('GHC.Generics.MetaData "Packs" "Language.Fixpoint.Types.Environments" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.True) (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "Packs" 'GHC.Generics.PrefixI 'GHC.Types.True) (GHC.Generics.S1 ('GHC.Generics.MetaSel ('GHC.Base.Just "packm") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar GHC.Types.Int)))) a1) -> Data.HashMap.Base.$fNFDataHashMap_$crnf @ Language.Fixpoint.Types.Refinements.KVar @ GHC.Types.Int Language.Fixpoint.Types.Refinements.$fNFDataKVar_$crnf `cast` (Sym (Control.DeepSeq.N:NFData[0] _N)) Control.DeepSeq.$fNFDataInt_$crnf `cast` (Sym (Control.DeepSeq.N:NFData[0] _N)) x `cast` (Trans (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaData "Packs" "Language.Fixpoint.Types.Environments" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.True>_P _R) (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "Packs" 'GHC.Generics.PrefixI 'GHC.Types.True>_P _R) (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel ('GHC.Base.Just "packm") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy>_P _R)) _N) (GHC.Generics.N:K1[0] _P _R _P))) -} 999de3bcf4ed26dd71bfcb519acbd47a $fNFDataPacks_$s$dmrnf :: Language.Fixpoint.Types.Environments.Packs -> () {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (-3, True, False) (\ (eta :: Language.Fixpoint.Types.Environments.Packs) -> Language.Fixpoint.Types.Environments.$fNFDataPacks1 `cast` (Control.DeepSeq.N:GNFData[0] _N (Sym (Language.Fixpoint.Types.Environments.Rep_Packs[0]))) @ GHC.Prim.Any (Language.Fixpoint.Types.Environments.$fBinaryPacks_$cfrom @ GHC.Prim.Any eta)) -} ae9741409aa049333ef008f3802cfecf $fNFDataSEnv :: Control.DeepSeq.NFData a => Control.DeepSeq.NFData (Language.Fixpoint.Types.Environments.SEnv a) DFunId {- Arity: 2, HasNoCafRefs, Strictness: , Inline: INLINE (sat-args=0), Unfolding: InlineRule (1, False, True) Language.Fixpoint.Types.Environments.$fNFDataSEnv_$crnf `cast` (forall (a :: <*>_N). _R ->_R Sym (Control.DeepSeq.N:NFData[0] _N)) -} ae9741409aa049333ef008f3802cfecf $fNFDataSEnv_$crnf :: Control.DeepSeq.NFData a => Language.Fixpoint.Types.Environments.SEnv a -> () {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: InlineRule (2, True, False) (\ @ a ($dNFData :: Control.DeepSeq.NFData a) (eta :: Language.Fixpoint.Types.Environments.SEnv a) -> Data.HashMap.Base.$fNFDataHashMap_$crnf @ Language.Fixpoint.Types.Names.Symbol @ a Language.Fixpoint.Types.Names.$fNFDataSymbol_$crnf `cast` (Sym (Control.DeepSeq.N:NFData[0] _N)) $dNFData eta `cast` (Language.Fixpoint.Types.Environments.N:SEnv[0] _N)) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fNFDataSizedEnv :: Control.DeepSeq.NFData Language.Fixpoint.Types.Environments.BindEnv DFunId {- Arity: 1, HasNoCafRefs, Strictness: , Inline: INLINE (sat-args=0), Unfolding: InlineRule (0, False, True) Language.Fixpoint.Types.Environments.$fNFDataSizedEnv_$s$dmrnf `cast` (Sym (Control.DeepSeq.N:NFData[0] _N)) -} 3a92364ca6423361e69997fe6c303fae $fNFDataSizedEnv1 :: Control.DeepSeq.GNFData (GHC.Generics.D1 ('GHC.Generics.MetaData "SizedEnv" "Language.Fixpoint.Types.Environments" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.False) (GHC.Generics.C1 ('GHC.Generics.MetaCons "BE" 'GHC.Generics.PrefixI 'GHC.Types.True) (GHC.Generics.S1 ('GHC.Generics.MetaSel ('GHC.Base.Just "_beSize") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedUnpack) (GHC.Generics.Rec0 GHC.Types.Int) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel ('GHC.Base.Just "beBinds") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict) (GHC.Generics.Rec0 (Language.Fixpoint.Types.Environments.BindMap (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)))))) {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$fNFDataSizedEnv2 `cast` (Sym (Control.DeepSeq.N:GNFData[0] _N _N)) -} cd4a4c08c808c524cf280980cd32e23e $fNFDataSizedEnv2 :: GHC.Generics.M1 GHC.Generics.D ('GHC.Generics.MetaData "SizedEnv" "Language.Fixpoint.Types.Environments" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "BE" 'GHC.Generics.PrefixI 'GHC.Types.True) (GHC.Generics.S1 ('GHC.Generics.MetaSel ('GHC.Base.Just "_beSize") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedUnpack) (GHC.Generics.Rec0 GHC.Types.Int) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel ('GHC.Base.Just "beBinds") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict) (GHC.Generics.Rec0 (Language.Fixpoint.Types.Environments.BindMap (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft))))) a1 -> () {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (1, True, False) (\ @ a1 (x :: GHC.Generics.M1 GHC.Generics.D ('GHC.Generics.MetaData "SizedEnv" "Language.Fixpoint.Types.Environments" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.False) (GHC.Generics.M1 GHC.Generics.C ('GHC.Generics.MetaCons "BE" 'GHC.Generics.PrefixI 'GHC.Types.True) (GHC.Generics.S1 ('GHC.Generics.MetaSel ('GHC.Base.Just "_beSize") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedUnpack) (GHC.Generics.Rec0 GHC.Types.Int) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel ('GHC.Base.Just "beBinds") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict) (GHC.Generics.Rec0 (Language.Fixpoint.Types.Environments.BindMap (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft))))) a1) -> case x `cast` (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaData "SizedEnv" "Language.Fixpoint.Types.Environments" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.False>_P _R) (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaCons "BE" 'GHC.Generics.PrefixI 'GHC.Types.True>_P _R) _N) of wild { GHC.Generics.:*: x1 y -> case x1 of tpl { DEFAULT -> Data.HashMap.Base.$fNFDataHashMap_$crnf @ GHC.Types.Int @ (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) Control.DeepSeq.$fNFDataInt_$crnf `cast` (Sym (Control.DeepSeq.N:NFData[0] _N)) Language.Fixpoint.Types.Environments.$fNFDataSizedEnv3 `cast` (Sym (Control.DeepSeq.N:NFData[0] <(Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)>_N)) y `cast` (Trans (GHC.Generics.N:M1[0] _P <'GHC.Generics.MetaSel ('GHC.Base.Just "beBinds") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict>_P _R _N) (GHC.Generics.N:K1[0] _P _R _P)) } }) -} 509680db21fce297473fe6a679654d5d $fNFDataSizedEnv3 :: (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) -> () {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (1, True, False) (\ (ds :: (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) -> case ds of wild { (,) x y -> case x of wild1 { Language.Fixpoint.Types.Names.S dt ds1 ds2 -> Language.Fixpoint.Types.Refinements.$fNFDataSortedReft_$crnf y } }) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fNFDataSizedEnv_$s$dmrnf :: Language.Fixpoint.Types.Environments.BindEnv -> () {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (-3, True, False) (\ (eta :: Language.Fixpoint.Types.Environments.BindEnv) -> Language.Fixpoint.Types.Environments.$fNFDataSizedEnv1 `cast` (Control.DeepSeq.N:GNFData[0] _N (Sym (Language.Fixpoint.Types.Environments.Rep_SizedEnv[0] <(Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)>_N))) @ GHC.Prim.Any (Language.Fixpoint.Types.Environments.$fGenericSizedEnv_$cfrom @ (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) @ GHC.Prim.Any eta)) -} dae79859b3442c211473f5cded0c14f7 $fPPrintIBindEnv :: Language.Fixpoint.Types.PrettyPrint.PPrint Language.Fixpoint.Types.Environments.IBindEnv DFunId {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Environments.IBindEnv Language.Fixpoint.Types.Environments.$fPPrintIBindEnv_$cpprintTidy Language.Fixpoint.Types.Environments.$fPPrintIBindEnv_$cpprintPrec -} dae79859b3442c211473f5cded0c14f7 $fPPrintIBindEnv1 :: Language.Fixpoint.Types.Environments.IBindEnv -> Text.PrettyPrint.HughesPJ.Doc {- Arity: 1, Strictness: , Unfolding: InlineRule (1, True, False) (\ (x :: Language.Fixpoint.Types.Environments.IBindEnv) -> Language.Fixpoint.Types.Environments.$fPPrintIBindEnv_$spprint (Data.OldList.sortBy @ Language.Fixpoint.Types.Environments.BindId GHC.Classes.compareInt (Data.HashSet.toList @ Language.Fixpoint.Types.Environments.BindId x `cast` (Language.Fixpoint.Types.Environments.N:IBindEnv[0])))) -} 4c1d9893b3489e288d96a2df7cdbc155 $fPPrintIBindEnv2 :: GHC.Types.Int -> Language.Fixpoint.Types.PrettyPrint.Tidy -> [GHC.Types.Int] -> Text.PrettyPrint.HughesPJ.Doc {- Arity: 2, Strictness: , Unfolding: InlineRule (2, True, True) (\ (ds :: GHC.Types.Int) (eta :: Language.Fixpoint.Types.PrettyPrint.Tidy) -> Language.Fixpoint.Types.PrettyPrint.$fPPrintHashSet_$cpprintTidy1 @ GHC.Types.Int Language.Fixpoint.Types.PrettyPrint.$fPPrintInt eta) -} dae79859b3442c211473f5cded0c14f7 $fPPrintIBindEnv_$cpprintPrec :: GHC.Types.Int -> Language.Fixpoint.Types.PrettyPrint.Tidy -> Language.Fixpoint.Types.Environments.IBindEnv -> Text.PrettyPrint.HughesPJ.Doc {- Arity: 3, Strictness: , Unfolding: InlineRule (1, True, True) (\ (ds :: GHC.Types.Int) (eta :: Language.Fixpoint.Types.PrettyPrint.Tidy) -> Language.Fixpoint.Types.Environments.$fPPrintIBindEnv_$cpprintTidy eta) -} dae79859b3442c211473f5cded0c14f7 $fPPrintIBindEnv_$cpprintTidy :: Language.Fixpoint.Types.PrettyPrint.Tidy -> Language.Fixpoint.Types.Environments.IBindEnv -> Text.PrettyPrint.HughesPJ.Doc {- Arity: 2, Strictness: , Unfolding: InlineRule (1, True, True) (\ (ds :: Language.Fixpoint.Types.PrettyPrint.Tidy) (eta :: Language.Fixpoint.Types.Environments.IBindEnv) -> Language.Fixpoint.Types.Environments.$fPPrintIBindEnv1 eta) -} 03e3f267a980cab29a767259f6ff26ec $fPPrintIBindEnv_$spprint :: [Language.Fixpoint.Types.Environments.BindId] -> Text.PrettyPrint.HughesPJ.Doc {- Unfolding: InlineRule (0, True, False) (Language.Fixpoint.Types.Environments.$fPPrintIBindEnv2 Language.Fixpoint.Types.PrettyPrint.pprint1 Language.Fixpoint.Types.PrettyPrint.Full) -} 999de3bcf4ed26dd71bfcb519acbd47a $fPPrintPacks :: Language.Fixpoint.Types.PrettyPrint.PPrint Language.Fixpoint.Types.Environments.Packs DFunId {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Environments.Packs Language.Fixpoint.Types.Environments.$fPPrintPacks_$cpprintTidy Language.Fixpoint.Types.Environments.$fPPrintPacks_$cpprintPrec -} 999de3bcf4ed26dd71bfcb519acbd47a $fPPrintPacks_$cpprintPrec :: GHC.Types.Int -> Language.Fixpoint.Types.PrettyPrint.Tidy -> Language.Fixpoint.Types.Environments.Packs -> Text.PrettyPrint.HughesPJ.Doc {- Arity: 3, Strictness: , Unfolding: InlineRule (1, True, True) (\ (ds :: GHC.Types.Int) (eta :: Language.Fixpoint.Types.PrettyPrint.Tidy) -> Language.Fixpoint.Types.Environments.$fPPrintPacks_$cpprintTidy eta) -} 999de3bcf4ed26dd71bfcb519acbd47a $fPPrintPacks_$cpprintTidy :: Language.Fixpoint.Types.PrettyPrint.Tidy -> Language.Fixpoint.Types.Environments.Packs -> Text.PrettyPrint.HughesPJ.Doc {- Arity: 2, Strictness: , Unfolding: InlineRule (1, True, True) (\ (ds :: Language.Fixpoint.Types.PrettyPrint.Tidy) (eta :: Language.Fixpoint.Types.Environments.Packs) -> Language.Fixpoint.Types.Environments.$fFixpointPacks_$ctoFix eta) -} ae9741409aa049333ef008f3802cfecf $fPPrintSEnv :: Language.Fixpoint.Types.PrettyPrint.PPrint a => Language.Fixpoint.Types.PrettyPrint.PPrint (Language.Fixpoint.Types.Environments.SEnv a) DFunId {- Arity: 1, Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun: @ a ($dPPrint :: Language.Fixpoint.Types.PrettyPrint.PPrint a). @ (Language.Fixpoint.Types.Environments.SEnv a) (Language.Fixpoint.Types.Environments.$fPPrintSEnv_$cpprintTidy @ a $dPPrint) (Language.Fixpoint.Types.Environments.$fPPrintSEnv_$cpprintPrec @ a $dPPrint) -} 9d1ab27625772032d4422343b77c5328 $fPPrintSEnv1 :: (Language.Fixpoint.Types.Names.Symbol, a) -> (Language.Fixpoint.Types.Names.Symbol, a) -> GHC.Types.Ordering {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: InlineRule (2, True, False) (\ @ a (x :: (Language.Fixpoint.Types.Names.Symbol, a)) (y :: (Language.Fixpoint.Types.Names.Symbol, a)) -> case x of wild { (,) x1 ds1 -> case x1 of wild1 { Language.Fixpoint.Types.Names.S dt ds2 ds3 -> case y of wild2 { (,) x2 ds4 -> case x2 of wild3 { Language.Fixpoint.Types.Names.S dt1 ds5 ds6 -> GHC.Classes.compareInt# dt dt1 } } } }) -} ae9741409aa049333ef008f3802cfecf $fPPrintSEnv_$cpprintPrec :: Language.Fixpoint.Types.PrettyPrint.PPrint a => GHC.Types.Int -> Language.Fixpoint.Types.PrettyPrint.Tidy -> Language.Fixpoint.Types.Environments.SEnv a -> Text.PrettyPrint.HughesPJ.Doc {- Arity: 4, Strictness: , Unfolding: InlineRule (4, True, True) (\ @ a ($dPPrint :: Language.Fixpoint.Types.PrettyPrint.PPrint a) (ds :: GHC.Types.Int) (eta :: Language.Fixpoint.Types.PrettyPrint.Tidy) (eta1 :: Language.Fixpoint.Types.Environments.SEnv a) -> Language.Fixpoint.Types.Environments.$fPPrintSEnv_$cpprintTidy @ a $dPPrint eta eta1) -} ae9741409aa049333ef008f3802cfecf $fPPrintSEnv_$cpprintTidy :: Language.Fixpoint.Types.PrettyPrint.PPrint a => Language.Fixpoint.Types.PrettyPrint.Tidy -> Language.Fixpoint.Types.Environments.SEnv a -> Text.PrettyPrint.HughesPJ.Doc {- Arity: 3, Strictness: , Unfolding: InlineRule (3, True, False) (\ @ a ($dPPrint :: Language.Fixpoint.Types.PrettyPrint.PPrint a) (k :: Language.Fixpoint.Types.PrettyPrint.Tidy) (eta :: Language.Fixpoint.Types.Environments.SEnv a) -> Language.Fixpoint.Types.PrettyPrint.pprintKVs @ Language.Fixpoint.Types.Names.Symbol @ a Language.Fixpoint.Types.Names.$fPPrintSymbol $dPPrint k (Data.OldList.sortBy @ (Language.Fixpoint.Types.Names.Symbol, a) (Language.Fixpoint.Types.Environments.$fPPrintSEnv1 @ a) (Data.HashMap.Base.toList @ Language.Fixpoint.Types.Names.Symbol @ a eta `cast` (Language.Fixpoint.Types.Environments.N:SEnv[0] _N)))) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fPPrintSizedEnv :: Language.Fixpoint.Types.PrettyPrint.PPrint a => Language.Fixpoint.Types.PrettyPrint.PPrint (Language.Fixpoint.Types.Environments.SizedEnv a) DFunId {- Arity: 1, Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun: @ a ($dPPrint :: Language.Fixpoint.Types.PrettyPrint.PPrint a). @ (Language.Fixpoint.Types.Environments.SizedEnv a) (Language.Fixpoint.Types.Environments.$fPPrintSizedEnv_$cpprintTidy @ a $dPPrint) (Language.Fixpoint.Types.Environments.$fPPrintSizedEnv_$cpprintPrec @ a $dPPrint) -} 3176d21d678c55f463fd77d2ef42e799 $fPPrintSizedEnv1 :: Data.HashMap.Array.Array (Data.HashMap.Base.Leaf GHC.Types.Int a) -> GHC.Prim.Int# -> GHC.Prim.Int# -> [(GHC.Types.Int, a)] -> [(GHC.Types.Int, a)] {- Arity: 4, HasNoCafRefs, Strictness: , Inline: [0] -} 46ad4d4cfab84db4f02a0eabc994ea60 $fPPrintSizedEnv2 :: Data.HashMap.Array.Array (Data.HashMap.Base.HashMap GHC.Types.Int a) -> GHC.Prim.Int# -> GHC.Prim.Int# -> [(GHC.Types.Int, a)] -> [(GHC.Types.Int, a)] {- Arity: 4, HasNoCafRefs, Strictness: , Inline: [0] -} 5bbe17935316a07d57962fc960f80761 $fPPrintSizedEnv3 :: Data.HashMap.Array.Array (Data.HashMap.Base.HashMap GHC.Types.Int a) -> GHC.Prim.Int# -> GHC.Prim.Int# -> [(GHC.Types.Int, a)] -> [(GHC.Types.Int, a)] {- Arity: 4, HasNoCafRefs, Strictness: , Inline: [0] -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fPPrintSizedEnv_$cpprintPrec :: Language.Fixpoint.Types.PrettyPrint.PPrint a => GHC.Types.Int -> Language.Fixpoint.Types.PrettyPrint.Tidy -> Language.Fixpoint.Types.Environments.SizedEnv a -> Text.PrettyPrint.HughesPJ.Doc {- Arity: 4, Strictness: , Unfolding: InlineRule (4, True, True) (\ @ a ($dPPrint :: Language.Fixpoint.Types.PrettyPrint.PPrint a) (ds :: GHC.Types.Int) (eta :: Language.Fixpoint.Types.PrettyPrint.Tidy) (eta1 :: Language.Fixpoint.Types.Environments.SizedEnv a) -> Language.Fixpoint.Types.Environments.$fPPrintSizedEnv_$cpprintTidy @ a $dPPrint eta eta1) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fPPrintSizedEnv_$cpprintTidy :: Language.Fixpoint.Types.PrettyPrint.PPrint a => Language.Fixpoint.Types.PrettyPrint.Tidy -> Language.Fixpoint.Types.Environments.SizedEnv a -> Text.PrettyPrint.HughesPJ.Doc {- Arity: 3, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (3, True, False) (\ @ a (w :: Language.Fixpoint.Types.PrettyPrint.PPrint a) (w1 :: Language.Fixpoint.Types.PrettyPrint.Tidy) (w2 :: Language.Fixpoint.Types.Environments.SizedEnv a) -> case w2 of ww { Language.Fixpoint.Types.Environments.BE ww1 ww2 -> case ww2 of wild { Data.HashMap.Base.Empty -> Language.Fixpoint.Types.PrettyPrint.pprintKVs @ GHC.Types.Int @ a Language.Fixpoint.Types.PrettyPrint.$fPPrintInt w w1 (GHC.Types.[] @ (GHC.Types.Int, a)) Data.HashMap.Base.BitmapIndexed dt dt1 -> Language.Fixpoint.Types.PrettyPrint.pprintKVs @ GHC.Types.Int @ a Language.Fixpoint.Types.PrettyPrint.$fPPrintInt w w1 (Language.Fixpoint.Types.Environments.$fPPrintSizedEnv3 @ a (Data.HashMap.Array.Array @ (Data.HashMap.Base.HashMap GHC.Types.Int a) dt1) (GHC.Prim.sizeofArray# @ (Data.HashMap.Base.HashMap GHC.Types.Int a) dt1) 0# (GHC.Types.[] @ (GHC.Types.Int, a))) Data.HashMap.Base.Leaf dt dt1 dt2 -> Language.Fixpoint.Types.PrettyPrint.pprintKVs @ GHC.Types.Int @ a Language.Fixpoint.Types.PrettyPrint.$fPPrintInt w w1 (GHC.Types.: @ (GHC.Types.Int, a) (dt1, dt2) (GHC.Types.[] @ (GHC.Types.Int, a))) Data.HashMap.Base.Full dt -> Language.Fixpoint.Types.PrettyPrint.pprintKVs @ GHC.Types.Int @ a Language.Fixpoint.Types.PrettyPrint.$fPPrintInt w w1 (Language.Fixpoint.Types.Environments.$fPPrintSizedEnv2 @ a (Data.HashMap.Array.Array @ (Data.HashMap.Base.HashMap GHC.Types.Int a) dt) (GHC.Prim.sizeofArray# @ (Data.HashMap.Base.HashMap GHC.Types.Int a) dt) 0# (GHC.Types.[] @ (GHC.Types.Int, a))) Data.HashMap.Base.Collision dt dt1 -> Language.Fixpoint.Types.PrettyPrint.pprintKVs @ GHC.Types.Int @ a Language.Fixpoint.Types.PrettyPrint.$fPPrintInt w w1 (Language.Fixpoint.Types.Environments.$fPPrintSizedEnv1 @ a (Data.HashMap.Array.Array @ (Data.HashMap.Base.Leaf GHC.Types.Int a) dt1) (GHC.Prim.sizeofArray# @ (Data.HashMap.Base.Leaf GHC.Types.Int a) dt1) 0# (GHC.Types.[] @ (GHC.Types.Int, a))) } }) -} 999de3bcf4ed26dd71bfcb519acbd47a $fShowPacks :: GHC.Show.Show Language.Fixpoint.Types.Environments.Packs DFunId {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Environments.Packs Language.Fixpoint.Types.Environments.$fShowPacks_$cshowsPrec Language.Fixpoint.Types.Environments.$fShowPacks_$cshow Language.Fixpoint.Types.Environments.$fShowPacks_$cshowList -} 2e1e9f53a896df628e5eab89a24bbe21 $fShowPacks1 :: [GHC.Types.Char] {- Unfolding: (GHC.CString.unpackCString# "}"#) -} 54acc9440c414a532d349a96af89af8d $fShowPacks2 :: [GHC.Types.Char] {- Unfolding: (GHC.CString.unpackCString# "packm = "#) -} 44d57f00633f1e534356a35781923de4 $fShowPacks3 :: [GHC.Types.Char] {- Unfolding: (GHC.CString.unpackCString# "Packs {"#) -} f787a37c7d86064cb7939fb31179cf94 $fShowPacks4 :: [GHC.Types.Char] {- Unfolding: (GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Environments.$fShowPacks1 (GHC.Types.[] @ GHC.Types.Char)) -} 999de3bcf4ed26dd71bfcb519acbd47a $fShowPacks_$cshow :: Language.Fixpoint.Types.Environments.Packs -> GHC.Base.String {- Arity: 1, Strictness: , Unfolding: (\ (x :: Language.Fixpoint.Types.Environments.Packs) -> GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Environments.$fShowPacks3 (GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Environments.$fShowPacks2 (Data.HashMap.Base.$w$cshowsPrec @ Language.Fixpoint.Types.Refinements.KVar @ GHC.Types.Int Language.Fixpoint.Types.Refinements.$fShowKVar GHC.Show.$fShowInt 0# x `cast` (Language.Fixpoint.Types.Environments.N:Packs[0]) Language.Fixpoint.Types.Environments.$fShowPacks4))) -} 999de3bcf4ed26dd71bfcb519acbd47a $fShowPacks_$cshowList :: [Language.Fixpoint.Types.Environments.Packs] -> GHC.Show.ShowS {- Arity: 2, Unfolding: (GHC.Show.showList__ @ Language.Fixpoint.Types.Environments.Packs Language.Fixpoint.Types.Environments.$fShowPacks_$sshows) -} 999de3bcf4ed26dd71bfcb519acbd47a $fShowPacks_$cshowsPrec :: GHC.Types.Int -> Language.Fixpoint.Types.Environments.Packs -> GHC.Show.ShowS {- Arity: 2, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (2, True, False) (\ (w :: GHC.Types.Int) (w1 :: Language.Fixpoint.Types.Environments.Packs) -> case w of ww { GHC.Types.I# ww1 -> Language.Fixpoint.Types.Environments.$w$cshowsPrec ww1 w1 }) -} 999de3bcf4ed26dd71bfcb519acbd47a $fShowPacks_$sshows :: Language.Fixpoint.Types.Environments.Packs -> GHC.Show.ShowS {- Arity: 1, Unfolding: InlineRule (0, True, False) (Language.Fixpoint.Types.Environments.$fShowPacks_$cshowsPrec GHC.Show.shows22) -} ae9741409aa049333ef008f3802cfecf $fShowSEnv :: Language.Fixpoint.Types.PrettyPrint.Fixpoint (Language.Fixpoint.Types.Environments.SEnv a) => GHC.Show.Show (Language.Fixpoint.Types.Environments.SEnv a) DFunId {- Arity: 1, Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun: @ a ($dFixpoint :: Language.Fixpoint.Types.PrettyPrint.Fixpoint (Language.Fixpoint.Types.Environments.SEnv a)). @ (Language.Fixpoint.Types.Environments.SEnv a) (Language.Fixpoint.Types.Environments.$fShowSEnv_$cshowsPrec @ a $dFixpoint) (Language.Fixpoint.Types.Environments.$fShowSEnv_$cshow @ a $dFixpoint) (Language.Fixpoint.Types.Environments.$fShowSEnv_$cshowList @ a $dFixpoint) -} 5edb14f18f2fe2ee64d74847d80e5820 $fShowSEnv1 :: 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 s3 dt1 -> case s3 of wild1 { Text.PrettyPrint.Annotated.HughesPJ.Chr dt -> GHC.Types.: @ GHC.Types.Char (GHC.Types.C# dt) eta Text.PrettyPrint.Annotated.HughesPJ.Str s4 -> GHC.Base.++ @ GHC.Types.Char s4 eta Text.PrettyPrint.Annotated.HughesPJ.PStr s4 -> GHC.Base.++ @ GHC.Types.Char s4 eta } }) -} ae9741409aa049333ef008f3802cfecf $fShowSEnv_$cshow :: Language.Fixpoint.Types.PrettyPrint.Fixpoint (Language.Fixpoint.Types.Environments.SEnv a) => Language.Fixpoint.Types.Environments.SEnv a -> GHC.Base.String {- Arity: 2, Strictness: , Unfolding: (\ @ a ($dFixpoint :: Language.Fixpoint.Types.PrettyPrint.Fixpoint (Language.Fixpoint.Types.Environments.SEnv a)) (eta :: Language.Fixpoint.Types.Environments.SEnv a) -> 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.Environments.$fShowSEnv1 (GHC.Types.[] @ GHC.Types.Char) (Language.Fixpoint.Types.PrettyPrint.toFix @ (Language.Fixpoint.Types.Environments.SEnv a) $dFixpoint eta) `cast` (Text.PrettyPrint.HughesPJ.N:Doc[0])) -} ae9741409aa049333ef008f3802cfecf $fShowSEnv_$cshowList :: Language.Fixpoint.Types.PrettyPrint.Fixpoint (Language.Fixpoint.Types.Environments.SEnv a) => [Language.Fixpoint.Types.Environments.SEnv a] -> GHC.Show.ShowS {- Arity: 3, Strictness: , Unfolding: (\ @ a ($dFixpoint :: Language.Fixpoint.Types.PrettyPrint.Fixpoint (Language.Fixpoint.Types.Environments.SEnv a)) (ls :: [Language.Fixpoint.Types.Environments.SEnv a]) (s3 :: GHC.Base.String) -> GHC.Show.showList__ @ (Language.Fixpoint.Types.Environments.SEnv a) (\ (x :: Language.Fixpoint.Types.Environments.SEnv a) (s4 :: GHC.Base.String)[OneShot] -> GHC.Base.++ @ GHC.Types.Char (Language.Fixpoint.Types.Environments.$fShowSEnv_$cshow @ a $dFixpoint x) s4) ls s3) -} ae9741409aa049333ef008f3802cfecf $fShowSEnv_$cshowsPrec :: Language.Fixpoint.Types.PrettyPrint.Fixpoint (Language.Fixpoint.Types.Environments.SEnv a) => GHC.Types.Int -> Language.Fixpoint.Types.Environments.SEnv a -> GHC.Show.ShowS {- Arity: 4, Strictness: , Unfolding: InlineRule (4, True, False) (\ @ a ($dFixpoint :: Language.Fixpoint.Types.PrettyPrint.Fixpoint (Language.Fixpoint.Types.Environments.SEnv a)) (ds :: GHC.Types.Int) (x :: Language.Fixpoint.Types.Environments.SEnv a) (s3 :: GHC.Base.String) -> 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.Environments.$fShowSEnv_$cshow @ a $dFixpoint x)) s3) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fShowSizedEnv :: GHC.Show.Show a => GHC.Show.Show (Language.Fixpoint.Types.Environments.SizedEnv a) DFunId {- Arity: 1, Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun: @ a ($dShow :: GHC.Show.Show a). @ (Language.Fixpoint.Types.Environments.SizedEnv a) (Language.Fixpoint.Types.Environments.$fShowSizedEnv_$cshowsPrec @ a $dShow) (Language.Fixpoint.Types.Environments.$fShowSizedEnv_$cshow @ a $dShow) (Language.Fixpoint.Types.Environments.$fShowSizedEnv_$cshowList @ a $dShow) -} 47a2f6ca65d0ba790669eb80c2d42e01 $fShowSizedEnv1 :: [GHC.Types.Char] {- Unfolding: (GHC.CString.unpackCString# "beBinds = "#) -} f5e3502e48b24be1dd37d51531f2a16a $fShowSizedEnv2 :: [GHC.Types.Char] {- Unfolding: (GHC.CString.unpackCString# ", "#) -} ca4c4a4e3cd4841c263a9aa0d9867663 $fShowSizedEnv3 :: [GHC.Types.Char] {- Unfolding: (GHC.CString.unpackCString# "_beSize = "#) -} b18dbdcb7ebc469ef783baf79bd7e7b6 $fShowSizedEnv4 :: [GHC.Types.Char] {- Unfolding: (GHC.CString.unpackCString# "BE {"#) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fShowSizedEnv_$cshow :: GHC.Show.Show a => Language.Fixpoint.Types.Environments.SizedEnv a -> GHC.Base.String {- Arity: 2, Strictness: , Unfolding: InlineRule (2, True, False) (\ @ a ($dShow :: GHC.Show.Show a) (x :: Language.Fixpoint.Types.Environments.SizedEnv a) -> Language.Fixpoint.Types.Environments.$fShowSizedEnv_$cshowsPrec @ a $dShow GHC.Show.shows22 x (GHC.Types.[] @ GHC.Types.Char)) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fShowSizedEnv_$cshowList :: GHC.Show.Show a => [Language.Fixpoint.Types.Environments.SizedEnv a] -> GHC.Show.ShowS {- Arity: 3, Strictness: , Unfolding: InlineRule (3, True, False) (\ @ a ($dShow :: GHC.Show.Show a) (eta :: [Language.Fixpoint.Types.Environments.SizedEnv a]) (eta1 :: GHC.Base.String) -> GHC.Show.showList__ @ (Language.Fixpoint.Types.Environments.SizedEnv a) (Language.Fixpoint.Types.Environments.$fShowSizedEnv_$cshowsPrec @ a $dShow Language.Fixpoint.Types.Environments.$fFoldableSizedEnv5) eta eta1) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fShowSizedEnv_$cshowsPrec :: GHC.Show.Show a => GHC.Types.Int -> Language.Fixpoint.Types.Environments.SizedEnv a -> GHC.Show.ShowS {- Arity: 3, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (3, True, False) (\ @ a (w :: GHC.Show.Show a) (w1 :: GHC.Types.Int) (w2 :: Language.Fixpoint.Types.Environments.SizedEnv a) -> case w1 of ww { GHC.Types.I# ww1 -> case w2 of ww2 { Language.Fixpoint.Types.Environments.BE ww3 ww4 -> Language.Fixpoint.Types.Environments.$w$cshowsPrec1 @ a w ww1 ww3 ww4 } }) -} f15807d6eaeb02255e82ec0cfe2b071b $fShowSizedEnv_$s$fShow(,) :: GHC.Show.Show (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) (GHC.Show.$fShow(,)_$cshowsPrec @ Language.Fixpoint.Types.Names.Symbol @ Language.Fixpoint.Types.Refinements.SortedReft Language.Fixpoint.Types.Names.$fShowSymbol Language.Fixpoint.Types.Substitutions.$fShowSortedReft) Language.Fixpoint.Types.Environments.$fShowSizedEnv_$s$fShow(,)_$cshow Language.Fixpoint.Types.Environments.$fShowSizedEnv_$s$fShow(,)_$cshowList -} 9b1810ba06d5298a5cb8b9a08038665b $fShowSizedEnv_$s$fShow(,)_$cshow :: (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) -> GHC.Base.String {- Arity: 1, Strictness: m2, Unfolding: InlineRule (1, True, False) (\ (x :: (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) -> GHC.Show.$fShow(,)_$cshowsPrec @ Language.Fixpoint.Types.Names.Symbol @ Language.Fixpoint.Types.Refinements.SortedReft Language.Fixpoint.Types.Names.$fShowSymbol Language.Fixpoint.Types.Substitutions.$fShowSortedReft GHC.Show.shows22 x (GHC.Types.[] @ GHC.Types.Char)) -} 86df49138f2ad759ba739667a2dff324 $fShowSizedEnv_$s$fShow(,)_$cshowList :: [(Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)] -> GHC.Show.ShowS {- Arity: 2, Strictness: , Unfolding: InlineRule (2, True, False) (\ (eta :: [(Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)]) (eta1 :: GHC.Base.String) -> GHC.Show.showList__ @ (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) (GHC.Show.$fShow(,)_$cshowsPrec @ Language.Fixpoint.Types.Names.Symbol @ Language.Fixpoint.Types.Refinements.SortedReft Language.Fixpoint.Types.Names.$fShowSymbol Language.Fixpoint.Types.Substitutions.$fShowSortedReft GHC.Show.shows22) eta eta1) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fShowSolEnv :: GHC.Show.Show Language.Fixpoint.Types.Environments.SolEnv DFunId {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Environments.SolEnv Language.Fixpoint.Types.Environments.$fShowSolEnv_$cshowsPrec Language.Fixpoint.Types.Environments.$fShowSolEnv_$cshow Language.Fixpoint.Types.Environments.$fShowSolEnv_$cshowList -} fab4faff4daf482f3a85bacbe2d2d4eb $fShowSolEnv1 :: [GHC.Types.Char] {- Unfolding: (GHC.CString.unpackCString# "soeBinds = "#) -} 9c267ec9934ff2e7553a50cb0bbe008d $fShowSolEnv2 :: [GHC.Types.Char] {- Unfolding: (GHC.CString.unpackCString# "SolEnv {"#) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fShowSolEnv_$cshow :: Language.Fixpoint.Types.Environments.SolEnv -> GHC.Base.String {- Arity: 1, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (1, True, False) (\ (w :: Language.Fixpoint.Types.Environments.SolEnv) -> case w of ww { Language.Fixpoint.Types.Environments.SolEnv ww1 -> case ww1 of ww2 { Language.Fixpoint.Types.Environments.BE ww3 ww4 -> Language.Fixpoint.Types.Environments.$w$cshow ww3 ww4 } }) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fShowSolEnv_$cshowList :: [Language.Fixpoint.Types.Environments.SolEnv] -> GHC.Show.ShowS {- Arity: 2, Unfolding: (GHC.Show.showList__ @ Language.Fixpoint.Types.Environments.SolEnv Language.Fixpoint.Types.Environments.$fShowSolEnv_$sshows) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fShowSolEnv_$cshowsPrec :: GHC.Types.Int -> Language.Fixpoint.Types.Environments.SolEnv -> GHC.Show.ShowS {- Arity: 2, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (2, True, False) (\ (w :: GHC.Types.Int) (w1 :: Language.Fixpoint.Types.Environments.SolEnv) -> case w of ww { GHC.Types.I# ww1 -> case w1 of ww2 { Language.Fixpoint.Types.Environments.SolEnv ww3 -> case ww3 of ww4 { Language.Fixpoint.Types.Environments.BE ww5 ww6 -> Language.Fixpoint.Types.Environments.$w$cshowsPrec2 ww1 ww5 ww6 } } }) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fShowSolEnv_$sshows :: Language.Fixpoint.Types.Environments.SolEnv -> GHC.Show.ShowS {- Arity: 1, Unfolding: InlineRule (0, True, False) (Language.Fixpoint.Types.Environments.$fShowSolEnv_$cshowsPrec GHC.Show.shows22) -} ae9741409aa049333ef008f3802cfecf $fTraversableSEnv :: Data.Traversable.Traversable Language.Fixpoint.Types.Environments.SEnv DFunId {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Environments.SEnv Language.Fixpoint.Types.Environments.$fFunctorSEnv Language.Fixpoint.Types.Environments.$fFoldableSEnv Language.Fixpoint.Types.Environments.$fTraversableSEnv_$ctraverse Language.Fixpoint.Types.Environments.$fTraversableSEnv_$csequenceA Language.Fixpoint.Types.Environments.$fTraversableSEnv_$cmapM Language.Fixpoint.Types.Environments.$fTraversableSEnv_$csequence -} ae9741409aa049333ef008f3802cfecf $fTraversableSEnv_$cmapM :: GHC.Base.Monad m => (a -> m b) -> Language.Fixpoint.Types.Environments.SEnv a -> m (Language.Fixpoint.Types.Environments.SEnv b) {- Arity: 3, Strictness: , Unfolding: (\ @ (m :: * -> *) @ a @ b ($dMonad :: GHC.Base.Monad m) (eta :: a -> m b) (eta1 :: Language.Fixpoint.Types.Environments.SEnv a) -> let { $dApplicative :: GHC.Base.Applicative m = GHC.Base.$p1Monad @ m $dMonad } in GHC.Base.fmap @ m (GHC.Base.$p1Applicative @ m $dApplicative) @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol b) @ (Language.Fixpoint.Types.Environments.SEnv b) (Language.Fixpoint.Types.Environments.$fDataSEnv2 @ b) `cast` (_R ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N) (Data.HashMap.Base.$fTraversableHashMap_$ctraverse @ Language.Fixpoint.Types.Names.Symbol @ m @ a @ b $dApplicative eta eta1 `cast` (Language.Fixpoint.Types.Environments.N:SEnv[0] _N))) -} ae9741409aa049333ef008f3802cfecf $fTraversableSEnv_$csequence :: GHC.Base.Monad m => Language.Fixpoint.Types.Environments.SEnv (m a) -> m (Language.Fixpoint.Types.Environments.SEnv a) {- Arity: 2, Strictness: , Unfolding: (\ @ (m :: * -> *) @ a ($dMonad :: GHC.Base.Monad m) (eta :: Language.Fixpoint.Types.Environments.SEnv (m a)) -> let { $dApplicative :: GHC.Base.Applicative m = GHC.Base.$p1Monad @ m $dMonad } in GHC.Base.fmap @ m (GHC.Base.$p1Applicative @ m $dApplicative) @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a) @ (Language.Fixpoint.Types.Environments.SEnv a) (Language.Fixpoint.Types.Environments.$fDataSEnv2 @ a) `cast` (_R ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N) (Data.HashMap.Base.$fTraversableHashMap_$ctraverse @ Language.Fixpoint.Types.Names.Symbol @ m @ (m a) @ a $dApplicative (GHC.Base.id @ (m a)) eta `cast` (Language.Fixpoint.Types.Environments.N:SEnv[0] _N))) -} ae9741409aa049333ef008f3802cfecf $fTraversableSEnv_$csequenceA :: GHC.Base.Applicative f => Language.Fixpoint.Types.Environments.SEnv (f a) -> f (Language.Fixpoint.Types.Environments.SEnv a) {- Arity: 2, Strictness: , Unfolding: InlineRule (1, True, False) (\ @ (f :: * -> *) @ a ($dApplicative :: GHC.Base.Applicative f) (eta :: Language.Fixpoint.Types.Environments.SEnv (f a)) -> Language.Fixpoint.Types.Environments.$fTraversableSEnv_$ctraverse @ f @ (f a) @ a $dApplicative (GHC.Base.id @ (f a)) eta) -} ae9741409aa049333ef008f3802cfecf $fTraversableSEnv_$ctraverse :: GHC.Base.Applicative f => (a -> f b) -> Language.Fixpoint.Types.Environments.SEnv a -> f (Language.Fixpoint.Types.Environments.SEnv b) {- Arity: 3, Strictness: , Unfolding: InlineRule (3, True, False) (\ @ (f :: * -> *) @ a @ b ($dApplicative :: GHC.Base.Applicative f) (eta :: a -> f b) (eta1 :: Language.Fixpoint.Types.Environments.SEnv a) -> GHC.Base.fmap @ f (GHC.Base.$p1Applicative @ f $dApplicative) @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol b) @ (Language.Fixpoint.Types.Environments.SEnv b) (Language.Fixpoint.Types.Environments.$fDataSEnv2 @ b) `cast` (_R ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N) (Data.HashMap.Base.$fTraversableHashMap_$ctraverse @ Language.Fixpoint.Types.Names.Symbol @ f @ a @ b $dApplicative eta eta1 `cast` (Language.Fixpoint.Types.Environments.N:SEnv[0] _N))) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fTraversableSizedEnv :: Data.Traversable.Traversable Language.Fixpoint.Types.Environments.SizedEnv DFunId {- Strictness: m, Inline: [ALWAYS] CONLIKE, Unfolding: DFun:. @ Language.Fixpoint.Types.Environments.SizedEnv Language.Fixpoint.Types.Environments.$fFunctorSizedEnv Language.Fixpoint.Types.Environments.$fFoldableSizedEnv Language.Fixpoint.Types.Environments.$fTraversableSizedEnv_$ctraverse Language.Fixpoint.Types.Environments.$fTraversableSizedEnv_$csequenceA Language.Fixpoint.Types.Environments.$fTraversableSizedEnv_$cmapM Language.Fixpoint.Types.Environments.$fTraversableSizedEnv_$csequence -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fTraversableSizedEnv_$cmapM :: GHC.Base.Monad m => (a -> m b) -> Language.Fixpoint.Types.Environments.SizedEnv a -> m (Language.Fixpoint.Types.Environments.SizedEnv b) {- Arity: 3, Strictness: , Unfolding: InlineRule (3, True, False) (\ @ (m :: * -> *) @ a @ b ($dMonad :: GHC.Base.Monad m) (eta :: a -> m b) (eta1 :: Language.Fixpoint.Types.Environments.SizedEnv a) -> Language.Fixpoint.Types.Environments.$fTraversableSizedEnv_$ctraverse @ m @ a @ b (GHC.Base.$p1Monad @ m $dMonad) eta eta1) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fTraversableSizedEnv_$csequence :: GHC.Base.Monad m => Language.Fixpoint.Types.Environments.SizedEnv (m a) -> m (Language.Fixpoint.Types.Environments.SizedEnv a) {- Arity: 2, Strictness: , Unfolding: InlineRule (2, True, False) (\ @ (m :: * -> *) @ a ($dMonad :: GHC.Base.Monad m) (eta :: Language.Fixpoint.Types.Environments.SizedEnv (m a)) -> Language.Fixpoint.Types.Environments.$fTraversableSizedEnv_$ctraverse @ m @ (m a) @ a (GHC.Base.$p1Monad @ m $dMonad) (GHC.Base.id @ (m a)) eta) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fTraversableSizedEnv_$csequenceA :: GHC.Base.Applicative f => Language.Fixpoint.Types.Environments.SizedEnv (f a) -> f (Language.Fixpoint.Types.Environments.SizedEnv a) {- Arity: 2, Strictness: , Unfolding: InlineRule (1, True, False) (\ @ (f :: * -> *) @ a ($dApplicative :: GHC.Base.Applicative f) (eta :: Language.Fixpoint.Types.Environments.SizedEnv (f a)) -> Language.Fixpoint.Types.Environments.$fTraversableSizedEnv_$ctraverse @ f @ (f a) @ a $dApplicative (GHC.Base.id @ (f a)) eta) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $fTraversableSizedEnv_$ctraverse :: GHC.Base.Applicative f => (a -> f b) -> Language.Fixpoint.Types.Environments.SizedEnv a -> f (Language.Fixpoint.Types.Environments.SizedEnv b) {- Arity: 3, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (3, True, False) (\ @ (f :: * -> *) @ a @ b (w :: GHC.Base.Applicative f) (w1 :: a -> f b) (w2 :: Language.Fixpoint.Types.Environments.SizedEnv a) -> case w2 of ww { Language.Fixpoint.Types.Environments.BE ww1 ww2 -> Language.Fixpoint.Types.Environments.$w$ctraverse @ f @ a @ b w w1 ww1 ww2 }) -} ed5a081fc1c9ca30e4f08d7d26f0334b $s$fBinaryHashMap_f :: [(Language.Fixpoint.Types.Refinements.KVar, GHC.Types.Int)] -> Data.Binary.Put.Put {- Unfolding: (Data.Binary.Class.$fBinary(,)_$cputList @ Language.Fixpoint.Types.Refinements.KVar @ GHC.Types.Int Language.Fixpoint.Types.Refinements.$fBinaryKVar Data.Binary.Class.$fBinaryInt) -} 40bfa6d1ed982bf0638726268ceb7faf $s$wupdateOrConcatWithKey :: (Language.Fixpoint.Types.Refinements.KVar -> v -> v -> v) -> GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v) -> GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v) -> GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v) {- Arity: 3, Strictness: , Inline: [0], Unfolding: (\ @ v (w1 :: Language.Fixpoint.Types.Refinements.KVar -> v -> v -> v) (ww :: GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v)) (ww1 :: GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v)) -> let { wild1 :: GHC.Prim.Int# = GHC.Prim.sizeofArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v) ww1 } in case GHC.Prim.newArray# @ (GHC.Base.Maybe GHC.Types.Int) @ GHC.Prim.RealWorld wild1 (Data.HashMap.Array.undefinedElem @ (GHC.Base.Maybe GHC.Types.Int)) GHC.Prim.realWorld# of ds { (#,#) ipv ipv1 -> letrec { $wgo22 :: forall s3. Data.HashMap.Array.Array (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v) -> Data.HashMap.Array.MArray s3 (GHC.Base.Maybe GHC.Types.Int) -> GHC.Prim.Int# -> GHC.Prim.Int# -> GHC.Prim.State# s3 -> (# GHC.Prim.State# s3, Data.HashMap.Array.MArray s3 (GHC.Base.Maybe GHC.Types.Int) #) {- Arity: 5, Strictness: , Inline: [0] -} = \ @ s3 (w :: Data.HashMap.Array.Array (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v)) (w2 :: Data.HashMap.Array.MArray s3 (GHC.Base.Maybe GHC.Types.Int)) (ww2 :: GHC.Prim.Int#) (ww3 :: GHC.Prim.Int#) (w3 :: GHC.Prim.State# s3)[OneShot] -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.>=# ww2 ww3) of wild2 { GHC.Types.False -> case w2 of wild3 { Data.HashMap.Array.MArray ds1 -> case GHC.Prim.writeArray# @ s3 @ (GHC.Base.Maybe GHC.Types.Int) ds1 ww2 (case w of wild4 { Data.HashMap.Array.Array ds2 -> case GHC.Prim.indexArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v) ds2 ww2 of ds4 { Unit# ipv2 -> case ipv2 of wild5 { Data.HashMap.Base.L k1 ds3 -> case k1 `cast` (Language.Fixpoint.Types.Refinements.N:KVar[0]) of ww4 { Language.Fixpoint.Types.Names.S ww5 ww6 ww7 -> Language.Fixpoint.Types.Environments.$wpoly_go4 @ v ww5 ww 0# (GHC.Prim.sizeofArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v) ww) } } } }) w3 of s' { DEFAULT -> $wgo22 @ s3 w wild3 (GHC.Prim.+# ww2 1#) ww3 s' } } GHC.Types.True -> (# w3, w2 #) } } in case $wgo22 @ GHC.Prim.RealWorld (Data.HashMap.Array.Array @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v) ww1) (Data.HashMap.Array.$WMArray @ GHC.Prim.RealWorld @ (GHC.Base.Maybe GHC.Types.Int) ipv1) 0# wild1 ipv of ds1 { (#,#) ipv2 ipv3 -> case ipv3 of wild { Data.HashMap.Array.MArray ds2 -> case GHC.Prim.unsafeFreezeArray# @ GHC.Prim.RealWorld @ (GHC.Base.Maybe GHC.Types.Int) ds2 ipv2 of ds3 { (#,#) ipv4 ipv5 -> case Language.Fixpoint.Types.Environments.$wgo1 (Data.HashMap.Array.Array @ (GHC.Base.Maybe GHC.Types.Int) ipv5) (GHC.Prim.sizeofArray# @ (GHC.Base.Maybe GHC.Types.Int) ipv5) 0# 0# of ww2 { DEFAULT -> let { n1 :: GHC.Prim.Int# = GHC.Prim.sizeofArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v) ww } in case GHC.Prim.newArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v) @ GHC.Prim.RealWorld (GHC.Prim.+# n1 ww2) (Data.HashMap.Array.undefinedElem @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v)) GHC.Prim.realWorld# of ds4 { (#,#) ipv7 ipv8 -> case GHC.Prim.copyArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v) @ GHC.Prim.RealWorld ww 0# ipv8 0# n1 ipv7 of s3 { DEFAULT -> letrec { $wgo23 :: GHC.Prim.Int# -> GHC.Prim.Int# -> GHC.Prim.State# GHC.Prim.RealWorld -> (# GHC.Prim.State# GHC.Prim.RealWorld, () #) {- Arity: 3, Strictness: , Inline: [0] -} = \ (ww3 :: GHC.Prim.Int#) (ww4 :: GHC.Prim.Int#) (w :: GHC.Prim.State# GHC.Prim.RealWorld)[OneShot] -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.>=# ww4 wild1) of wild2 { GHC.Types.False -> case GHC.Prim.indexArray# @ (GHC.Base.Maybe GHC.Types.Int) ipv5 ww4 of ds5 { Unit# ipv9 -> case ipv9 of wild3 { GHC.Base.Nothing -> case GHC.Prim.indexArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v) ww1 ww4 of ds6 { Unit# ipv10 -> case GHC.Prim.writeArray# @ GHC.Prim.RealWorld @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v) ipv8 ww3 ipv10 w of s' { DEFAULT -> $wgo23 (GHC.Prim.+# ww3 1#) (GHC.Prim.+# ww4 1#) s' } } GHC.Base.Just i3 -> case i3 of wild4 { GHC.Types.I# i# -> case GHC.Prim.indexArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v) ww i# of ds6 { Unit# ipv10 -> case ipv10 of wild5 { Data.HashMap.Base.L k1 v1 -> case GHC.Prim.indexArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v) ww1 ww4 of ds7 { Unit# ipv6 -> case ipv6 of wild6 { Data.HashMap.Base.L ds8 v2 -> case GHC.Prim.writeArray# @ GHC.Prim.RealWorld @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v) ipv8 i# (Data.HashMap.Base.L @ Language.Fixpoint.Types.Refinements.KVar @ v k1 (w1 k1 v1 v2)) w of s' { DEFAULT -> $wgo23 ww3 (GHC.Prim.+# ww4 1#) s' } } } } } } } } GHC.Types.True -> (# w, GHC.Tuple.() #) } } in case $wgo23 n1 0# s3 of ds5 { (#,#) ipv9 ipv10 -> case GHC.Prim.unsafeFreezeArray# @ GHC.Prim.RealWorld @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v) ipv8 ipv9 of ds6 { (#,#) ipv11 ipv12 -> ipv12 } } } } } } } } }) -} e414658f72a31a9871e9f3cef9d982d6 $s$wupdateOrConcatWithKey1 :: (Language.Fixpoint.Types.Environments.BindId -> v -> v -> v) -> GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) -> GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) -> GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) {- Arity: 3, Strictness: , Inline: [0], Unfolding: (\ @ v (w1 :: Language.Fixpoint.Types.Environments.BindId -> v -> v -> v) (ww :: GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v)) (ww1 :: GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v)) -> let { wild1 :: GHC.Prim.Int# = GHC.Prim.sizeofArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) ww1 } in case GHC.Prim.newArray# @ (GHC.Base.Maybe GHC.Types.Int) @ GHC.Prim.RealWorld wild1 (Data.HashMap.Array.undefinedElem @ (GHC.Base.Maybe GHC.Types.Int)) GHC.Prim.realWorld# of ds { (#,#) ipv ipv1 -> letrec { $wgo22 :: forall s3. Data.HashMap.Array.Array (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) -> Data.HashMap.Array.MArray s3 (GHC.Base.Maybe GHC.Types.Int) -> GHC.Prim.Int# -> GHC.Prim.Int# -> GHC.Prim.State# s3 -> (# GHC.Prim.State# s3, Data.HashMap.Array.MArray s3 (GHC.Base.Maybe GHC.Types.Int) #) {- Arity: 5, Strictness: , Inline: [0] -} = \ @ s3 (w :: Data.HashMap.Array.Array (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v)) (w2 :: Data.HashMap.Array.MArray s3 (GHC.Base.Maybe GHC.Types.Int)) (ww2 :: GHC.Prim.Int#) (ww3 :: GHC.Prim.Int#) (w3 :: GHC.Prim.State# s3)[OneShot] -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.>=# ww2 ww3) of wild2 { GHC.Types.False -> case w2 of wild3 { Data.HashMap.Array.MArray ds1 -> case GHC.Prim.writeArray# @ s3 @ (GHC.Base.Maybe GHC.Types.Int) ds1 ww2 (case w of wild4 { Data.HashMap.Array.Array ds2 -> case GHC.Prim.indexArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) ds2 ww2 of ds4 { Unit# ipv2 -> case ipv2 of wild5 { Data.HashMap.Base.L k1 ds3 -> case k1 of ww4 { GHC.Types.I# ww5 -> Language.Fixpoint.Types.Environments.$wpoly_go5 @ v ww5 ww 0# (GHC.Prim.sizeofArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) ww) } } } }) w3 of s' { DEFAULT -> $wgo22 @ s3 w wild3 (GHC.Prim.+# ww2 1#) ww3 s' } } GHC.Types.True -> (# w3, w2 #) } } in case $wgo22 @ GHC.Prim.RealWorld (Data.HashMap.Array.Array @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) ww1) (Data.HashMap.Array.$WMArray @ GHC.Prim.RealWorld @ (GHC.Base.Maybe GHC.Types.Int) ipv1) 0# wild1 ipv of ds1 { (#,#) ipv2 ipv3 -> case ipv3 of wild { Data.HashMap.Array.MArray ds2 -> case GHC.Prim.unsafeFreezeArray# @ GHC.Prim.RealWorld @ (GHC.Base.Maybe GHC.Types.Int) ds2 ipv2 of ds3 { (#,#) ipv4 ipv5 -> case Language.Fixpoint.Types.Environments.$wgo2 (Data.HashMap.Array.Array @ (GHC.Base.Maybe GHC.Types.Int) ipv5) (GHC.Prim.sizeofArray# @ (GHC.Base.Maybe GHC.Types.Int) ipv5) 0# 0# of ww2 { DEFAULT -> let { n1 :: GHC.Prim.Int# = GHC.Prim.sizeofArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) ww } in case GHC.Prim.newArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) @ GHC.Prim.RealWorld (GHC.Prim.+# n1 ww2) (Data.HashMap.Array.undefinedElem @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v)) GHC.Prim.realWorld# of ds4 { (#,#) ipv7 ipv8 -> case GHC.Prim.copyArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) @ GHC.Prim.RealWorld ww 0# ipv8 0# n1 ipv7 of s3 { DEFAULT -> letrec { $wgo23 :: GHC.Prim.Int# -> GHC.Prim.Int# -> GHC.Prim.State# GHC.Prim.RealWorld -> (# GHC.Prim.State# GHC.Prim.RealWorld, () #) {- Arity: 3, Strictness: , Inline: [0] -} = \ (ww3 :: GHC.Prim.Int#) (ww4 :: GHC.Prim.Int#) (w :: GHC.Prim.State# GHC.Prim.RealWorld)[OneShot] -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.>=# ww4 wild1) of wild2 { GHC.Types.False -> case GHC.Prim.indexArray# @ (GHC.Base.Maybe GHC.Types.Int) ipv5 ww4 of ds5 { Unit# ipv9 -> case ipv9 of wild3 { GHC.Base.Nothing -> case GHC.Prim.indexArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) ww1 ww4 of ds6 { Unit# ipv10 -> case GHC.Prim.writeArray# @ GHC.Prim.RealWorld @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) ipv8 ww3 ipv10 w of s' { DEFAULT -> $wgo23 (GHC.Prim.+# ww3 1#) (GHC.Prim.+# ww4 1#) s' } } GHC.Base.Just i3 -> case i3 of wild4 { GHC.Types.I# i# -> case GHC.Prim.indexArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) ww i# of ds6 { Unit# ipv10 -> case ipv10 of wild5 { Data.HashMap.Base.L k1 v1 -> case GHC.Prim.indexArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) ww1 ww4 of ds7 { Unit# ipv6 -> case ipv6 of wild6 { Data.HashMap.Base.L ds8 v2 -> case GHC.Prim.writeArray# @ GHC.Prim.RealWorld @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) ipv8 i# (Data.HashMap.Base.L @ Language.Fixpoint.Types.Environments.BindId @ v k1 (w1 k1 v1 v2)) w of s' { DEFAULT -> $wgo23 ww3 (GHC.Prim.+# ww4 1#) s' } } } } } } } } GHC.Types.True -> (# w, GHC.Tuple.() #) } } in case $wgo23 n1 0# s3 of ds5 { (#,#) ipv9 ipv10 -> case GHC.Prim.unsafeFreezeArray# @ GHC.Prim.RealWorld @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) ipv8 ipv9 of ds6 { (#,#) ipv11 ipv12 -> ipv12 } } } } } } } } }) -} 40921ed1426ee19c95566e3c44da0624 $sadjust :: (v -> v) -> Language.Fixpoint.Types.Environments.BindId -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId v -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId v {- Arity: 3, HasNoCafRefs, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (3, True, False) (\ @ v (w :: v -> v) (w1 :: Language.Fixpoint.Types.Environments.BindId) (w2 :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId v) -> case w1 of ww { GHC.Types.I# ww1 -> Language.Fixpoint.Types.Environments.$w$sadjust @ v w ww1 w2 }) -} 82da83982a3755300bd8e19c0315ee32 $scoalesce1 :: Language.Fixpoint.Misc.EqHash Language.Fixpoint.Types.Refinements.KVar {- HasNoCafRefs, Strictness: m, Unfolding: ((Language.Fixpoint.Types.Refinements.$fEqKVar, Language.Fixpoint.Types.Refinements.$fOrdKVar, Language.Fixpoint.Types.Refinements.$fHashableKVar)) -} fb347a29a5f675f43efb05036b86661b $sdifference :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol v -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol w -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol v {- Arity: 2, Strictness: -} fd39a19abbcee7d2cf848b9606d5c7e2 $sinsert :: Language.Fixpoint.Types.Names.Symbol -> v -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol v -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol v {- Arity: 3, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (3, True, False) (\ @ v (w :: Language.Fixpoint.Types.Names.Symbol) (w1 :: v) (w2 :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol v) -> case w of ww { Language.Fixpoint.Types.Names.S ww1 ww2 ww3 -> case ww2 of ww4 { Data.Text.Internal.Text ww5 ww6 ww7 -> Language.Fixpoint.Types.Environments.$w$sinsert @ v ww1 ww5 ww6 ww7 ww3 w1 w2 } }) -} d1eaa84f60e531babe772f02e4a4c37e $sintersectionWith :: (v1 -> v2 -> v3) -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol v1 -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol v2 -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol v3 {- Arity: 3, Strictness: -} 41673a7dada098828665b1f4bd11865d $slookup :: Language.Fixpoint.Types.Refinements.KVar -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar v -> GHC.Base.Maybe v {- Arity: 2, HasNoCafRefs, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (2, True, False) (\ @ v (w :: Language.Fixpoint.Types.Refinements.KVar) (w1 :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar v) -> case w `cast` (Language.Fixpoint.Types.Refinements.N:KVar[0]) of ww { Language.Fixpoint.Types.Names.S ww1 ww2 ww3 -> case ww2 of ww4 { Data.Text.Internal.Text ww5 ww6 ww7 -> Language.Fixpoint.Types.Environments.$w$slookup @ v ww1 ww5 ww6 ww7 w1 } }) -} c5cda4629569f5595c11a1bcd28620e5 $slookup1 :: Language.Fixpoint.Types.Names.Symbol -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol v -> GHC.Base.Maybe v {- Arity: 2, HasNoCafRefs, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (2, True, False) (\ @ v (w :: Language.Fixpoint.Types.Names.Symbol) (w1 :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol v) -> case w of ww { Language.Fixpoint.Types.Names.S ww1 ww2 ww3 -> case ww2 of ww4 { Data.Text.Internal.Text ww5 ww6 ww7 -> Language.Fixpoint.Types.Environments.$w$slookup1 @ v ww1 ww5 ww6 ww7 w1 } }) -} b889725e063af83357656c204b41c115 $slookup3 :: Data.HashMap.Base.Hash -> Language.Fixpoint.Types.Environments.BindId -> Data.HashMap.Base.Shift -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId v -> GHC.Base.Maybe v {- Arity: 4, HasNoCafRefs, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (4, True, False) (\ @ v (w :: Data.HashMap.Base.Hash) (w1 :: Language.Fixpoint.Types.Environments.BindId) (w2 :: Data.HashMap.Base.Shift) (w3 :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId v) -> case w of ww { GHC.Types.W# ww1 -> case w1 of ww2 { GHC.Types.I# ww3 -> case w2 of ww4 { GHC.Types.I# ww5 -> Language.Fixpoint.Types.Environments.$wpoly_go13 @ v ww1 ww3 ww5 w3 } } }) -} b0e9a86b6043cc2489dfc97779579f73 $t5yRZoXKf80xBucM0CYlTgS :: Data.Data.DataType {- Strictness: m, Unfolding: (Data.Data.DataType Language.Fixpoint.Types.Environments.$fDataSEnv8 Language.Fixpoint.Types.Environments.$fDataSEnv6) -} ffb76b159b6efe14647ac6b5d8fb5f02 $tFzbslrEMRyVKDg48SEkL9E :: Data.Data.DataType {- Strictness: m, Unfolding: (Data.Data.DataType Language.Fixpoint.Types.Environments.$fDataIBindEnv10 Language.Fixpoint.Types.Environments.$fDataIBindEnv8) -} af911e980e9a9e38ae935e3e633ba6c5 $tc'Alts :: GHC.Types.TyCon {- HasNoCafRefs, Strictness: m, Unfolding: (GHC.Types.TyCon 18382222483900753889## 8370806742538303380## Language.Fixpoint.Types.Environments.$trModule Language.Fixpoint.Types.Environments.$tc'Alts1) -} 768d3bfa95ecace87a6615328857acf9 $tc'Alts1 :: GHC.Types.TrName {- HasNoCafRefs, Strictness: m1, Unfolding: (GHC.Types.TrNameS "'Alts"#) -} c72b96bc61010fb4a3991698c83fdfc4 $tc'BE :: GHC.Types.TyCon {- HasNoCafRefs, Strictness: m, Unfolding: (GHC.Types.TyCon 1732433167573489562## 5839571012246887198## Language.Fixpoint.Types.Environments.$trModule Language.Fixpoint.Types.Environments.$tc'BE1) -} 109888020555ef9fb9da702f3f6d2e05 $tc'BE1 :: GHC.Types.TrName {- HasNoCafRefs, Strictness: m1, Unfolding: (GHC.Types.TrNameS "'BE"#) -} 53b190449c0c821dc851a1a9518e1442 $tc'FB :: GHC.Types.TyCon {- HasNoCafRefs, Strictness: m, Unfolding: (GHC.Types.TyCon 7619711763400076099## 8832596686170440606## Language.Fixpoint.Types.Environments.$trModule Language.Fixpoint.Types.Environments.$tc'FB1) -} 2d6dcdef5dc20ee6b043557aa04979f5 $tc'FB1 :: GHC.Types.TrName {- HasNoCafRefs, Strictness: m1, Unfolding: (GHC.Types.TrNameS "'FB"#) -} f2b467a9df4d991dd131454b381465ee $tc'Found :: GHC.Types.TyCon {- HasNoCafRefs, Strictness: m, Unfolding: (GHC.Types.TyCon 6738265842690003738## 12717493402611055204## Language.Fixpoint.Types.Environments.$trModule Language.Fixpoint.Types.Environments.$tc'Found1) -} f387fd031ae08fde03e57f7a41badfea $tc'Found1 :: GHC.Types.TrName {- HasNoCafRefs, Strictness: m1, Unfolding: (GHC.Types.TrNameS "'Found"#) -} 8c219ba4f222c6862cec14ed7199e148 $tc'Packs :: GHC.Types.TyCon {- HasNoCafRefs, Strictness: m, Unfolding: (GHC.Types.TyCon 5544455519979633714## 6218628872042155140## Language.Fixpoint.Types.Environments.$trModule Language.Fixpoint.Types.Environments.$tc'Packs1) -} 1c5234bce5e500bab3047d9a6d9ac8f0 $tc'Packs1 :: GHC.Types.TrName {- HasNoCafRefs, Strictness: m1, Unfolding: (GHC.Types.TrNameS "'Packs"#) -} 66d399dad2a004a9e812051dac7635d4 $tc'SE :: GHC.Types.TyCon {- HasNoCafRefs, Strictness: m, Unfolding: (GHC.Types.TyCon 6301837620031861074## 12782329430255437217## Language.Fixpoint.Types.Environments.$trModule Language.Fixpoint.Types.Environments.$tc'SE1) -} ebe2ddbec8d914ad0029a827351bb6d2 $tc'SE1 :: GHC.Types.TrName {- HasNoCafRefs, Strictness: m1, Unfolding: (GHC.Types.TrNameS "'SE"#) -} 66a4acd1864135dd91e6c485918a31f9 $tc'SolEnv :: GHC.Types.TyCon {- HasNoCafRefs, Strictness: m, Unfolding: (GHC.Types.TyCon 4639621680110987254## 5648015105047357161## Language.Fixpoint.Types.Environments.$trModule Language.Fixpoint.Types.Environments.$tc'SolEnv1) -} 925e552c62df467184579dbd77f1d775 $tc'SolEnv1 :: GHC.Types.TrName {- HasNoCafRefs, Strictness: m1, Unfolding: (GHC.Types.TrNameS "'SolEnv"#) -} 955e90864314eaec3b100cb42d4efe3c $tcIBindEnv :: GHC.Types.TyCon {- HasNoCafRefs, Strictness: m, Unfolding: (GHC.Types.TyCon 16603441310162428276## 853371338253927225## Language.Fixpoint.Types.Environments.$trModule Language.Fixpoint.Types.Environments.$tcIBindEnv1) -} cb738d7c6555adc93f98efb60c727570 $tcIBindEnv1 :: GHC.Types.TrName {- HasNoCafRefs, Strictness: m1, Unfolding: (GHC.Types.TrNameS "IBindEnv"#) -} 68dba0196199aa24e070045506aab00e $tcPacks :: GHC.Types.TyCon {- HasNoCafRefs, Strictness: m, Unfolding: (GHC.Types.TyCon 8465122340844312201## 1298728764522222738## Language.Fixpoint.Types.Environments.$trModule Language.Fixpoint.Types.Environments.$tcPacks1) -} 3f04527882ea97ae725778932d0b2bdf $tcPacks1 :: GHC.Types.TrName {- HasNoCafRefs, Strictness: m1, Unfolding: (GHC.Types.TrNameS "Packs"#) -} 6d5a508a4907da3f32192becb15e42ed $tcSESearch :: GHC.Types.TyCon {- HasNoCafRefs, Strictness: m, Unfolding: (GHC.Types.TyCon 17552328154483258288## 10262403045258706292## Language.Fixpoint.Types.Environments.$trModule Language.Fixpoint.Types.Environments.$tcSESearch1) -} 58812dbaf5fbd804fb9d04258f63bd2c $tcSESearch1 :: GHC.Types.TrName {- HasNoCafRefs, Strictness: m1, Unfolding: (GHC.Types.TrNameS "SESearch"#) -} 1bdc9c2b9f4b6b88e21a46b1dcfe3616 $tcSEnv :: GHC.Types.TyCon {- HasNoCafRefs, Strictness: m, Unfolding: (GHC.Types.TyCon 435480431205523914## 7377899865707558582## Language.Fixpoint.Types.Environments.$trModule Language.Fixpoint.Types.Environments.$tcSEnv1) -} d20ace260743e99e16411837cda46098 $tcSEnv1 :: GHC.Types.TrName {- HasNoCafRefs, Strictness: m1, Unfolding: (GHC.Types.TrNameS "SEnv"#) -} bacde88d0d6ddad42a256efb1cdda488 $tcSizedEnv :: GHC.Types.TyCon {- HasNoCafRefs, Strictness: m, Unfolding: (GHC.Types.TyCon 3562623355459549620## 12363394527125191430## Language.Fixpoint.Types.Environments.$trModule Language.Fixpoint.Types.Environments.$tcSizedEnv1) -} f75fbe896a7b5e763ce7ece650ed5081 $tcSizedEnv1 :: GHC.Types.TrName {- HasNoCafRefs, Strictness: m1, Unfolding: (GHC.Types.TrNameS "SizedEnv"#) -} 603513460668f73ce7af1ee8a76729fa $tcSolEnv :: GHC.Types.TyCon {- HasNoCafRefs, Strictness: m, Unfolding: (GHC.Types.TyCon 9180170929148640060## 3167295311513007259## Language.Fixpoint.Types.Environments.$trModule Language.Fixpoint.Types.Environments.$tcSolEnv1) -} 5d109671f5b3500cc6bcea3fcf834a2d $tcSolEnv1 :: GHC.Types.TrName {- HasNoCafRefs, Strictness: m1, Unfolding: (GHC.Types.TrNameS "SolEnv"#) -} 41b8aa6e705304f9d839e0276f6552b7 $trModule :: GHC.Types.Module {- HasNoCafRefs, Strictness: m, Unfolding: (GHC.Types.Module Language.Fixpoint.Types.Environments.$trModule2 Language.Fixpoint.Types.Environments.$trModule1) -} 350f17eb69267ea524ef63283fa8640b $trModule1 :: GHC.Types.TrName {- HasNoCafRefs, Strictness: m1, Unfolding: (GHC.Types.TrNameS "Language.Fixpoint.Types.Environments"#) -} 3a24df98df4cd8646cab627753b99960 $trModule2 :: GHC.Types.TrName {- HasNoCafRefs, Strictness: m1, Unfolding: (GHC.Types.TrNameS "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf"#) -} 6b44f7f04368108031b9718e39c3c2be $w$cfmap :: (a -> b) -> GHC.Prim.Int# -> Language.Fixpoint.Types.Environments.BindMap a -> (# GHC.Prim.Int#, Language.Fixpoint.Types.Environments.BindMap b #) {- Arity: 3, Strictness: , Inline: [0] -} 8012fa7f82cee8f8165f937c673d1aa3 $w$cfold :: GHC.Base.Monoid m => Language.Fixpoint.Types.Environments.BindMap m -> m {- Arity: 2, HasNoCafRefs, Strictness: , Inline: [0], Unfolding: (\ @ m (w :: GHC.Base.Monoid m) (ww :: Language.Fixpoint.Types.Environments.BindMap m) -> Data.HashMap.Base.$fFoldableHashMap_$cfoldr @ GHC.Types.Int @ m @ m (let { f1 :: m -> m -> m = GHC.Base.mappend @ m w } in \ (x :: m) -> f1 x) (GHC.Base.mempty @ m w) ww) -} 632ac3df184c23fe035fa960e1020f04 $w$cfoldMap :: GHC.Base.Monoid m => (a -> m) -> Language.Fixpoint.Types.Environments.BindMap a -> m {- Arity: 3, HasNoCafRefs, Strictness: , Inline: [0], Unfolding: (\ @ m @ a (w :: GHC.Base.Monoid m) (w1 :: a -> m) (ww :: Language.Fixpoint.Types.Environments.BindMap a) -> Data.HashMap.Base.$fFoldableHashMap_$cfoldr @ GHC.Types.Int @ a @ m (let { f1 :: m -> m -> m = GHC.Base.mappend @ m w } in \ (x :: a) -> f1 (w1 x)) (GHC.Base.mempty @ m w) ww) -} 661d7f02630039d6953fff278f52a9e6 $w$cfoldl :: (b -> a -> b) -> b -> Language.Fixpoint.Types.Environments.BindMap a -> b {- Arity: 3, HasNoCafRefs, Strictness: , Inline: [0], Unfolding: (\ @ b @ a (w :: b -> a -> b) (w1 :: b) (ww :: Language.Fixpoint.Types.Environments.BindMap a) -> (Data.HashMap.Base.$fFoldableHashMap_$cfoldr @ GHC.Types.Int @ a @ (Data.Monoid.Dual (Data.Monoid.Endo b)) (\ (x :: a) (eta :: Data.Monoid.Dual (Data.Monoid.Endo b))[OneShot] (eta1 :: b) -> eta `cast` (Data.Monoid.N:Dual[0] (Data.Monoid.N:Endo[0] _R)) (w eta1 x)) `cast` (_R ->_R _R ->_R Sym (Data.Monoid.N:Dual[0] (Data.Monoid.N:Endo[0] _R))) (GHC.Base.id @ b) `cast` (Sym (Data.Monoid.N:Dual[0] (Data.Monoid.N:Endo[0] _R))) ww) `cast` (Data.Monoid.N:Dual[0] (Data.Monoid.N:Endo[0] _R)) w1) -} ed9ebd16bbf5537c2d43f50b228c1aa7 $w$cfoldl' :: (b -> a -> b) -> b -> Language.Fixpoint.Types.Environments.BindMap a -> b {- Arity: 3, HasNoCafRefs, Strictness: , Inline: [0], Unfolding: (\ @ b @ a (w :: b -> a -> b) (w1 :: b) (ww :: Language.Fixpoint.Types.Environments.BindMap a) -> Data.HashMap.Base.$fFoldableHashMap_$cfoldr @ GHC.Types.Int @ a @ (b -> b) (\ (x :: a) (k :: b -> b)[OneShot] (z :: b) -> case w z x of vx { DEFAULT -> k vx }) (GHC.Base.id @ b) ww w1) -} 8cb516dc054d563c69d2031f63407892 $w$cfoldl1 :: (a -> a -> a) -> Language.Fixpoint.Types.Environments.BindMap a -> a {- Arity: 2, Strictness: , Inline: [0], Unfolding: (\ @ a (w :: a -> a -> a) (ww :: Language.Fixpoint.Types.Environments.BindMap a) -> case (Data.HashMap.Base.$fFoldableHashMap_$cfoldr @ GHC.Types.Int @ a @ (Data.Monoid.Dual (Data.Monoid.Endo (GHC.Base.Maybe a))) (\ (x :: a) (eta :: Data.Monoid.Dual (Data.Monoid.Endo (GHC.Base.Maybe a)))[OneShot] (eta1 :: GHC.Base.Maybe a) -> eta `cast` (Data.Monoid.N:Dual[0] (Data.Monoid.N:Endo[0] _R)) (GHC.Base.Just @ a (case eta1 of wild { GHC.Base.Nothing -> x GHC.Base.Just x1 -> w x1 x }))) `cast` (_R ->_R _R ->_R Sym (Data.Monoid.N:Dual[0] (Data.Monoid.N:Endo[0] _R))) (GHC.Base.id @ (GHC.Base.Maybe a)) `cast` (Sym (Data.Monoid.N:Dual[0] (Data.Monoid.N:Endo[0] _R))) ww) `cast` (Data.Monoid.N:Dual[0] (Data.Monoid.N:Endo[0] _R)) (GHC.Base.Nothing @ a) of wild { GHC.Base.Nothing -> Language.Fixpoint.Types.Environments.$fFoldableSizedEnv7 @ a GHC.Base.Just v -> v }) -} cc5f5d0341a7ccd569eff3ed0c8965a5 $w$cfoldr' :: (a -> b -> b) -> b -> Language.Fixpoint.Types.Environments.BindMap a -> b {- Arity: 3, HasNoCafRefs, Strictness: , Inline: [0], Unfolding: (\ @ a @ b (w :: a -> b -> b) (w1 :: b) (ww :: Language.Fixpoint.Types.Environments.BindMap a) -> (Data.HashMap.Base.$fFoldableHashMap_$cfoldr @ GHC.Types.Int @ a @ (Data.Monoid.Dual (Data.Monoid.Endo (b -> b))) (\ (x :: a) (eta :: Data.Monoid.Dual (Data.Monoid.Endo (b -> b)))[OneShot] (eta1 :: b -> b) -> eta `cast` (Data.Monoid.N:Dual[0] (Data.Monoid.N:Endo[0] b>_R)) (\ (z :: b) -> case w x z of vx { DEFAULT -> eta1 vx })) `cast` (_R ->_R b))>_R ->_R Sym (Data.Monoid.N:Dual[0] (Data.Monoid.N:Endo[0] b>_R))) (GHC.Base.id @ (b -> b)) `cast` (Sym (Data.Monoid.N:Dual[0] (Data.Monoid.N:Endo[0] b>_R))) ww) `cast` (Data.Monoid.N:Dual[0] (Data.Monoid.N:Endo[0] b>_R)) (GHC.Base.id @ b) w1) -} 0c5acecf484131c846a8b46fe5d75fd3 $w$cfoldr1 :: (a -> a -> a) -> Language.Fixpoint.Types.Environments.BindMap a -> a {- Arity: 2, Strictness: , Inline: [0], Unfolding: (\ @ a (w :: a -> a -> a) (ww :: Language.Fixpoint.Types.Environments.BindMap a) -> case Data.HashMap.Base.$fFoldableHashMap_$cfoldr @ GHC.Types.Int @ 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 -> w x y })) (GHC.Base.Nothing @ a) ww of wild { GHC.Base.Nothing -> Language.Fixpoint.Types.Environments.$fFoldableSizedEnv8 @ a GHC.Base.Just v -> v }) -} 287acbd8808107ab82c6e60af57b2616 $w$cget :: (Data.Hashable.Class.Hashable a, GHC.Classes.Eq a, Data.Binary.Class.Binary a) => forall r. GHC.Prim.Addr# -> GHC.ForeignPtr.ForeignPtrContents -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.Binary.Get.Internal.Success (Data.HashSet.HashSet a) r -> Data.Binary.Get.Internal.Decoder r {- Arity: 8, Strictness: , Inline: [0], Unfolding: (\ @ a (w :: Data.Hashable.Class.Hashable a) (w1 :: GHC.Classes.Eq a) (w2 :: Data.Binary.Class.Binary a) @ r (ww :: GHC.Prim.Addr#) (ww1 :: GHC.ForeignPtr.ForeignPtrContents) (ww2 :: GHC.Prim.Int#) (ww3 :: GHC.Prim.Int#) (w3 :: Data.Binary.Get.Internal.Success (Data.HashSet.HashSet a) r) -> letrec { go6 :: [a] -> Data.HashMap.Base.HashMap a () -> Data.HashMap.Base.HashMap a () {- Arity: 2, Strictness: -} = \ (ds :: [a]) (eta :: Data.HashMap.Base.HashMap a ()) -> case ds of wild { [] -> eta : y ys -> go6 ys (Data.HashMap.Base.insert @ a @ () w1 w y GHC.Tuple.() eta) } } in Data.Binary.Class.$w$cget10 @ a w2 @ r ww ww1 ww2 ww3 (\ (i' :: Data.ByteString.Internal.ByteString) (a1 :: [a])[OneShot] -> w3 i' (go6 a1 (Data.HashMap.Base.Empty @ a @ ())) `cast` (Sym (Data.HashSet.N:HashSet[0] _N)))) -} dae79859b3442c211473f5cded0c14f7 $w$cget1 :: GHC.Prim.Addr# -> GHC.ForeignPtr.ForeignPtrContents -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.Binary.Get.Internal.Success Language.Fixpoint.Types.Environments.IBindEnv r -> Data.Binary.Get.Internal.Decoder r {- Arity: 5, Strictness: , Inline: [0], Unfolding: (\ @ r (ww :: GHC.Prim.Addr#) (ww1 :: GHC.ForeignPtr.ForeignPtrContents) (ww2 :: GHC.Prim.Int#) (ww3 :: GHC.Prim.Int#) (w :: Data.Binary.Get.Internal.Success Language.Fixpoint.Types.Environments.IBindEnv r) -> Data.Binary.Class.$w$cget10 @ GHC.Types.Int Data.Binary.Class.$fBinaryInt @ r ww ww1 ww2 ww3 (\ (i' :: Data.ByteString.Internal.ByteString) (a1 :: [GHC.Types.Int])[OneShot] -> w i' (Language.Fixpoint.Types.Environments.$fBinaryHashSet2 a1) `cast` (Trans (Sym (Data.HashSet.N:HashSet[0] _N)) (Sym (Language.Fixpoint.Types.Environments.N:IBindEnv[0]))))) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $w$cget2 :: GHC.Prim.Addr# -> GHC.ForeignPtr.ForeignPtrContents -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.Binary.Get.Internal.Success Language.Fixpoint.Types.Environments.BindEnv r -> Data.Binary.Get.Internal.Decoder r {- Arity: 5, Strictness: , Inline: [0], Unfolding: (\ @ r (ww :: GHC.Prim.Addr#) (ww1 :: GHC.ForeignPtr.ForeignPtrContents) (ww2 :: GHC.Prim.Int#) (ww3 :: GHC.Prim.Int#) (w :: Data.Binary.Get.Internal.Success Language.Fixpoint.Types.Environments.BindEnv r) -> Data.Binary.Class.$w$cget9 @ r ww ww1 ww2 ww3 (\ (i' :: Data.ByteString.Internal.ByteString) (a1 :: GHC.Types.Int)[OneShot] -> (Language.Fixpoint.Types.Refinements.$fBinaryHashMap_$cget @ GHC.Types.Int @ (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) Data.Hashable.Class.$fHashableInt GHC.Classes.$fEqInt Data.Binary.Class.$fBinaryInt Language.Fixpoint.Types.Environments.$fBinarySizedEnv_$s$fBinary(,)) `cast` (Data.Binary.Get.Internal.N:Get[0] _R) @ r i' (\ (i'1 :: Data.ByteString.Internal.ByteString) (a2 :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) -> w i'1 (Language.Fixpoint.Types.Environments.$WBE @ (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) a1 a2)))) -} 9bbda65106524ea8a4f79942f4e25dac $w$cmaximum :: GHC.Classes.Ord a => Language.Fixpoint.Types.Environments.BindMap a -> a {- Arity: 2, Strictness: , Inline: [0], Unfolding: (\ @ a (w :: GHC.Classes.Ord a) (ww :: Language.Fixpoint.Types.Environments.BindMap a) -> case (Data.HashMap.Base.$fFoldableHashMap_$cfoldr @ GHC.Types.Int @ a @ (Data.Foldable.Max a) (\ (x :: a) (eta :: Data.Foldable.Max a)[OneShot] -> case eta `cast` (Data.Foldable.N:Max[0] _N) of wild { GHC.Base.Nothing -> (GHC.Base.Just @ a x) `cast` (Sym (Data.Foldable.N:Max[0]) _N) GHC.Base.Just ipv -> case GHC.Classes.>= @ a w x ipv of wild2 { GHC.Types.False -> wild `cast` (Sym (Data.Foldable.N:Max[0]) _N) GHC.Types.True -> (GHC.Base.Just @ a x) `cast` (Sym (Data.Foldable.N:Max[0]) _N) } }) (GHC.Base.Nothing @ a) `cast` (Sym (Data.Foldable.N:Max[0]) _N) ww) `cast` (Data.Foldable.N:Max[0] _N) of wild { GHC.Base.Nothing -> Language.Fixpoint.Types.Environments.$fFoldableSizedEnv4 @ a GHC.Base.Just v -> v }) -} d54010112dadf0257fdbed13e3567af1 $w$cminimum :: GHC.Classes.Ord a => Language.Fixpoint.Types.Environments.BindMap a -> a {- Arity: 2, Strictness: , Inline: [0], Unfolding: (\ @ a (w :: GHC.Classes.Ord a) (ww :: Language.Fixpoint.Types.Environments.BindMap a) -> case (Data.HashMap.Base.$fFoldableHashMap_$cfoldr @ GHC.Types.Int @ a @ (Data.Foldable.Min a) (\ (x :: a) (eta :: Data.Foldable.Min a)[OneShot] -> case eta `cast` (Data.Foldable.N:Min[0] _N) of wild { GHC.Base.Nothing -> (GHC.Base.Just @ a x) `cast` (Sym (Data.Foldable.N:Min[0]) _N) GHC.Base.Just ipv -> case GHC.Classes.<= @ a w x ipv of wild2 { GHC.Types.False -> wild `cast` (Sym (Data.Foldable.N:Min[0]) _N) GHC.Types.True -> (GHC.Base.Just @ a x) `cast` (Sym (Data.Foldable.N:Min[0]) _N) } }) (GHC.Base.Nothing @ a) `cast` (Sym (Data.Foldable.N:Min[0]) _N) ww) `cast` (Data.Foldable.N:Min[0] _N) of wild { GHC.Base.Nothing -> Language.Fixpoint.Types.Environments.$fFoldableSizedEnv3 @ a GHC.Base.Just v -> v }) -} b4e6a811098fd76844a00b3cd1edcc8e $w$cproduct :: GHC.Num.Num a => Language.Fixpoint.Types.Environments.BindMap a -> Data.Monoid.Product a {- Arity: 2, HasNoCafRefs, Strictness: , Inline: [0], Unfolding: (\ @ a (w :: GHC.Num.Num a) (ww :: Language.Fixpoint.Types.Environments.BindMap a) -> Data.HashMap.Base.$fFoldableHashMap_$cfoldr @ GHC.Types.Int @ a @ (Data.Monoid.Product a) (let { f1 :: a -> a -> a = GHC.Num.* @ a w } in (\ (x :: a) -> f1 x) `cast` (_R ->_R Sym (Data.Monoid.N:Product[0] _R) ->_R Sym (Data.Monoid.N:Product[0] _R))) (Data.Monoid.$fMonoidProduct2 @ a w) `cast` (Sym (Data.Monoid.N:Product[0] _R)) ww) -} 804de34bece661df43592c676c20a3e6 $w$cput :: Data.Binary.Class.Binary a => Data.HashSet.HashSet a -> Data.Binary.Put.Put {- Arity: 2, HasNoCafRefs, Strictness: , Inline: [0], Unfolding: (\ @ a (w :: Data.Binary.Class.Binary a) (w1 :: Data.HashSet.HashSet a) -> Data.Binary.Class.putList @ a w (Language.Fixpoint.Types.Environments.$fBinaryHashSet7 @ a (GHC.Types.[] @ a) w1 `cast` (Data.HashSet.N:HashSet[0] _N))) -} 7c6be1a9855a405d36f96fc1aff1afb6 $w$cput1 :: GHC.Prim.Int# -> Language.Fixpoint.Types.Environments.BindMap (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) -> (# (), Data.ByteString.Builder.Internal.Builder #) {- Arity: 2, Strictness: , Inline: [0], Unfolding: (\ (ww :: GHC.Prim.Int#) (ww1 :: Language.Fixpoint.Types.Environments.BindMap (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) -> (# GHC.Tuple.(), let { ds1 :: Data.ByteString.Builder.Internal.Builder = case (Language.Fixpoint.Types.Environments.$fBinarySizedEnv_f (Language.Fixpoint.Types.Environments.$fBinarySizedEnv_go1 (GHC.Types.[] @ (GHC.Types.Int, (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft))) ww1)) `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.$w$cput1 (GHC.Types.I# ww) of ww2 { (#,#) ww3 ww4 -> ww4 } } in (\ @ r (eta :: 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 eta)) `cast` (Sym (Data.ByteString.Builder.Internal.N:Builder[0])) #)) -} 6bdcc0576724e3b1e8a692c37fc9ac78 $w$cshow :: GHC.Prim.Int# -> Language.Fixpoint.Types.Environments.BindMap (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) -> GHC.Base.String {- Arity: 2, Strictness: , Inline: [0], Unfolding: (\ (ww :: GHC.Prim.Int#) (ww1 :: Language.Fixpoint.Types.Environments.BindMap (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) -> GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Environments.$fShowSolEnv2 (GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Environments.$fShowSolEnv1 (Language.Fixpoint.Types.Environments.$w$s$cshowsPrec 0# ww ww1 Language.Fixpoint.Types.Environments.$fShowPacks4))) -} 999de3bcf4ed26dd71bfcb519acbd47a $w$cshowsPrec :: GHC.Prim.Int# -> Language.Fixpoint.Types.Environments.Packs -> GHC.Show.ShowS {- Arity: 2, Strictness: , Inline: [0], Unfolding: (\ (ww :: GHC.Prim.Int#) (w :: Language.Fixpoint.Types.Environments.Packs) -> let { f :: GHC.Base.String -> GHC.Base.String = Data.HashMap.Base.$w$cshowsPrec @ Language.Fixpoint.Types.Refinements.KVar @ GHC.Types.Int Language.Fixpoint.Types.Refinements.$fShowKVar GHC.Show.$fShowInt 0# w `cast` (Language.Fixpoint.Types.Environments.N:Packs[0]) } in let { p :: GHC.Show.ShowS {- Arity: 1, Strictness: -} = \ (x :: GHC.Base.String) -> GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Environments.$fShowPacks3 (GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Environments.$fShowPacks2 (f (GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Environments.$fShowPacks1 x))) } in case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.>=# ww 11#) of wild { GHC.Types.False -> p GHC.Types.True -> \ (x :: GHC.Base.String) -> GHC.Types.: @ GHC.Types.Char GHC.Show.shows7 (p (GHC.Types.: @ GHC.Types.Char GHC.Show.shows4 x)) }) -} 2eee542de3e0da5d9453935c5b4d1b18 $w$cshowsPrec1 :: GHC.Show.Show a => GHC.Prim.Int# -> GHC.Prim.Int# -> Language.Fixpoint.Types.Environments.BindMap a -> GHC.Show.ShowS {- Arity: 4, Strictness: , Inline: [0], Unfolding: (\ @ a (w :: GHC.Show.Show a) (ww :: GHC.Prim.Int#) (ww1 :: GHC.Prim.Int#) (ww2 :: Language.Fixpoint.Types.Environments.BindMap a) -> let { f :: GHC.Base.String -> GHC.Base.String = Data.HashMap.Base.$w$cshowsPrec @ GHC.Types.Int @ a GHC.Show.$fShowInt w 0# ww2 } in let { p :: GHC.Show.ShowS {- Arity: 1, Strictness: -} = \ (x :: GHC.Base.String) -> GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Environments.$fShowSizedEnv4 (GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Environments.$fShowSizedEnv3 (case GHC.Show.$wshowSignedInt 0# ww1 (GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Environments.$fShowSizedEnv2 (GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Environments.$fShowSizedEnv1 (f (GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Environments.$fShowPacks1 x)))) of ww4 { (#,#) ww5 ww6 -> GHC.Types.: @ GHC.Types.Char ww5 ww6 })) } in case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.>=# ww 11#) of wild { GHC.Types.False -> p GHC.Types.True -> \ (x :: GHC.Base.String) -> GHC.Types.: @ GHC.Types.Char GHC.Show.shows7 (p (GHC.Types.: @ GHC.Types.Char GHC.Show.shows4 x)) }) -} 3e4806967a6c31ff0ffa6153ca4e90fc $w$cshowsPrec2 :: GHC.Prim.Int# -> GHC.Prim.Int# -> Language.Fixpoint.Types.Environments.BindMap (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) -> GHC.Show.ShowS {- Arity: 3, Strictness: , Inline: [0], Unfolding: (\ (ww :: GHC.Prim.Int#) (ww1 :: GHC.Prim.Int#) (ww2 :: Language.Fixpoint.Types.Environments.BindMap (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) -> let { f :: GHC.Base.String -> GHC.Base.String = Language.Fixpoint.Types.Environments.$w$s$cshowsPrec 0# ww1 ww2 } in let { p :: GHC.Show.ShowS {- Arity: 1, Strictness: -} = \ (x :: GHC.Base.String) -> GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Environments.$fShowSolEnv2 (GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Environments.$fShowSolEnv1 (f (GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Environments.$fShowPacks1 x))) } in case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.>=# ww 11#) of wild { GHC.Types.False -> p GHC.Types.True -> \ (x :: GHC.Base.String) -> GHC.Types.: @ GHC.Types.Char GHC.Show.shows7 (p (GHC.Types.: @ GHC.Types.Char GHC.Show.shows4 x)) }) -} 84572a4677ca1f28b24d1404aa867d84 $w$csum :: GHC.Num.Num a => Language.Fixpoint.Types.Environments.BindMap a -> Data.Monoid.Sum a {- Arity: 2, HasNoCafRefs, Strictness: , Inline: [0], Unfolding: (\ @ a (w :: GHC.Num.Num a) (ww :: Language.Fixpoint.Types.Environments.BindMap a) -> Data.HashMap.Base.$fFoldableHashMap_$cfoldr @ GHC.Types.Int @ a @ (Data.Monoid.Sum a) (let { f1 :: a -> a -> a = GHC.Num.+ @ a w } in (\ (x :: a) -> f1 x) `cast` (_R ->_R Sym (Data.Monoid.N:Sum[0] _R) ->_R Sym (Data.Monoid.N:Sum[0] _R))) (Data.Monoid.$fMonoidSum2 @ a w) `cast` (Sym (Data.Monoid.N:Sum[0] _R)) ww) -} ae9741409aa049333ef008f3802cfecf $w$ctoFix :: Language.Fixpoint.Types.PrettyPrint.Fixpoint a => Language.Fixpoint.Types.Environments.SEnv a -> (# Text.PrettyPrint.Annotated.HughesPJ.Doc (), GHC.Types.Bool, Text.PrettyPrint.Annotated.HughesPJ.Doc () #) {- Arity: 2, Strictness: , Inline: [0], Unfolding: (\ @ a (w :: Language.Fixpoint.Types.PrettyPrint.Fixpoint a) (w1 :: Language.Fixpoint.Types.Environments.SEnv a) -> letrec { go6 :: [(Language.Fixpoint.Types.Names.Symbol, a)] -> [Text.PrettyPrint.Annotated.HughesPJ.Doc ()] {- Arity: 1, Strictness: -} = \ (ds :: [(Language.Fixpoint.Types.Names.Symbol, a)]) -> case ds of wild { [] -> GHC.Types.[] @ (Text.PrettyPrint.Annotated.HughesPJ.Doc ()) : y ys -> GHC.Types.: @ (Text.PrettyPrint.Annotated.HughesPJ.Doc ()) (case y of ww { (,) ww1 ww2 -> (Language.Fixpoint.Types.PrettyPrint.$w$ctoFix @ Language.Fixpoint.Types.Names.Symbol @ a Language.Fixpoint.Types.Names.$fFixpointSymbol w ww1 ww2) `cast` (Text.PrettyPrint.HughesPJ.N:Doc[0]) }) (go6 ys) } } in case Text.PrettyPrint.Annotated.HughesPJ.punctuate @ () Language.Fixpoint.Types.PrettyPrint.$fFixpointHashSet5 `cast` (Text.PrettyPrint.HughesPJ.N:Doc[0]) (go6 (Language.Fixpoint.Misc.hashMapToAscList @ Language.Fixpoint.Types.Names.Symbol @ a Language.Fixpoint.Types.Names.$fOrdSymbol w1 `cast` (Language.Fixpoint.Types.Environments.N:SEnv[0] _N))) of wild { [] -> (# Text.PrettyPrint.HughesPJ.brackets4, GHC.Types.False, Text.PrettyPrint.HughesPJ.brackets1 #) : p ps -> case Text.PrettyPrint.Annotated.HughesPJ.$wsep1 @ () GHC.Types.True (Text.PrettyPrint.Annotated.HughesPJ.reduceDoc @ () p) 0# ps of wild1 { DEFAULT -> (# Text.PrettyPrint.Annotated.HughesPJ.Beside @ () Text.PrettyPrint.HughesPJ.brackets4 GHC.Types.False wild1, GHC.Types.False, Text.PrettyPrint.HughesPJ.brackets1 #) Text.PrettyPrint.Annotated.HughesPJ.Empty -> (# Text.PrettyPrint.HughesPJ.brackets4, GHC.Types.False, Text.PrettyPrint.HughesPJ.brackets1 #) } }) -} 128de9c8f5b1808de81b8b72e49f4a07 $w$ctoFix1 :: Language.Fixpoint.Types.Environments.BindMap (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) -> Text.PrettyPrint.HughesPJ.Doc {- Arity: 1, Strictness: , Inline: [0], Unfolding: (\ (ww :: Language.Fixpoint.Types.Environments.BindMap (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) -> case Text.PrettyPrint.Annotated.HughesPJ.$wreduceVert @ () (Text.PrettyPrint.Annotated.HughesPJ.vcat1 @ () (Language.Fixpoint.Types.Environments.$fFixpointSizedEnv_go (Language.Fixpoint.Misc.hashMapToAscList @ Language.Fixpoint.Types.Environments.BindId @ (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) GHC.Classes.$fOrdInt ww))) of ww1 { (#,#) ww2 ww3 -> ww3 `cast` (Sym (Text.PrettyPrint.HughesPJ.N:Doc[0])) }) -} 792d9eaa5d5c1843c39b7b64e5cd1dac $w$ctraverse :: GHC.Base.Applicative f => (a -> f b) -> GHC.Prim.Int# -> Language.Fixpoint.Types.Environments.BindMap a -> f (Language.Fixpoint.Types.Environments.SizedEnv b) {- Arity: 4, Strictness: , Inline: [0], Unfolding: (\ @ (f :: * -> *) @ a @ b (w :: GHC.Base.Applicative f) (w1 :: a -> f b) (ww :: GHC.Prim.Int#) (ww1 :: Language.Fixpoint.Types.Environments.BindMap a) -> GHC.Base.fmap @ f (GHC.Base.$p1Applicative @ f w) @ (Language.Fixpoint.Types.Environments.BindMap b) @ (Language.Fixpoint.Types.Environments.SizedEnv b) (\ (b2 :: Language.Fixpoint.Types.Environments.BindMap b) -> case b2 of dt { DEFAULT -> Language.Fixpoint.Types.Environments.BE @ b ww dt }) (Data.HashMap.Base.$fTraversableHashMap_$ctraverse @ GHC.Types.Int @ f @ a @ b w w1 ww1)) -} a73bf8f0110055fa2f951da0b0e9e749 $w$s$cput :: Data.HashSet.HashSet GHC.Types.Int -> (# (), Data.ByteString.Builder.Internal.Builder #) {- Arity: 1, HasNoCafRefs, Strictness: , Inline: [0], Unfolding: (\ (w :: Data.HashSet.HashSet GHC.Types.Int) -> (# GHC.Tuple.(), let { xs :: [GHC.Types.Int] = Language.Fixpoint.Types.Environments.$fBinaryHashSet_go1 (GHC.Types.[] @ GHC.Types.Int) w `cast` (Data.HashSet.N:HashSet[0] _N) } in let { ds :: Data.ByteString.Builder.Internal.Builder = case Data.Binary.Class.$w$cput1 (case GHC.List.$wlenAcc @ GHC.Types.Int xs 0# of ww2 { DEFAULT -> GHC.Types.I# ww2 }) of ww { (#,#) ww1 ww2 -> ww2 } } in let { ds1 :: [GHC.Int.Int64] = GHC.Base.map @ GHC.Types.Int @ GHC.Int.Int64 Language.Fixpoint.Types.Environments.$fBinaryHashSet5 xs } in (\ @ r (eta :: Data.ByteString.Builder.Internal.BuildStep r) -> ds `cast` (Data.ByteString.Builder.Internal.N:Builder[0]) @ r (Language.Fixpoint.Types.Environments.$fBinaryHashSet4 @ r ds1 eta) `cast` (_R ->_R Sym (GHC.Types.N:IO[0] _R))) `cast` (Sym (Data.ByteString.Builder.Internal.N:Builder[0])) #)) -} e4a6aa6d551351c13eaa38e285aac243 $w$s$cshowsPrec :: GHC.Prim.Int# -> GHC.Prim.Int# -> Language.Fixpoint.Types.Environments.BindMap (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) -> GHC.Show.ShowS {- Arity: 3, Strictness: , Inline: [0], Unfolding: (\ (ww :: GHC.Prim.Int#) (ww1 :: GHC.Prim.Int#) (ww2 :: Language.Fixpoint.Types.Environments.BindMap (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) -> let { f :: GHC.Base.String -> GHC.Base.String = Data.HashMap.Base.$w$cshowsPrec @ GHC.Types.Int @ (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) GHC.Show.$fShowInt Language.Fixpoint.Types.Environments.$fShowSizedEnv_$s$fShow(,) 0# ww2 } in let { p :: GHC.Show.ShowS {- Arity: 1, Strictness: -} = \ (x :: GHC.Base.String) -> GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Environments.$fShowSizedEnv4 (GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Environments.$fShowSizedEnv3 (case GHC.Show.$wshowSignedInt 0# ww1 (GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Environments.$fShowSizedEnv2 (GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Environments.$fShowSizedEnv1 (f (GHC.Base.++ @ GHC.Types.Char Language.Fixpoint.Types.Environments.$fShowPacks1 x)))) of ww4 { (#,#) ww5 ww6 -> GHC.Types.: @ GHC.Types.Char ww5 ww6 })) } in case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.>=# ww 11#) of wild { GHC.Types.False -> p GHC.Types.True -> \ (x :: GHC.Base.String) -> GHC.Types.: @ GHC.Types.Char GHC.Show.shows7 (p (GHC.Types.: @ GHC.Types.Char GHC.Show.shows4 x)) }) -} e382e8794b0eca45e6458027eb35be96 $w$s$wupdateOrSnocWithKey :: (Language.Fixpoint.Types.Names.Symbol -> v -> v -> v) -> GHC.Prim.Int# -> Data.Text.Internal.Text -> Data.Text.Internal.Text -> v -> GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Names.Symbol v) -> GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Names.Symbol v) {- Arity: 6, Strictness: , Inline: [0], Unfolding: (\ @ v (w :: Language.Fixpoint.Types.Names.Symbol -> v -> v -> v) (ww :: GHC.Prim.Int#) (ww1 :: Data.Text.Internal.Text) (ww2 :: Data.Text.Internal.Text) (w1 :: v) (w2 :: GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Names.Symbol v)) -> letrec { $wgo22 :: GHC.Prim.Int# -> Data.Text.Internal.Text -> Data.Text.Internal.Text -> v -> GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Names.Symbol v) -> GHC.Prim.Int# -> GHC.Prim.Int# -> GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Names.Symbol v) {- Arity: 7, Strictness: , Inline: [0] -} = \ (ww3 :: GHC.Prim.Int#) (ww4 :: Data.Text.Internal.Text) (ww5 :: Data.Text.Internal.Text) (w3 :: v) (ww6 :: GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Names.Symbol v)) (ww7 :: GHC.Prim.Int#) (ww8 :: GHC.Prim.Int#) -> let { k2 :: Language.Fixpoint.Types.Names.Symbol = Language.Fixpoint.Types.Names.S ww3 ww4 ww5 } in case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.>=# ww7 ww8) of wild { GHC.Types.False -> case GHC.Prim.indexArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Names.Symbol v) ww6 ww7 of ds { Unit# ipv3 -> case ipv3 of wild1 { Data.HashMap.Base.L kx y -> case kx of wild2 { Language.Fixpoint.Types.Names.S dt1 ds4 ds5 -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww3 dt1) of wild3 { GHC.Types.False -> $wgo22 ww3 ww4 ww5 w3 ww6 (GHC.Prim.+# ww7 1#) ww8 GHC.Types.True -> case GHC.Prim.thawArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Names.Symbol v) @ GHC.Prim.RealWorld ww6 0# (GHC.Prim.sizeofArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Names.Symbol v) ww6) GHC.Prim.realWorld# of ds1 { (#,#) ipv4 ipv5 -> case GHC.Prim.writeArray# @ GHC.Prim.RealWorld @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Names.Symbol v) ipv5 ww7 (Data.HashMap.Base.L @ Language.Fixpoint.Types.Names.Symbol @ v k2 (w k2 w3 y)) ipv4 of s' { DEFAULT -> case GHC.Prim.unsafeFreezeArray# @ GHC.Prim.RealWorld @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Names.Symbol v) ipv5 s' of ds2 { (#,#) ipv6 ipv7 -> ipv7 } } } } } } } GHC.Types.True -> case GHC.Prim.newArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Names.Symbol v) @ GHC.Prim.RealWorld (GHC.Prim.+# ww8 1#) (Data.HashMap.Array.undefinedElem @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Names.Symbol v)) GHC.Prim.realWorld# of ds { (#,#) ipv3 ipv4 -> case GHC.Prim.copyArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Names.Symbol v) @ GHC.Prim.RealWorld ww6 0# ipv4 0# ww8 ipv3 of s3 { DEFAULT -> case GHC.Prim.writeArray# @ GHC.Prim.RealWorld @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Names.Symbol v) ipv4 ww8 (Data.HashMap.Base.L @ Language.Fixpoint.Types.Names.Symbol @ v k2 w3) s3 of s' { DEFAULT -> case GHC.Prim.unsafeFreezeArray# @ GHC.Prim.RealWorld @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Names.Symbol v) ipv4 s' of ds1 { (#,#) ipv5 ipv6 -> ipv6 } } } } } } in $wgo22 ww ww1 ww2 w1 w2 0# (GHC.Prim.sizeofArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Names.Symbol v) w2)) -} d64dbd7fee155500121fd714dffae854 $w$s$wupdateOrSnocWithKey1 :: (Language.Fixpoint.Types.Refinements.KVar -> v -> v -> v) -> GHC.Prim.Int# -> Data.Text.Internal.Text -> Data.Text.Internal.Text -> v -> GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v) -> GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v) {- Arity: 6, Strictness: , Inline: [0], Unfolding: (\ @ v (w :: Language.Fixpoint.Types.Refinements.KVar -> v -> v -> v) (ww :: GHC.Prim.Int#) (ww1 :: Data.Text.Internal.Text) (ww2 :: Data.Text.Internal.Text) (w1 :: v) (w2 :: GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v)) -> letrec { $wgo22 :: GHC.Prim.Int# -> Data.Text.Internal.Text -> Data.Text.Internal.Text -> v -> GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v) -> GHC.Prim.Int# -> GHC.Prim.Int# -> GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v) {- Arity: 7, Strictness: , Inline: [0] -} = \ (ww3 :: GHC.Prim.Int#) (ww4 :: Data.Text.Internal.Text) (ww5 :: Data.Text.Internal.Text) (w3 :: v) (ww6 :: GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v)) (ww7 :: GHC.Prim.Int#) (ww8 :: GHC.Prim.Int#) -> let { nt :: Language.Fixpoint.Types.Names.Symbol = Language.Fixpoint.Types.Names.S ww3 ww4 ww5 } in case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.>=# ww7 ww8) of wild { GHC.Types.False -> case GHC.Prim.indexArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v) ww6 ww7 of ds { Unit# ipv3 -> case ipv3 of wild1 { Data.HashMap.Base.L kx y -> case kx `cast` (Language.Fixpoint.Types.Refinements.N:KVar[0]) of wild2 { Language.Fixpoint.Types.Names.S dt1 ds4 ds5 -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww3 dt1) of wild3 { GHC.Types.False -> $wgo22 ww3 ww4 ww5 w3 ww6 (GHC.Prim.+# ww7 1#) ww8 GHC.Types.True -> case GHC.Prim.thawArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v) @ GHC.Prim.RealWorld ww6 0# (GHC.Prim.sizeofArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v) ww6) GHC.Prim.realWorld# of ds1 { (#,#) ipv4 ipv5 -> case GHC.Prim.writeArray# @ GHC.Prim.RealWorld @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v) ipv5 ww7 (Data.HashMap.Base.L @ Language.Fixpoint.Types.Refinements.KVar @ v nt `cast` (Sym (Language.Fixpoint.Types.Refinements.N:KVar[0])) (w nt `cast` (Sym (Language.Fixpoint.Types.Refinements.N:KVar[0])) w3 y)) ipv4 of s' { DEFAULT -> case GHC.Prim.unsafeFreezeArray# @ GHC.Prim.RealWorld @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v) ipv5 s' of ds2 { (#,#) ipv6 ipv7 -> ipv7 } } } } } } } GHC.Types.True -> case GHC.Prim.newArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v) @ GHC.Prim.RealWorld (GHC.Prim.+# ww8 1#) (Data.HashMap.Array.undefinedElem @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v)) GHC.Prim.realWorld# of ds { (#,#) ipv3 ipv4 -> case GHC.Prim.copyArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v) @ GHC.Prim.RealWorld ww6 0# ipv4 0# ww8 ipv3 of s3 { DEFAULT -> case GHC.Prim.writeArray# @ GHC.Prim.RealWorld @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v) ipv4 ww8 (Data.HashMap.Base.L @ Language.Fixpoint.Types.Refinements.KVar @ v nt `cast` (Sym (Language.Fixpoint.Types.Refinements.N:KVar[0])) w3) s3 of s' { DEFAULT -> case GHC.Prim.unsafeFreezeArray# @ GHC.Prim.RealWorld @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v) ipv4 s' of ds1 { (#,#) ipv5 ipv6 -> ipv6 } } } } } } in $wgo22 ww ww1 ww2 w1 w2 0# (GHC.Prim.sizeofArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v) w2)) -} f91e3616cfa586983ba6ac3ba9367277 $w$s$wupdateOrSnocWithKey2 :: (Language.Fixpoint.Types.Environments.BindId -> v -> v -> v) -> GHC.Prim.Int# -> v -> GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) -> GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) {- Arity: 4, Strictness: , Inline: [0], Unfolding: (\ @ v (w :: Language.Fixpoint.Types.Environments.BindId -> v -> v -> v) (ww :: GHC.Prim.Int#) (w1 :: v) (w2 :: GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v)) -> letrec { $wgo22 :: GHC.Prim.Int# -> v -> GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) -> GHC.Prim.Int# -> GHC.Prim.Int# -> GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) {- Arity: 5, Strictness: , Inline: [0] -} = \ (ww1 :: GHC.Prim.Int#) (w3 :: v) (ww2 :: GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v)) (ww3 :: GHC.Prim.Int#) (ww4 :: GHC.Prim.Int#) -> let { k2 :: Language.Fixpoint.Types.Environments.BindId = GHC.Types.I# ww1 } in case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.>=# ww3 ww4) of wild { GHC.Types.False -> case GHC.Prim.indexArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) ww2 ww3 of ds { Unit# ipv3 -> case ipv3 of wild1 { Data.HashMap.Base.L kx y -> case kx of wild2 { GHC.Types.I# y1 -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww1 y1) of wild3 { GHC.Types.False -> $wgo22 ww1 w3 ww2 (GHC.Prim.+# ww3 1#) ww4 GHC.Types.True -> case GHC.Prim.thawArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) @ GHC.Prim.RealWorld ww2 0# (GHC.Prim.sizeofArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) ww2) GHC.Prim.realWorld# of ds1 { (#,#) ipv4 ipv5 -> case GHC.Prim.writeArray# @ GHC.Prim.RealWorld @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) ipv5 ww3 (Data.HashMap.Base.L @ Language.Fixpoint.Types.Environments.BindId @ v k2 (w k2 w3 y)) ipv4 of s' { DEFAULT -> case GHC.Prim.unsafeFreezeArray# @ GHC.Prim.RealWorld @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) ipv5 s' of ds2 { (#,#) ipv6 ipv7 -> ipv7 } } } } } } } GHC.Types.True -> case GHC.Prim.newArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) @ GHC.Prim.RealWorld (GHC.Prim.+# ww4 1#) (Data.HashMap.Array.undefinedElem @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v)) GHC.Prim.realWorld# of ds { (#,#) ipv3 ipv4 -> case GHC.Prim.copyArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) @ GHC.Prim.RealWorld ww2 0# ipv4 0# ww4 ipv3 of s3 { DEFAULT -> case GHC.Prim.writeArray# @ GHC.Prim.RealWorld @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) ipv4 ww4 (Data.HashMap.Base.L @ Language.Fixpoint.Types.Environments.BindId @ v k2 w3) s3 of s' { DEFAULT -> case GHC.Prim.unsafeFreezeArray# @ GHC.Prim.RealWorld @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) ipv4 s' of ds1 { (#,#) ipv5 ipv6 -> ipv6 } } } } } } in $wgo22 ww w1 w2 0# (GHC.Prim.sizeofArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) w2)) -} b3c38bc429458f34d4b1e70f8215af3b $w$s$wupdateWith :: (v -> v) -> GHC.Prim.Int# -> GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) -> GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) {- Arity: 3, HasNoCafRefs, Strictness: , Inline: [0], Unfolding: (\ @ v (w :: v -> v) (ww :: GHC.Prim.Int#) (w1 :: GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v)) -> letrec { $wgo22 :: GHC.Prim.Int# -> GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) -> GHC.Prim.Int# -> GHC.Prim.Int# -> GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) {- Arity: 4, Strictness: , Inline: [0] -} = \ (ww1 :: GHC.Prim.Int#) (ww2 :: GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v)) (ww3 :: GHC.Prim.Int#) (ww4 :: GHC.Prim.Int#) -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.>=# ww3 ww4) of wild { GHC.Types.False -> case GHC.Prim.indexArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) ww2 ww3 of ds { Unit# ipv3 -> case ipv3 of wild1 { Data.HashMap.Base.L kx y -> case kx of wild2 { GHC.Types.I# y1 -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# ww1 y1) of wild3 { GHC.Types.False -> $wgo22 ww1 ww2 (GHC.Prim.+# ww3 1#) ww4 GHC.Types.True -> case w y of v' { DEFAULT -> case GHC.Prim.thawArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) @ GHC.Prim.RealWorld ww2 0# (GHC.Prim.sizeofArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) ww2) GHC.Prim.realWorld# of ds1 { (#,#) ipv4 ipv5 -> case GHC.Prim.writeArray# @ GHC.Prim.RealWorld @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) ipv5 ww3 (Data.HashMap.Base.L @ Language.Fixpoint.Types.Environments.BindId @ v (GHC.Types.I# ww1) v') ipv4 of s' { DEFAULT -> case GHC.Prim.unsafeFreezeArray# @ GHC.Prim.RealWorld @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) ipv5 s' of ds2 { (#,#) ipv6 ipv7 -> ipv7 } } } } } } } } GHC.Types.True -> ww2 } } in $wgo22 ww w1 0# (GHC.Prim.sizeofArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) w1)) -} b094d0012549f821cdfbdbaf2ae6b524 $w$sadjust :: (v -> v) -> GHC.Prim.Int# -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId v -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId v {- Arity: 3, HasNoCafRefs, Strictness: , Inline: [0], Unfolding: (\ @ v (w :: v -> v) (ww :: GHC.Prim.Int#) (w1 :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId v) -> letrec { $wgo22 :: GHC.Prim.Word# -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId v -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId v {- Arity: 4, Strictness: , Inline: [0] -} = \ (ww1 :: GHC.Prim.Word#) (ww2 :: GHC.Prim.Int#) (ww3 :: GHC.Prim.Int#) (w2 :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId v) -> case w2 of wild { Data.HashMap.Base.Empty -> Data.HashMap.Base.Empty @ Language.Fixpoint.Types.Environments.BindId @ v Data.HashMap.Base.BitmapIndexed dt dt1 -> let { m :: GHC.Prim.Word# = GHC.Prim.uncheckedShiftL# 1## (GHC.Prim.word2Int# (GHC.Prim.and# (GHC.Prim.uncheckedShiftRL# ww1 ww3) 15##)) } in case GHC.Prim.and# dt m of wild1 { DEFAULT -> let { i :: GHC.Prim.Int# = GHC.Prim.word2Int# (GHC.Prim.popCnt# (GHC.Prim.and# dt (GHC.Prim.minusWord# m 1##))) } in case GHC.Prim.indexArray# @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId v) dt1 i of ds7 { Unit# ipv2 -> case $wgo22 ww1 ww2 (GHC.Prim.+# ww3 4#) ipv2 of vx { DEFAULT -> case GHC.Prim.thawArray# @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId v) @ GHC.Prim.RealWorld dt1 0# (GHC.Prim.sizeofArray# @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId v) dt1) GHC.Prim.realWorld# of ds { (#,#) ipv1 ipv4 -> case GHC.Prim.writeArray# @ GHC.Prim.RealWorld @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId v) ipv4 i vx ipv1 of s' { DEFAULT -> case GHC.Prim.unsafeFreezeArray# @ GHC.Prim.RealWorld @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId v) ipv4 s' of ds1 { (#,#) ipv3 ipv5 -> Data.HashMap.Base.BitmapIndexed @ Language.Fixpoint.Types.Environments.BindId @ v dt ipv5 } } } } } 0## -> wild } Data.HashMap.Base.Leaf dt dt1 dt2 -> case dt1 of wild1 { GHC.Types.I# x -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.eqWord# dt ww1) of wild2 { GHC.Types.False -> wild GHC.Types.True -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# x ww2) of wild3 { GHC.Types.False -> wild GHC.Types.True -> case w dt2 of v1 { DEFAULT -> Data.HashMap.Base.Leaf @ Language.Fixpoint.Types.Environments.BindId @ v ww1 (GHC.Types.I# ww2) v1 } } } } Data.HashMap.Base.Full dt -> let { i :: GHC.Prim.Int# = GHC.Prim.word2Int# (GHC.Prim.and# (GHC.Prim.uncheckedShiftRL# ww1 ww3) 15##) } in case GHC.Prim.indexArray# @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId v) dt i of ds7 { Unit# ipv2 -> case $wgo22 ww1 ww2 (GHC.Prim.+# ww3 4#) ipv2 of vx { DEFAULT -> case GHC.Prim.thawArray# @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId v) @ GHC.Prim.RealWorld dt 0# 16# GHC.Prim.realWorld# of ds { (#,#) ipv1 ipv4 -> case GHC.Prim.writeArray# @ GHC.Prim.RealWorld @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId v) ipv4 i vx ipv1 of s' { DEFAULT -> case GHC.Prim.unsafeFreezeArray# @ GHC.Prim.RealWorld @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId v) ipv4 s' of ds1 { (#,#) ipv5 ipv3 -> Data.HashMap.Base.Full @ Language.Fixpoint.Types.Environments.BindId @ v ipv3 } } } } } Data.HashMap.Base.Collision dt dt1 -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.eqWord# ww1 dt) of wild1 { GHC.Types.False -> wild GHC.Types.True -> case Language.Fixpoint.Types.Environments.$w$s$wupdateWith @ v w ww2 dt1 of ww4 { DEFAULT -> Data.HashMap.Base.Collision @ Language.Fixpoint.Types.Environments.BindId @ v ww1 ww4 } } } } in $wgo22 (GHC.Prim.int2Word# ww) ww 0# w1) -} 831827026513ab92d150de4ec6b914bd $w$sinsert :: GHC.Prim.Int# -> GHC.Prim.ByteArray# -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.Text.Internal.Text -> v -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol v -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol v {- Arity: 7, Strictness: , Inline: [0], Unfolding: (\ @ v (ww :: GHC.Prim.Int#) (ww1 :: GHC.Prim.ByteArray#) (ww2 :: GHC.Prim.Int#) (ww3 :: GHC.Prim.Int#) (ww4 :: Data.Text.Internal.Text) (w :: v) (w1 :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol v) -> case {__pkg_ccall hashable-1.2.6.0@hashable-1.2.6.0-3EXxoqeEgbfAKr6aGkye6x hashable_fnv_hash_offset GHC.Prim.ByteArray# -> GHC.Prim.Int# -> GHC.Prim.Int# -> GHC.Prim.Int# -> GHC.Prim.State# GHC.Prim.RealWorld -> (# GHC.Prim.State# GHC.Prim.RealWorld, GHC.Prim.Int# #)} ww1 (GHC.Prim.uncheckedIShiftL# ww2 1#) (GHC.Prim.uncheckedIShiftL# ww3 1#) -2578643520546668380# GHC.Prim.realWorld# of wild1 { (#,#) ds1 ds2 -> Language.Fixpoint.Types.Environments.$wpoly_go9 @ v (GHC.Prim.int2Word# ds2) ww (Data.Text.Internal.Text ww1 ww2 ww3) ww4 w 0# w1 }) -} 724cae1e644dca61ee25591f60ab06e2 $w$slookup :: GHC.Prim.Int# -> GHC.Prim.ByteArray# -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar v -> GHC.Base.Maybe v {- Arity: 5, HasNoCafRefs, Strictness: , Inline: [0], Unfolding: (\ @ v (ww :: GHC.Prim.Int#) (ww1 :: GHC.Prim.ByteArray#) (ww2 :: GHC.Prim.Int#) (ww3 :: GHC.Prim.Int#) (w :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar v) -> case {__pkg_ccall hashable-1.2.6.0@hashable-1.2.6.0-3EXxoqeEgbfAKr6aGkye6x hashable_fnv_hash_offset GHC.Prim.ByteArray# -> GHC.Prim.Int# -> GHC.Prim.Int# -> GHC.Prim.Int# -> GHC.Prim.State# GHC.Prim.RealWorld -> (# GHC.Prim.State# GHC.Prim.RealWorld, GHC.Prim.Int# #)} ww1 (GHC.Prim.uncheckedIShiftL# ww2 1#) (GHC.Prim.uncheckedIShiftL# ww3 1#) -2578643520546668380# GHC.Prim.realWorld# of wild1 { (#,#) ds1 ds2 -> Language.Fixpoint.Types.Environments.$wpoly_go11 @ v (GHC.Prim.int2Word# ds2) ww 0# w }) -} 2a834c58174e7de2e97c84228910636b $w$slookup1 :: GHC.Prim.Int# -> GHC.Prim.ByteArray# -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol v -> GHC.Base.Maybe v {- Arity: 5, HasNoCafRefs, Strictness: , Inline: [0], Unfolding: (\ @ v (ww :: GHC.Prim.Int#) (ww1 :: GHC.Prim.ByteArray#) (ww2 :: GHC.Prim.Int#) (ww3 :: GHC.Prim.Int#) (w :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol v) -> case {__pkg_ccall hashable-1.2.6.0@hashable-1.2.6.0-3EXxoqeEgbfAKr6aGkye6x hashable_fnv_hash_offset GHC.Prim.ByteArray# -> GHC.Prim.Int# -> GHC.Prim.Int# -> GHC.Prim.Int# -> GHC.Prim.State# GHC.Prim.RealWorld -> (# GHC.Prim.State# GHC.Prim.RealWorld, GHC.Prim.Int# #)} ww1 (GHC.Prim.uncheckedIShiftL# ww2 1#) (GHC.Prim.uncheckedIShiftL# ww3 1#) -2578643520546668380# GHC.Prim.realWorld# of wild1 { (#,#) ds1 ds2 -> Language.Fixpoint.Types.Environments.$wpoly_go12 @ v (GHC.Prim.int2Word# ds2) ww 0# w }) -} 784b43745a721eb2b260fc739e498519 $w$sunsafeInsert :: GHC.Prim.Int# -> GHC.Prim.ByteArray# -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.Text.Internal.Text -> v -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar v -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar v {- Arity: 7, Strictness: , Inline: [0], Unfolding: (\ @ v (ww :: GHC.Prim.Int#) (ww1 :: GHC.Prim.ByteArray#) (ww2 :: GHC.Prim.Int#) (ww3 :: GHC.Prim.Int#) (ww4 :: Data.Text.Internal.Text) (w :: v) (w1 :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar v) -> case {__pkg_ccall hashable-1.2.6.0@hashable-1.2.6.0-3EXxoqeEgbfAKr6aGkye6x hashable_fnv_hash_offset GHC.Prim.ByteArray# -> GHC.Prim.Int# -> GHC.Prim.Int# -> GHC.Prim.Int# -> GHC.Prim.State# GHC.Prim.RealWorld -> (# GHC.Prim.State# GHC.Prim.RealWorld, GHC.Prim.Int# #)} ww1 (GHC.Prim.uncheckedIShiftL# ww2 1#) (GHC.Prim.uncheckedIShiftL# ww3 1#) -2578643520546668380# GHC.Prim.realWorld# of wild1 { (#,#) ds1 ds2 -> case Language.Fixpoint.Types.Environments.$wpoly_go14 @ GHC.Prim.RealWorld @ v (GHC.Prim.int2Word# ds2) ww (Data.Text.Internal.Text ww1 ww2 ww3) ww4 w 0# w1 GHC.Prim.realWorld# of ds { (#,#) ipv ipv1 -> ipv1 } }) -} 7176aae69fb168d352acb866985038a9 $wfilterBindEnv :: (Language.Fixpoint.Types.Environments.BindId -> Language.Fixpoint.Types.Names.Symbol -> Language.Fixpoint.Types.Refinements.SortedReft -> GHC.Types.Bool) -> GHC.Prim.Int# -> Language.Fixpoint.Types.Environments.BindMap (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) -> (# GHC.Prim.Int#, Language.Fixpoint.Types.Environments.BindMap (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) #) {- Arity: 3, Strictness: , Inline: [0] -} 792d9eaa5d5c1843c39b7b64e5cd1dac $wgo :: [Language.Fixpoint.Types.Environments.BindEnv] -> (# GHC.Prim.Int#, Language.Fixpoint.Types.Environments.BindMap (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) #) {- Arity: 1, Strictness: , Inline: [0] -} aad194ccf54a3c3aa0e44df16a9ba32e $wgo1 :: Data.HashMap.Array.Array (GHC.Base.Maybe GHC.Types.Int) -> GHC.Prim.Int# -> GHC.Prim.Int# -> GHC.Prim.Int# -> GHC.Prim.Int# {- Arity: 4, HasNoCafRefs, Strictness: , Inline: [0] -} e11aa570ad28b61cddce6a36e16eeeb6 $wgo2 :: Data.HashMap.Array.Array (GHC.Base.Maybe GHC.Types.Int) -> GHC.Prim.Int# -> GHC.Prim.Int# -> GHC.Prim.Int# -> GHC.Prim.Int# {- Arity: 4, HasNoCafRefs, Strictness: , Inline: [0] -} 9bb2a78c3b092522e16e42bbe1e48400 $wgo3 :: Data.HashMap.Array.Array (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) -> GHC.Prim.Int# -> GHC.Prim.Int# -> [(Language.Fixpoint.Types.Environments.BindId, Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)] -> [(Language.Fixpoint.Types.Environments.BindId, Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)] {- Arity: 4, HasNoCafRefs, Strictness: , Inline: [0] -} 1b4f875f02f3b53e2a41e2757fd46550 $wgo4 :: Data.HashMap.Array.Array (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) -> GHC.Prim.Int# -> GHC.Prim.Int# -> [(Language.Fixpoint.Types.Environments.BindId, Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)] -> [(Language.Fixpoint.Types.Environments.BindId, Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)] {- Arity: 4, HasNoCafRefs, Strictness: , Inline: [0] -} 1634e322dfd74f963cebcba76d2f51e1 $wgo5 :: Data.HashMap.Array.Array (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) -> GHC.Prim.Int# -> GHC.Prim.Int# -> [(Language.Fixpoint.Types.Environments.BindId, Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)] -> [(Language.Fixpoint.Types.Environments.BindId, Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)] {- Arity: 4, HasNoCafRefs, Strictness: , Inline: [0] -} 4091db26fc0f538f559935d8cb9b29f7 $wlookupSEnvWithDistance :: GHC.Prim.Int# -> GHC.Prim.ByteArray# -> GHC.Prim.Int# -> GHC.Prim.Int# -> Language.Fixpoint.Types.Environments.SEnv a -> Language.Fixpoint.Types.Environments.SESearch a {- Arity: 5, Strictness: , Inline: [0], Unfolding: (\ @ a (ww :: GHC.Prim.Int#) (ww1 :: GHC.Prim.ByteArray#) (ww2 :: GHC.Prim.Int#) (ww3 :: GHC.Prim.Int#) (w :: Language.Fixpoint.Types.Environments.SEnv a) -> case {__pkg_ccall hashable-1.2.6.0@hashable-1.2.6.0-3EXxoqeEgbfAKr6aGkye6x hashable_fnv_hash_offset GHC.Prim.ByteArray# -> GHC.Prim.Int# -> GHC.Prim.Int# -> GHC.Prim.Int# -> GHC.Prim.State# GHC.Prim.RealWorld -> (# GHC.Prim.State# GHC.Prim.RealWorld, GHC.Prim.Int# #)} ww1 (GHC.Prim.uncheckedIShiftL# ww2 1#) (GHC.Prim.uncheckedIShiftL# ww3 1#) -2578643520546668380# GHC.Prim.realWorld# of wild1 { (#,#) ds1 ds2 -> case Language.Fixpoint.Types.Environments.$wpoly_go12 @ a (GHC.Prim.int2Word# ds2) ww 0# w `cast` (Language.Fixpoint.Types.Environments.N:SEnv[0] _N) of wild { GHC.Base.Nothing -> Language.Fixpoint.Types.Environments.Alts @ a (let { ss :: [[GHC.Types.Char]] = Language.Fixpoint.Types.Environments.lookupSEnvWithDistance1 @ a (GHC.Types.[] @ [GHC.Types.Char]) w `cast` (Language.Fixpoint.Types.Environments.N:SEnv[0] _N) } in let { f :: GHC.Base.String = Language.Fixpoint.Types.Names.$wsymbolString ww1 ww2 ww3 } in letrec { go6 :: [[GHC.Types.Char]] -> [[GHC.Types.Char]] -> [(GHC.Types.Int, [GHC.Types.Char])] {- Arity: 2, Strictness: -} = \ (ds :: [[GHC.Types.Char]]) (eta :: [[GHC.Types.Char]]) -> case ds of wild2 { [] -> GHC.Types.[] @ (GHC.Types.Int, [GHC.Types.Char]) : y ys -> case eta of wild3 { [] -> GHC.Types.[] @ (GHC.Types.Int, [GHC.Types.Char]) : y1 ys1 -> GHC.Types.: @ (GHC.Types.Int, [GHC.Types.Char]) (Language.Fixpoint.Misc.editDistance @ GHC.Types.Char GHC.Classes.$fEqChar f y, y1) (go6 ys ys1) } } } in let { xs :: [(GHC.Types.Int, [GHC.Types.Char])] = go6 ss ss } in let { lvl68 :: GHC.Types.Int = case GHC.Base.map @ (GHC.Types.Int, [GHC.Types.Char]) @ GHC.Types.Int (Data.Tuple.fst @ GHC.Types.Int @ [GHC.Types.Char]) xs of wild2 { [] -> GHC.List.minimum2 : ipv ipv1 -> case ipv of ww4 { GHC.Types.I# ww5 -> case GHC.List.$wgo1 ipv1 ww5 of ww6 { DEFAULT -> GHC.Types.I# ww6 } } } } in letrec { go7 :: [(GHC.Types.Int, [GHC.Types.Char])] -> [Language.Fixpoint.Types.Names.Symbol] {- Arity: 1, Strictness: -} = \ (ds :: [(GHC.Types.Int, [GHC.Types.Char])]) -> case ds of wild2 { [] -> GHC.Types.[] @ Language.Fixpoint.Types.Names.Symbol : y ys -> case y of wild3 { (,) d z -> case d of wild4 { GHC.Types.I# x -> case lvl68 of wild5 { GHC.Types.I# y1 -> case GHC.Prim.tagToEnum# @ GHC.Types.Bool (GHC.Prim.==# x y1) of wild6 { GHC.Types.False -> go7 ys GHC.Types.True -> GHC.Types.: @ Language.Fixpoint.Types.Names.Symbol (Language.Fixpoint.Types.Names.$fSymbolic[]_$csymbol z) (go7 ys) } } } } } } in go7 xs) GHC.Base.Just z -> Language.Fixpoint.Types.Environments.Found @ a z } }) -} 380037f1e27006ada4319bf681a7f521 $wmapBindEnv :: (Language.Fixpoint.Types.Environments.BindId -> (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) -> (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) -> GHC.Prim.Int# -> Language.Fixpoint.Types.Environments.BindMap (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) -> (# GHC.Prim.Int#, Language.Fixpoint.Types.Environments.BindMap (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) #) {- Arity: 3, Strictness: , Inline: [0] -} 710fa3df00e89af053f80c14dbda30b9 $wmapWithKeyMBindEnv :: GHC.Base.Monad m => ((Language.Fixpoint.Types.Environments.BindId, (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) -> m (Language.Fixpoint.Types.Environments.BindId, (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft))) -> GHC.Prim.Int# -> Language.Fixpoint.Types.Environments.BindMap (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) -> m Language.Fixpoint.Types.Environments.BindEnv {- Arity: 4, Strictness: , Inline: [0], Unfolding: (\ @ (m :: * -> *) (w :: GHC.Base.Monad m) (w1 :: (Language.Fixpoint.Types.Environments.BindId, (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) -> m (Language.Fixpoint.Types.Environments.BindId, (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft))) (ww :: GHC.Prim.Int#) (ww1 :: Language.Fixpoint.Types.Environments.BindMap (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) -> GHC.Base.fmap @ m (GHC.Base.$p1Applicative @ m (GHC.Base.$p1Monad @ m w)) @ [(Language.Fixpoint.Types.Environments.BindId, (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft))] @ (Language.Fixpoint.Types.Environments.SizedEnv (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) (\ (x :: [(Language.Fixpoint.Types.Environments.BindId, (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft))]) -> case Language.Fixpoint.Types.Environments.mapWithKeyMBindEnv_go x (Data.HashMap.Base.Empty @ Language.Fixpoint.Types.Environments.BindId @ (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) of dt { DEFAULT -> Language.Fixpoint.Types.Environments.BE @ (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) ww dt }) (Data.Traversable.$fTraversable[]_$cmapM @ m @ (Language.Fixpoint.Types.Environments.BindId, (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) @ (Language.Fixpoint.Types.Environments.BindId, (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) w w1 (Language.Fixpoint.Types.Environments.mapWithKeyMBindEnv_go1 (GHC.Types.[] @ (Language.Fixpoint.Types.Environments.BindId, (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft))) ww1))) -} 432f70d4d5b1ceb913103c3288648761 $wpoly_go1 :: GHC.Prim.Int# -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId v -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId v -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId v {- Arity: 3, Strictness: , Inline: [0] -} 78b7ea2c026df1aaf187154b846c1894 $wpoly_go10 :: GHC.Prim.Word# -> GHC.Prim.Int# -> v -> GHC.Prim.Int# -> Data.HashMap.Base.HashMap GHC.Types.Int v -> Data.HashMap.Base.HashMap GHC.Types.Int v {- Arity: 5, Strictness: , Inline: [0] -} 76b923d042425c67ee4958f575251a2b $wpoly_go11 :: GHC.Prim.Word# -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar v -> GHC.Base.Maybe v {- Arity: 4, HasNoCafRefs, Strictness: , Inline: [0] -} ad10e3fd2c6bd765db88859c034c741a $wpoly_go12 :: GHC.Prim.Word# -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol v -> GHC.Base.Maybe v {- Arity: 4, HasNoCafRefs, Strictness: , Inline: [0] -} d59b13af645e8754d495f15c3ee07ea3 $wpoly_go13 :: GHC.Prim.Word# -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId v -> GHC.Base.Maybe v {- Arity: 4, HasNoCafRefs, Strictness: , Inline: [0] -} c96ab41b76f9422e10972a6b30bba53e $wpoly_go14 :: GHC.Prim.Word# -> GHC.Prim.Int# -> Data.Text.Internal.Text -> Data.Text.Internal.Text -> v -> GHC.Prim.Int# -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar v -> GHC.Prim.State# s -> (# GHC.Prim.State# s, Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar v #) {- Arity: 8, Strictness: , Inline: [0] -} 24044f58ed9d0dafe764e83ea4edd2e4 $wpoly_go15 :: GHC.Prim.Word# -> GHC.Prim.Int# -> v -> GHC.Prim.Int# -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId v -> GHC.Prim.State# s -> (# GHC.Prim.State# s, Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId v #) {- Arity: 6, Strictness: , Inline: [0] -} b17d85430c4569fabcd3029789a0313b $wpoly_go2 :: GHC.Prim.Int# -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar v -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar v -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar v {- Arity: 3, Strictness: , Inline: [0] -} 9eebf89122939adf16cc0eba2a4540d1 $wpoly_go3 :: GHC.Prim.Int# -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol v -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol v -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol v {- Arity: 3, Strictness: , Inline: [0] -} 40d0049e9413f67648acb53b2834c45d $wpoly_go4 :: GHC.Prim.Int# -> GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v) -> GHC.Prim.Int# -> GHC.Prim.Int# -> GHC.Base.Maybe GHC.Types.Int {- Arity: 4, HasNoCafRefs, Strictness: , Inline: [0] -} b06211ab2fe2747e60e5b415e0c7fe44 $wpoly_go5 :: GHC.Prim.Int# -> GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) -> GHC.Prim.Int# -> GHC.Prim.Int# -> GHC.Base.Maybe GHC.Types.Int {- Arity: 4, HasNoCafRefs, Strictness: , Inline: [0] -} 0c4963d5c22b747913511910afa4c30b $wpoly_go6 :: GHC.Prim.Int# -> GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Refinements.KVar v) -> GHC.Prim.Int# -> GHC.Prim.Int# -> GHC.Base.Maybe v {- Arity: 4, HasNoCafRefs, Strictness: , Inline: [0] -} 587548a96964b171b0d8895c88187b83 $wpoly_go7 :: GHC.Prim.Int# -> GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Names.Symbol v) -> GHC.Prim.Int# -> GHC.Prim.Int# -> GHC.Base.Maybe v {- Arity: 4, HasNoCafRefs, Strictness: , Inline: [0] -} ee22f57753fc4b56e57bc19805878192 $wpoly_go8 :: GHC.Prim.Int# -> GHC.Prim.Array# (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId v) -> GHC.Prim.Int# -> GHC.Prim.Int# -> GHC.Base.Maybe v {- Arity: 4, HasNoCafRefs, Strictness: , Inline: [0] -} 81d03ce4cdc1d033520320e91a9cd674 $wpoly_go9 :: GHC.Prim.Word# -> GHC.Prim.Int# -> Data.Text.Internal.Text -> Data.Text.Internal.Text -> v -> GHC.Prim.Int# -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol v -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol v {- Arity: 7, Strictness: , Inline: [0] -} 2a24f788a0a55df9c438e12f328d5215 $wstep2 :: [GHC.Int.Int64] -> (Data.ByteString.Builder.Internal.BufferRange -> GHC.Types.IO (Data.ByteString.Builder.Internal.BuildSignal r)) -> GHC.Prim.Addr# -> GHC.Prim.Addr# -> GHC.Prim.State# GHC.Prim.RealWorld -> (# GHC.Prim.State# GHC.Prim.RealWorld, Data.ByteString.Builder.Internal.BuildSignal r #) {- Arity: 5, HasNoCafRefs, Strictness: , Inline: [0] -} 792d9eaa5d5c1843c39b7b64e5cd1dac type BindEnv = Language.Fixpoint.Types.Environments.SizedEnv (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) 8c87ed5c72a1a0e13ef4756e1a2fa1a4 type BindId = GHC.Types.Int f75ec848aa783574a6a9c634b75251d6 type BindMap a = Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId a dae79859b3442c211473f5cded0c14f7 newtype IBindEnv = FB (Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId) 999de3bcf4ed26dd71bfcb519acbd47a newtype Packs = Packs {packm :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar GHC.Types.Int} dae79859b3442c211473f5cded0c14f7 axiom Rep_IBindEnv:: GHC.Generics.Rep Language.Fixpoint.Types.Environments.IBindEnv = GHC.Generics.D1 ('GHC.Generics.MetaData "IBindEnv" "Language.Fixpoint.Types.Environments" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.True) (GHC.Generics.C1 ('GHC.Generics.MetaCons "FB" '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 (Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId)))) 999de3bcf4ed26dd71bfcb519acbd47a axiom Rep_Packs:: GHC.Generics.Rep Language.Fixpoint.Types.Environments.Packs = GHC.Generics.D1 ('GHC.Generics.MetaData "Packs" "Language.Fixpoint.Types.Environments" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.True) (GHC.Generics.C1 ('GHC.Generics.MetaCons "Packs" 'GHC.Generics.PrefixI 'GHC.Types.True) (GHC.Generics.S1 ('GHC.Generics.MetaSel ('GHC.Base.Just "packm") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar GHC.Types.Int)))) ae9741409aa049333ef008f3802cfecf axiom Rep_SEnv:: [a] GHC.Generics.Rep (Language.Fixpoint.Types.Environments.SEnv a) = GHC.Generics.D1 ('GHC.Generics.MetaData "SEnv" "Language.Fixpoint.Types.Environments" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.True) (GHC.Generics.C1 ('GHC.Generics.MetaCons "SE" 'GHC.Generics.PrefixI 'GHC.Types.True) (GHC.Generics.S1 ('GHC.Generics.MetaSel ('GHC.Base.Just "seBinds") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.NoSourceStrictness 'GHC.Generics.DecidedLazy) (GHC.Generics.Rec0 (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a)))) 792d9eaa5d5c1843c39b7b64e5cd1dac axiom Rep_SizedEnv:: [a] GHC.Generics.Rep (Language.Fixpoint.Types.Environments.SizedEnv a) = GHC.Generics.D1 ('GHC.Generics.MetaData "SizedEnv" "Language.Fixpoint.Types.Environments" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.False) (GHC.Generics.C1 ('GHC.Generics.MetaCons "BE" 'GHC.Generics.PrefixI 'GHC.Types.True) (GHC.Generics.S1 ('GHC.Generics.MetaSel ('GHC.Base.Just "_beSize") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedUnpack) (GHC.Generics.Rec0 GHC.Types.Int) GHC.Generics.:*: GHC.Generics.S1 ('GHC.Generics.MetaSel ('GHC.Base.Just "beBinds") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict) (GHC.Generics.Rec0 (Language.Fixpoint.Types.Environments.BindMap a)))) 792d9eaa5d5c1843c39b7b64e5cd1dac axiom Rep_SolEnv:: GHC.Generics.Rep Language.Fixpoint.Types.Environments.SolEnv = GHC.Generics.D1 ('GHC.Generics.MetaData "SolEnv" "Language.Fixpoint.Types.Environments" "liquid-fixpoint-0.6.0.1-6TLfofWrTFvFP1QJmA2Rhf" 'GHC.Types.False) (GHC.Generics.C1 ('GHC.Generics.MetaCons "SolEnv" 'GHC.Generics.PrefixI 'GHC.Types.True) (GHC.Generics.S1 ('GHC.Generics.MetaSel ('GHC.Base.Just "soeBinds") 'GHC.Generics.NoSourceUnpackedness 'GHC.Generics.SourceStrict 'GHC.Generics.DecidedStrict) (GHC.Generics.Rec0 Language.Fixpoint.Types.Environments.BindEnv))) 49d4d07afcffcb491480eb79ab43124c data SESearch a = Found a | Alts [Language.Fixpoint.Types.Names.Symbol] ae9741409aa049333ef008f3802cfecf newtype SEnv a = SE {seBinds :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a} 792d9eaa5d5c1843c39b7b64e5cd1dac data SizedEnv a = BE {_beSize :: {-# UNPACK #-}GHC.Types.Int, beBinds :: !Language.Fixpoint.Types.Environments.BindMap a} 792d9eaa5d5c1843c39b7b64e5cd1dac data SolEnv = SolEnv {soeBinds :: !Language.Fixpoint.Types.Environments.BindEnv} 74b548bc20eb30222e95ea8e31263639 _beSize :: Language.Fixpoint.Types.Environments.SizedEnv a -> GHC.Types.Int RecSel Left Language.Fixpoint.Types.Environments.SizedEnv {- Arity: 1, HasNoCafRefs, Strictness: m, Unfolding: InlineRule (1, True, False) (\ @ a (ds :: Language.Fixpoint.Types.Environments.SizedEnv a) -> case ds of wild { Language.Fixpoint.Types.Environments.BE dt ds1 -> GHC.Types.I# dt }) -} c777b46b1c743af956a2afbec10c57f9 adjustBindEnv :: ((Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) -> (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) -> Language.Fixpoint.Types.Environments.BindId -> Language.Fixpoint.Types.Environments.BindEnv -> Language.Fixpoint.Types.Environments.BindEnv {- Arity: 3, HasNoCafRefs, Strictness: m, Unfolding: InlineRule (3, True, False) (\ (f :: (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) -> (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) (i :: Language.Fixpoint.Types.Environments.BindId) (ds :: Language.Fixpoint.Types.Environments.SizedEnv (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) -> case ds of wild { Language.Fixpoint.Types.Environments.BE dt m -> case Language.Fixpoint.Types.Environments.$sadjust @ (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) f i m of dt1 { DEFAULT -> Language.Fixpoint.Types.Environments.BE @ (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) dt dt1 } }) -} 0907867d711aa08166613144dbfef14c beBinds :: Language.Fixpoint.Types.Environments.SizedEnv a -> Language.Fixpoint.Types.Environments.BindMap a RecSel Left Language.Fixpoint.Types.Environments.SizedEnv {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (1, True, False) (\ @ a (ds :: Language.Fixpoint.Types.Environments.SizedEnv a) -> case ds of wild { Language.Fixpoint.Types.Environments.BE dt ds1 -> ds1 }) -} 89c34f20db94686b94cfff511336c8e5 bindEnvFromList :: [(Language.Fixpoint.Types.Environments.BindId, Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)] -> Language.Fixpoint.Types.Environments.BindEnv {- Arity: 1, Strictness: m, Inline: INLINE[0], Unfolding: InlineRule (1, True, False) (\ (w :: [(Language.Fixpoint.Types.Environments.BindId, Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)]) -> case w of wild { [] -> Language.Fixpoint.Types.Environments.BE @ (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) 0# (Data.HashMap.Base.Empty @ Language.Fixpoint.Types.Environments.BindId @ (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) : ipv ipv1 -> case GHC.Base.map @ (Language.Fixpoint.Types.Environments.BindId, Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) @ GHC.Types.Int (Language.Fixpoint.Misc.fst3 @ Language.Fixpoint.Types.Environments.BindId @ Language.Fixpoint.Types.Names.Symbol @ Language.Fixpoint.Types.Refinements.SortedReft) wild of wild1 { [] -> case GHC.List.maximum2 ret_ty (Language.Fixpoint.Types.Environments.SizedEnv (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) of {} : ipv2 ipv3 -> case ipv2 of ww { GHC.Types.I# ww1 -> case GHC.List.$wgo ipv3 ww1 of ww2 { DEFAULT -> case Language.Fixpoint.Types.Environments.bindEnvFromList_go wild (Data.HashMap.Base.Empty @ Language.Fixpoint.Types.Environments.BindId @ (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) of dt { DEFAULT -> Language.Fixpoint.Types.Environments.BE @ (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) (GHC.Prim.+# 1# ww2) dt } } } } }) -} 624c84fbc7b520d1439812e8236accf7 bindEnvFromList_go :: [(Language.Fixpoint.Types.Environments.BindId, Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)] -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) {- Arity: 2, Strictness: -} 15cf21f5dde4a84007d2f5516efc18c5 bindEnvToList :: Language.Fixpoint.Types.Environments.BindEnv -> [(Language.Fixpoint.Types.Environments.BindId, Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)] {- Arity: 1, HasNoCafRefs, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (1, True, False) (\ (w :: Language.Fixpoint.Types.Environments.BindEnv) -> case w of ww { Language.Fixpoint.Types.Environments.BE ww1 ww2 -> case ww2 of wild { Data.HashMap.Base.Empty -> GHC.Types.[] @ (Language.Fixpoint.Types.Environments.BindId, Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) Data.HashMap.Base.BitmapIndexed dt dt1 -> Language.Fixpoint.Types.Environments.$wgo5 (Data.HashMap.Array.Array @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) dt1) (GHC.Prim.sizeofArray# @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) dt1) 0# (GHC.Types.[] @ (Language.Fixpoint.Types.Environments.BindId, Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) Data.HashMap.Base.Leaf dt dt1 dt2 -> case dt2 of wild1 { (,) x r -> GHC.Types.: @ (Language.Fixpoint.Types.Environments.BindId, Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) (dt1, x, r) (GHC.Types.[] @ (Language.Fixpoint.Types.Environments.BindId, Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) } Data.HashMap.Base.Full dt -> Language.Fixpoint.Types.Environments.$wgo4 (Data.HashMap.Array.Array @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) dt) (GHC.Prim.sizeofArray# @ (Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) dt) 0# (GHC.Types.[] @ (Language.Fixpoint.Types.Environments.BindId, Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) Data.HashMap.Base.Collision dt dt1 -> Language.Fixpoint.Types.Environments.$wgo3 (Data.HashMap.Array.Array @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) dt1) (GHC.Prim.sizeofArray# @ (Data.HashMap.Base.Leaf Language.Fixpoint.Types.Environments.BindId (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) dt1) 0# (GHC.Types.[] @ (Language.Fixpoint.Types.Environments.BindId, Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) } }) -} 817a2fbe6105ce7078cd9ca341552f26 deleteIBindEnv :: Language.Fixpoint.Types.Environments.BindId -> Language.Fixpoint.Types.Environments.IBindEnv -> Language.Fixpoint.Types.Environments.IBindEnv {- Arity: 2, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.deleteIBindEnv1 `cast` (_R ->_R _R ->_R Trans (Sym (Data.HashSet.N:HashSet[0] _N)) (Sym (Language.Fixpoint.Types.Environments.N:IBindEnv[0]))) -} 3d3c414b0b12579ba824236f5f235b14 deleteIBindEnv1 :: Language.Fixpoint.Types.Environments.BindId -> Language.Fixpoint.Types.Environments.IBindEnv -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId () {- Arity: 2, Strictness: , Unfolding: InlineRule (2, True, False) (\ (i :: Language.Fixpoint.Types.Environments.BindId) (ds :: Language.Fixpoint.Types.Environments.IBindEnv) -> Data.HashMap.Base.delete @ Language.Fixpoint.Types.Environments.BindId @ () GHC.Classes.$fEqInt Data.Hashable.Class.$fHashableInt i ds `cast` (Trans (Language.Fixpoint.Types.Environments.N:IBindEnv[0]) (Data.HashSet.N:HashSet[0] _N))) -} a855d705d7b57927d92a2ae7459af3f3 deleteSEnv :: Language.Fixpoint.Types.Names.Symbol -> Language.Fixpoint.Types.Environments.SEnv a -> Language.Fixpoint.Types.Environments.SEnv a {- Arity: 2, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Substitutions.$sdelete `cast` (forall (a :: <*>_N). _R ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N) -} 051c7f6e46479a9552747ed2030e9852 diffIBindEnv :: Language.Fixpoint.Types.Environments.IBindEnv -> Language.Fixpoint.Types.Environments.IBindEnv -> Language.Fixpoint.Types.Environments.IBindEnv {- Arity: 2, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.diffIBindEnv1 `cast` (_R ->_R _R ->_R Trans (Sym (Data.HashSet.N:HashSet[0] _N)) (Sym (Language.Fixpoint.Types.Environments.N:IBindEnv[0]))) -} ff4308bcf15d812b6536de88622dd885 diffIBindEnv1 :: Language.Fixpoint.Types.Environments.IBindEnv -> Language.Fixpoint.Types.Environments.IBindEnv -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId () {- Arity: 2, Strictness: , Unfolding: InlineRule (2, True, False) (\ (ds :: Language.Fixpoint.Types.Environments.IBindEnv) (ds1 :: Language.Fixpoint.Types.Environments.IBindEnv) -> Data.HashMap.Base.difference @ Language.Fixpoint.Types.Environments.BindId @ () @ () GHC.Classes.$fEqInt Data.Hashable.Class.$fHashableInt ds `cast` (Trans (Language.Fixpoint.Types.Environments.N:IBindEnv[0]) (Data.HashSet.N:HashSet[0] _N)) ds1 `cast` (Trans (Language.Fixpoint.Types.Environments.N:IBindEnv[0]) (Data.HashSet.N:HashSet[0] _N))) -} 56f953ca58f53f011c9054f056ccbd7c differenceSEnv :: Language.Fixpoint.Types.Environments.SEnv a -> Language.Fixpoint.Types.Environments.SEnv w -> Language.Fixpoint.Types.Environments.SEnv a {- Arity: 2, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$sdifference `cast` (forall (a :: <*>_N) (w :: <*>_N). Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N) -} 0c5cf007530758c13fe699ca35718ece elemsBindEnv :: Language.Fixpoint.Types.Environments.BindEnv -> [Language.Fixpoint.Types.Environments.BindId] {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (1, True, False) (\ (be :: Language.Fixpoint.Types.Environments.BindEnv) -> GHC.Base.build @ GHC.Types.Int (\ @ b1 (c :: GHC.Types.Int -> b1 -> b1)[OneShot] (n :: b1)[OneShot] -> GHC.Base.foldr @ (Language.Fixpoint.Types.Environments.BindId, Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) @ b1 (GHC.Base.mapFB @ GHC.Types.Int @ b1 @ (Language.Fixpoint.Types.Environments.BindId, Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) c (Language.Fixpoint.Misc.fst3 @ Language.Fixpoint.Types.Environments.BindId @ Language.Fixpoint.Types.Names.Symbol @ Language.Fixpoint.Types.Refinements.SortedReft)) n (Language.Fixpoint.Types.Environments.bindEnvToList be))) -} 7035d11f3a4503479010583526d4931c elemsIBindEnv :: Language.Fixpoint.Types.Environments.IBindEnv -> [Language.Fixpoint.Types.Environments.BindId] {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) (Data.HashSet.toList @ Language.Fixpoint.Types.Environments.BindId) `cast` (Sym (Language.Fixpoint.Types.Environments.N:IBindEnv[0]) ->_R <[Language.Fixpoint.Types.Environments.BindId]>_R) -} 792d9eaa5d5c1843c39b7b64e5cd1dac emptyBindEnv :: Language.Fixpoint.Types.Environments.BindEnv {- HasNoCafRefs, Strictness: m, Unfolding: (Language.Fixpoint.Types.Environments.BE @ (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) 0# (Data.HashMap.Base.Empty @ Language.Fixpoint.Types.Environments.BindId @ (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft))) -} dae79859b3442c211473f5cded0c14f7 emptyIBindEnv :: Language.Fixpoint.Types.Environments.IBindEnv {- HasNoCafRefs, Unfolding: InlineRule (0, True, True) (Data.HashMap.Base.Empty @ Language.Fixpoint.Types.Environments.BindId @ ()) `cast` (Trans (Sym (Data.HashSet.N:HashSet[0] _N)) (Sym (Language.Fixpoint.Types.Environments.N:IBindEnv[0]))) -} 0092f6c4a7c68c22a64ca5be786a076b emptySEnv :: Language.Fixpoint.Types.Environments.SEnv a {- HasNoCafRefs, Unfolding: InlineRule (0, True, True) (Data.HashMap.Base.Empty @ Language.Fixpoint.Types.Names.Symbol) `cast` (forall (a :: <*>_N). Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N) -} e66be8902a29b4ff6ba9a891b4078535 envCs :: Language.Fixpoint.Types.Environments.BindEnv -> Language.Fixpoint.Types.Environments.IBindEnv -> [(Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)] {- Arity: 2, Strictness: -} fb61d7691a2bf001a9d16f464c0c1866 filterBindEnv :: (Language.Fixpoint.Types.Environments.BindId -> Language.Fixpoint.Types.Names.Symbol -> Language.Fixpoint.Types.Refinements.SortedReft -> GHC.Types.Bool) -> Language.Fixpoint.Types.Environments.BindEnv -> Language.Fixpoint.Types.Environments.BindEnv {- Arity: 2, Strictness: m, Inline: INLINE[0], Unfolding: InlineRule (2, True, False) (\ (w :: Language.Fixpoint.Types.Environments.BindId -> Language.Fixpoint.Types.Names.Symbol -> Language.Fixpoint.Types.Refinements.SortedReft -> GHC.Types.Bool) (w1 :: Language.Fixpoint.Types.Environments.BindEnv) -> case w1 of ww { Language.Fixpoint.Types.Environments.BE ww1 ww2 -> case Language.Fixpoint.Types.Environments.$wfilterBindEnv w ww1 ww2 of ww3 { (#,#) ww4 ww5 -> Language.Fixpoint.Types.Environments.BE @ (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) ww4 ww5 } }) -} d04344dcc26246482caf1a3ec32b6bfa filterIBindEnv :: (Language.Fixpoint.Types.Environments.BindId -> GHC.Types.Bool) -> Language.Fixpoint.Types.Environments.IBindEnv -> Language.Fixpoint.Types.Environments.IBindEnv {- Arity: 2, Strictness: , Unfolding: InlineRule (0, True, True) (Data.HashSet.filter @ Language.Fixpoint.Types.Environments.BindId) `cast` ( GHC.Types.Bool>_R ->_R Sym (Language.Fixpoint.Types.Environments.N:IBindEnv[0]) ->_R Sym (Language.Fixpoint.Types.Environments.N:IBindEnv[0])) -} 5026975848e59412b11dc3e4e4238bde filterSEnv :: (a -> GHC.Types.Bool) -> Language.Fixpoint.Types.Environments.SEnv a -> Language.Fixpoint.Types.Environments.SEnv a {- Arity: 2, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.filterSEnv1 `cast` (forall (a :: <*>_N). GHC.Types.Bool>_R ->_R _R ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N) -} ce5278b152173d658e13d9d3d9093d51 filterSEnv1 :: (a -> GHC.Types.Bool) -> Language.Fixpoint.Types.Environments.SEnv a -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a {- Arity: 2, Strictness: -} 789a0bbdc42dd0135ea2d09892ac21d3 fromListSEnv :: [(Language.Fixpoint.Types.Names.Symbol, a)] -> Language.Fixpoint.Types.Environments.SEnv a {- Arity: 1, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Refinements.$dmsubst1_$sfromList `cast` (forall (a :: <*>_N). <[(Language.Fixpoint.Types.Names.Symbol, a)]>_R ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N) -} c7fa1108c0d994710bf679129a2b0aec fromMapSEnv :: Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a -> Language.Fixpoint.Types.Environments.SEnv a {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$fDataSEnv2 `cast` (forall (a :: <*>_N). _R ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N) -} 689b4b8ecce32d5146287da3da7766a5 getPack :: Language.Fixpoint.Types.Refinements.KVar -> Language.Fixpoint.Types.Environments.Packs -> GHC.Base.Maybe GHC.Types.Int {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) (Language.Fixpoint.Types.Environments.$slookup @ GHC.Types.Int) `cast` (_R ->_R Sym (Language.Fixpoint.Types.Environments.N:Packs[0]) ->_R _R) -} 2d2a0c911406c085979b39d2332f4072 insertBindEnv :: Language.Fixpoint.Types.Names.Symbol -> Language.Fixpoint.Types.Refinements.SortedReft -> Language.Fixpoint.Types.Environments.BindEnv -> (Language.Fixpoint.Types.Environments.BindId, Language.Fixpoint.Types.Environments.BindEnv) {- Arity: 3, Strictness: m, Inline: INLINE[0], Unfolding: InlineRule (3, True, False) (\ (w :: Language.Fixpoint.Types.Names.Symbol) (w1 :: Language.Fixpoint.Types.Refinements.SortedReft) (w2 :: Language.Fixpoint.Types.Environments.BindEnv) -> case w2 of ww { Language.Fixpoint.Types.Environments.BE ww1 ww2 -> (GHC.Types.I# ww1, case Language.Fixpoint.Types.Environments.$wpoly_go10 @ (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) (GHC.Prim.int2Word# ww1) ww1 (w, w1) 0# ww2 of dt { DEFAULT -> Language.Fixpoint.Types.Environments.BE @ (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) (GHC.Prim.+# ww1 1#) dt }) }) -} 3be79544f40500c440f0dace6e690579 insertSEnv :: Language.Fixpoint.Types.Names.Symbol -> a -> Language.Fixpoint.Types.Environments.SEnv a -> Language.Fixpoint.Types.Environments.SEnv a {- Arity: 3, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.insertSEnv1 `cast` (forall (a :: <*>_N). _R ->_R _R ->_R _R ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N) -} dc82ccaaf273b4999b68b096fefae9c3 insertSEnv1 :: Language.Fixpoint.Types.Names.Symbol -> a -> Language.Fixpoint.Types.Environments.SEnv a -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a {- Arity: 3, Strictness: , Unfolding: InlineRule (3, True, False) (\ @ a (x :: Language.Fixpoint.Types.Names.Symbol) (v :: a) (ds :: Language.Fixpoint.Types.Environments.SEnv a) -> case v of v2 { DEFAULT -> Language.Fixpoint.Types.Environments.$sinsert @ a x v2 ds `cast` (Language.Fixpoint.Types.Environments.N:SEnv[0] _N) }) -} 6cb2cd53df76aa50af651383f2197c38 insertsIBindEnv :: [Language.Fixpoint.Types.Environments.BindId] -> Language.Fixpoint.Types.Environments.IBindEnv -> Language.Fixpoint.Types.Environments.IBindEnv {- Arity: 2, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.insertsIBindEnv1 `cast` (<[Language.Fixpoint.Types.Environments.BindId]>_R ->_R _R ->_R Sym (Language.Fixpoint.Types.Environments.N:IBindEnv[0])) -} af3ac0e45514ea29ccab1ff1bde04cf2 insertsIBindEnv1 :: [Language.Fixpoint.Types.Environments.BindId] -> Language.Fixpoint.Types.Environments.IBindEnv -> Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId {- Arity: 2, Strictness: , Unfolding: (\ (is :: [Language.Fixpoint.Types.Environments.BindId]) (ds :: Language.Fixpoint.Types.Environments.IBindEnv) -> letrec { go6 :: [Language.Fixpoint.Types.Environments.BindId] -> Data.HashSet.HashSet Language.Fixpoint.Types.Environments.BindId {- Arity: 1, Strictness: -} = \ (ds1 :: [Language.Fixpoint.Types.Environments.BindId]) -> case ds1 of wild { [] -> ds `cast` (Language.Fixpoint.Types.Environments.N:IBindEnv[0]) : y ys -> case y of wild1 { GHC.Types.I# x# -> (Language.Fixpoint.Types.Environments.$wpoly_go10 @ () (GHC.Prim.int2Word# x#) x# GHC.Tuple.() 0# (go6 ys) `cast` (Data.HashSet.N:HashSet[0] _N)) `cast` (Sym (Data.HashSet.N:HashSet[0] _N)) } } } in go6 is) -} e7a2c0bc6fed19ab508d75ff90ae8aa7 intersectWithSEnv :: (v1 -> v2 -> a) -> Language.Fixpoint.Types.Environments.SEnv v1 -> Language.Fixpoint.Types.Environments.SEnv v2 -> Language.Fixpoint.Types.Environments.SEnv a {- Arity: 3, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$sintersectionWith `cast` (forall (v1 :: <*>_N) (v2 :: <*>_N) (a :: <*>_N). v2 -> a>_R ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N) -} 9983d7e9d97433d2566c93bdd912d47b intersectionIBindEnv :: Language.Fixpoint.Types.Environments.IBindEnv -> Language.Fixpoint.Types.Environments.IBindEnv -> Language.Fixpoint.Types.Environments.IBindEnv {- Arity: 2, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.intersectionIBindEnv1 `cast` (_R ->_R _R ->_R Trans (Sym (Data.HashSet.N:HashSet[0] _N)) (Sym (Language.Fixpoint.Types.Environments.N:IBindEnv[0]))) -} 85ae596390919faec78669c10dd3bb13 intersectionIBindEnv1 :: Language.Fixpoint.Types.Environments.IBindEnv -> Language.Fixpoint.Types.Environments.IBindEnv -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId () {- Arity: 2, Strictness: , Unfolding: InlineRule (2, True, False) (\ (ds :: Language.Fixpoint.Types.Environments.IBindEnv) (ds1 :: Language.Fixpoint.Types.Environments.IBindEnv) -> Data.HashMap.Base.intersection @ Language.Fixpoint.Types.Environments.BindId @ () @ () GHC.Classes.$fEqInt Data.Hashable.Class.$fHashableInt ds `cast` (Trans (Language.Fixpoint.Types.Environments.N:IBindEnv[0]) (Data.HashSet.N:HashSet[0] _N)) ds1 `cast` (Trans (Language.Fixpoint.Types.Environments.N:IBindEnv[0]) (Data.HashSet.N:HashSet[0] _N))) -} c4a692f1e144e9e359566ca003dc8e31 lookupBindEnv :: Language.Fixpoint.Types.Environments.BindId -> Language.Fixpoint.Types.Environments.BindEnv -> (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) {- Arity: 2, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (2, True, False) (\ (w :: Language.Fixpoint.Types.Environments.BindId) (w1 :: Language.Fixpoint.Types.Environments.BindEnv) -> case w of ww { GHC.Types.I# ww1 -> case w1 of ww2 { Language.Fixpoint.Types.Environments.BE ww3 ww4 -> case Language.Fixpoint.Types.Environments.$wpoly_go13 @ (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) (GHC.Prim.int2Word# ww1) ww1 0# ww4 of wild { GHC.Base.Nothing -> Language.Fixpoint.Types.Environments.lookupBindEnv1 ww1 GHC.Base.Just v -> v } } }) -} c03ae1da1b641bfb2551c0077dd96894 lookupBindEnv1 :: GHC.Prim.Int# -> (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) {- Arity: 1, Strictness: x -} ebcaf832f9842b5825a8c74e9875fd33 lookupSEnv :: Language.Fixpoint.Types.Names.Symbol -> Language.Fixpoint.Types.Environments.SEnv a -> GHC.Base.Maybe a {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$slookup1 `cast` (forall (a :: <*>_N). _R ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N ->_R _R) -} 8487b4b7e6463dbcd7c933ce64e1d285 lookupSEnvWithDistance :: Language.Fixpoint.Types.Names.Symbol -> Language.Fixpoint.Types.Environments.SEnv a -> Language.Fixpoint.Types.Environments.SESearch a {- Arity: 2, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (2, True, False) (\ @ a (w :: Language.Fixpoint.Types.Names.Symbol) (w1 :: Language.Fixpoint.Types.Environments.SEnv a) -> case w of ww { Language.Fixpoint.Types.Names.S ww1 ww2 ww3 -> case ww2 of ww4 { Data.Text.Internal.Text ww5 ww6 ww7 -> Language.Fixpoint.Types.Environments.$wlookupSEnvWithDistance @ a ww1 ww5 ww6 ww7 w1 } }) -} f0600f0abf51aa40db9f3314d28af15f lookupSEnvWithDistance1 :: [[GHC.Types.Char]] -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a -> [[GHC.Types.Char]] {- Arity: 2, HasNoCafRefs, Strictness: -} c77564d4cea5fac956b5de40f6ba62f8 makePack :: [Data.HashSet.HashSet Language.Fixpoint.Types.Refinements.KVar] -> Language.Fixpoint.Types.Environments.Packs {- Arity: 1, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.makePack1 `cast` (<[Data.HashSet.HashSet Language.Fixpoint.Types.Refinements.KVar]>_R ->_R Sym (Language.Fixpoint.Types.Environments.N:Packs[0])) -} 02ed63bc787cfff83939e3f1439c5355 makePack1 :: [Data.HashSet.HashSet Language.Fixpoint.Types.Refinements.KVar] -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar GHC.Types.Int {- Arity: 1, Strictness: , Unfolding: (\ (kvss :: [Data.HashSet.HashSet Language.Fixpoint.Types.Refinements.KVar]) -> Language.Fixpoint.Types.Environments.makePack_go Language.Fixpoint.Types.Environments.makePack3 (Language.Fixpoint.Misc.componentsWith @ Language.Fixpoint.Types.Refinements.KVar @ [Language.Fixpoint.Misc.ListNE Language.Fixpoint.Types.Refinements.KVar] @ Language.Fixpoint.Types.Refinements.KVar Language.Fixpoint.Types.Refinements.$fOrdKVar Language.Fixpoint.Types.Environments.makePack2 (GHC.Base.map @ (Data.HashSet.HashSet Language.Fixpoint.Types.Refinements.KVar) @ [Language.Fixpoint.Types.Refinements.KVar] (Data.HashSet.toList @ Language.Fixpoint.Types.Refinements.KVar) kvss)) (Data.HashMap.Base.Empty @ Language.Fixpoint.Types.Refinements.KVar @ GHC.Types.Int)) -} 77684865bf420071ac1cde0b4a255bb9 makePack2 :: [Language.Fixpoint.Misc.ListNE Language.Fixpoint.Types.Refinements.KVar] -> [(Language.Fixpoint.Types.Refinements.KVar, Language.Fixpoint.Types.Refinements.KVar, [Language.Fixpoint.Types.Refinements.KVar])] {- Arity: 1, Unfolding: (Language.Fixpoint.Misc.coalesceEdges @ Language.Fixpoint.Types.Refinements.KVar Language.Fixpoint.Types.Environments.$scoalesce1) -} 77e072916008d9434f3e354418da68dc makePack3 :: [GHC.Types.Int] {- Unfolding: (GHC.Enum.eftInt 0# 9223372036854775807#) -} d2ff819bf465c1125d931de1b2f5be2f makePack_go :: [GHC.Types.Int] -> [[Language.Fixpoint.Types.Refinements.KVar]] -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar GHC.Types.Int -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar GHC.Types.Int {- Arity: 3, Strictness: -} 5587766109997447ce44fc36cf0d744e mapBindEnv :: (Language.Fixpoint.Types.Environments.BindId -> (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) -> (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) -> Language.Fixpoint.Types.Environments.BindEnv -> Language.Fixpoint.Types.Environments.BindEnv {- Arity: 2, Strictness: m, Inline: INLINE[0], Unfolding: InlineRule (2, True, False) (\ (w :: Language.Fixpoint.Types.Environments.BindId -> (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) -> (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) (w1 :: Language.Fixpoint.Types.Environments.BindEnv) -> case w1 of ww { Language.Fixpoint.Types.Environments.BE ww1 ww2 -> case Language.Fixpoint.Types.Environments.$wmapBindEnv w ww1 ww2 of ww3 { (#,#) ww4 ww5 -> Language.Fixpoint.Types.Environments.BE @ (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) ww4 ww5 } }) -} 65a479f02008539ef5db9da17758dad9 mapMSEnv :: GHC.Base.Monad m => (a -> m b) -> Language.Fixpoint.Types.Environments.SEnv a -> m (Language.Fixpoint.Types.Environments.SEnv b) {- Arity: 3, Strictness: , Unfolding: (\ @ (m :: * -> *) @ a @ b ($dMonad :: GHC.Base.Monad m) (eta :: a -> m b) (eta1 :: Language.Fixpoint.Types.Environments.SEnv a) -> let { $dApplicative :: GHC.Base.Applicative m = GHC.Base.$p1Monad @ m $dMonad } in let { $dFunctor :: GHC.Base.Functor m = GHC.Base.$p1Applicative @ m $dApplicative } in GHC.Base.fmap @ m $dFunctor @ [(Language.Fixpoint.Types.Names.Symbol, b)] @ (Language.Fixpoint.Types.Environments.SEnv b) (Language.Fixpoint.Types.Refinements.$dmsubst1_$sfromList @ b) `cast` (<[(Language.Fixpoint.Types.Names.Symbol, b)]>_R ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N) (Data.Traversable.$fTraversable[]_$cmapM @ m @ (Language.Fixpoint.Types.Names.Symbol, a) @ (Language.Fixpoint.Types.Names.Symbol, b) $dMonad (Language.Fixpoint.Misc.secondM @ m @ a @ b @ Language.Fixpoint.Types.Names.Symbol $dFunctor eta) (Language.Fixpoint.Types.Environments.mapMSEnv1 @ a (GHC.Types.[] @ (Language.Fixpoint.Types.Names.Symbol, a)) eta1 `cast` (Language.Fixpoint.Types.Environments.N:SEnv[0] _N)))) -} 4a988c93edb73839e01b1970d9344ef3 mapMSEnv1 :: [(Language.Fixpoint.Types.Names.Symbol, a)] -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a -> [(Language.Fixpoint.Types.Names.Symbol, a)] {- Arity: 2, HasNoCafRefs, Strictness: -} ae9741409aa049333ef008f3802cfecf mapSEnv :: (a -> b) -> Language.Fixpoint.Types.Environments.SEnv a -> Language.Fixpoint.Types.Environments.SEnv b {- Arity: 2, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$fFunctorSEnv2 `cast` (forall (a :: <*>_N) (b :: <*>_N). b>_R ->_R _R ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N) -} 665a644baddbe0872d9b4f31ded901ff mapSEnvWithKey :: ((Language.Fixpoint.Types.Names.Symbol, a) -> (Language.Fixpoint.Types.Names.Symbol, b)) -> Language.Fixpoint.Types.Environments.SEnv a -> Language.Fixpoint.Types.Environments.SEnv b {- Arity: 2, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.mapSEnvWithKey1 `cast` (forall (a :: <*>_N) (b :: <*>_N). <(Language.Fixpoint.Types.Names.Symbol, a) -> (Language.Fixpoint.Types.Names.Symbol, b)>_R ->_R _R ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N) -} be46b06e52815c64ba33d4138db953bf mapSEnvWithKey1 :: ((Language.Fixpoint.Types.Names.Symbol, a) -> (Language.Fixpoint.Types.Names.Symbol, b)) -> Language.Fixpoint.Types.Environments.SEnv a -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol b {- Arity: 2, Strictness: -} 9e2275fcf8423711cbdbf21dd8f18caa mapWithKeyMBindEnv :: GHC.Base.Monad m => ((Language.Fixpoint.Types.Environments.BindId, (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) -> m (Language.Fixpoint.Types.Environments.BindId, (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft))) -> Language.Fixpoint.Types.Environments.BindEnv -> m Language.Fixpoint.Types.Environments.BindEnv {- Arity: 3, Strictness: , Inline: INLINE[0], Unfolding: InlineRule (3, True, False) (\ @ (m :: * -> *) (w :: GHC.Base.Monad m) (w1 :: (Language.Fixpoint.Types.Environments.BindId, (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) -> m (Language.Fixpoint.Types.Environments.BindId, (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft))) (w2 :: Language.Fixpoint.Types.Environments.BindEnv) -> case w2 of ww { Language.Fixpoint.Types.Environments.BE ww1 ww2 -> Language.Fixpoint.Types.Environments.$wmapWithKeyMBindEnv @ m w w1 ww1 ww2 }) -} 6c3bf38478937bb2cb3a25a0731d64a7 mapWithKeyMBindEnv_go :: [(Language.Fixpoint.Types.Environments.BindId, (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft))] -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) {- Arity: 2, Strictness: -} 6e2de0b643e64a028b75a137fc761e74 mapWithKeyMBindEnv_go1 :: [(Language.Fixpoint.Types.Environments.BindId, (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft))] -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Environments.BindId (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft) -> [(Language.Fixpoint.Types.Environments.BindId, (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft))] {- Arity: 2, HasNoCafRefs, Strictness: -} 6702fd78c0541d0458bf46243a55c085 memberIBindEnv :: Language.Fixpoint.Types.Environments.BindId -> Language.Fixpoint.Types.Environments.IBindEnv -> GHC.Types.Bool {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: InlineRule (2, True, False) (\ (i :: Language.Fixpoint.Types.Environments.BindId) (ds :: Language.Fixpoint.Types.Environments.IBindEnv) -> case i of wild { GHC.Types.I# x# -> case Language.Fixpoint.Types.Environments.$slookup3 @ () (GHC.Types.W# (GHC.Prim.int2Word# x#)) wild Language.Fixpoint.Types.Environments.$fFoldableSizedEnv5 ds `cast` (Trans (Language.Fixpoint.Types.Environments.N:IBindEnv[0]) (Data.HashSet.N:HashSet[0] _N)) of wild1 { GHC.Base.Nothing -> GHC.Types.False GHC.Base.Just ds1 -> GHC.Types.True } }) -} 1b98968bd46488e485e82ffd497cf3a6 memberSEnv :: Language.Fixpoint.Types.Names.Symbol -> Language.Fixpoint.Types.Environments.SEnv a -> GHC.Types.Bool {- Arity: 2, HasNoCafRefs, Strictness: , Unfolding: InlineRule (2, True, False) (\ @ a (x :: Language.Fixpoint.Types.Names.Symbol) (ds :: Language.Fixpoint.Types.Environments.SEnv a) -> case Language.Fixpoint.Types.Environments.$slookup1 @ a x ds `cast` (Language.Fixpoint.Types.Environments.N:SEnv[0] _N) of wild { GHC.Base.Nothing -> GHC.Types.False GHC.Base.Just ds1 -> GHC.Types.True }) -} b837d9ab18fd08c4d8f433be0aa2e1c8 nullIBindEnv :: Language.Fixpoint.Types.Environments.IBindEnv -> GHC.Types.Bool {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) (Data.HashSet.null @ Language.Fixpoint.Types.Environments.BindId) `cast` (Sym (Language.Fixpoint.Types.Environments.N:IBindEnv[0]) ->_R _R) -} ab42439971f160029014f6063bd5308f packm :: Language.Fixpoint.Types.Environments.Packs -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Refinements.KVar GHC.Types.Int RecSel Left Language.Fixpoint.Types.Environments.Packs {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$fFixpointPacks_$s$dmsimplify `cast` (_R ->_R Language.Fixpoint.Types.Environments.N:Packs[0]) -} 7d9f775e6f4dff24a9066462a73e4a6a seBinds :: Language.Fixpoint.Types.Environments.SEnv a -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a RecSel Left Language.Fixpoint.Types.Environments.SEnv {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.seBinds1 `cast` (forall (a :: <*>_N). _R ->_R Language.Fixpoint.Types.Environments.N:SEnv[0] _N) -} 0703920017a3d1cfa4ac0b5acac52602 seBinds1 :: Language.Fixpoint.Types.Environments.SEnv a -> Language.Fixpoint.Types.Environments.SEnv a {- Arity: 1, HasNoCafRefs, Unfolding: (\ @ a (eta :: Language.Fixpoint.Types.Environments.SEnv a) -> eta) -} fbbef264516f9bec0ae6fc47631bb833 soeBinds :: Language.Fixpoint.Types.Environments.SolEnv -> Language.Fixpoint.Types.Environments.BindEnv RecSel Left Language.Fixpoint.Types.Environments.SolEnv {- Arity: 1, HasNoCafRefs, Strictness: m, Unfolding: InlineRule (1, True, False) (\ (ds :: Language.Fixpoint.Types.Environments.SolEnv) -> case ds of wild { Language.Fixpoint.Types.Environments.SolEnv ds1 -> ds1 }) -} 28b630fc2daa44cc77436b1b4a7207e8 toListSEnv :: Language.Fixpoint.Types.Environments.SEnv a -> [(Language.Fixpoint.Types.Names.Symbol, a)] {- Arity: 1, HasNoCafRefs, Strictness: , Unfolding: InlineRule (0, True, True) (Data.HashMap.Base.toList @ Language.Fixpoint.Types.Names.Symbol) `cast` (forall (a :: <*>_N). Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N ->_R <[(Language.Fixpoint.Types.Names.Symbol, a)]>_R) -} f6babeef179e76988b659bd281a317e4 unionIBindEnv :: Language.Fixpoint.Types.Environments.IBindEnv -> Language.Fixpoint.Types.Environments.IBindEnv -> Language.Fixpoint.Types.Environments.IBindEnv {- Arity: 2, Unfolding: InlineRule (0, True, True) (Language.Fixpoint.Types.Environments.$fMonoidIBindEnv_$s$wunion @ ()) `cast` (Trans (Sym (Data.HashSet.N:HashSet[0] _N)) (Sym (Language.Fixpoint.Types.Environments.N:IBindEnv[0])) ->_R Trans (Sym (Data.HashSet.N:HashSet[0] _N)) (Sym (Language.Fixpoint.Types.Environments.N:IBindEnv[0])) ->_R Trans (Sym (Data.HashSet.N:HashSet[0] _N)) (Sym (Language.Fixpoint.Types.Environments.N:IBindEnv[0]))) -} c0b7430cad1fe3a300af1df67787d65a unionSEnv :: Language.Fixpoint.Types.Environments.SEnv a -> Data.HashMap.Base.HashMap Language.Fixpoint.Types.Names.Symbol a -> Language.Fixpoint.Types.Environments.SEnv a {- Arity: 2, Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$fMonoidSEnv_$s$wunion `cast` (forall (a :: <*>_N). Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N ->_R _R ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N) -} d8011c88c4bb3b5c827c5bd9e6aa8a05 unionSEnv' :: Language.Fixpoint.Types.Environments.SEnv a -> Language.Fixpoint.Types.Environments.SEnv a -> Language.Fixpoint.Types.Environments.SEnv a {- Arity: 2, Unfolding: InlineRule (0, True, True) Language.Fixpoint.Types.Environments.$fMonoidSEnv_$s$wunion `cast` (forall (a :: <*>_N). Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N ->_R Sym (Language.Fixpoint.Types.Environments.N:SEnv[0]) _N) -} instance Data.Binary.Class.Binary [Data.HashSet.HashSet] = Language.Fixpoint.Types.Environments.$fBinaryHashSet instance Data.Binary.Class.Binary [Language.Fixpoint.Types.Environments.IBindEnv] = Language.Fixpoint.Types.Environments.$fBinaryIBindEnv instance Data.Binary.Class.Binary [Language.Fixpoint.Types.Environments.Packs] = Language.Fixpoint.Types.Environments.$fBinaryPacks instance Data.Binary.Class.Binary [Language.Fixpoint.Types.Environments.SEnv] = Language.Fixpoint.Types.Environments.$fBinarySEnv instance Data.Binary.Class.Binary [Language.Fixpoint.Types.Environments.SizedEnv] = Language.Fixpoint.Types.Environments.$fBinarySizedEnv instance Data.Data.Data [Language.Fixpoint.Types.Environments.IBindEnv] = Language.Fixpoint.Types.Environments.$fDataIBindEnv instance Data.Data.Data [Language.Fixpoint.Types.Environments.SEnv] = Language.Fixpoint.Types.Environments.$fDataSEnv instance GHC.Classes.Eq [Language.Fixpoint.Types.Environments.IBindEnv] = Language.Fixpoint.Types.Environments.$fEqIBindEnv instance GHC.Classes.Eq [Language.Fixpoint.Types.Environments.Packs] = Language.Fixpoint.Types.Environments.$fEqPacks instance GHC.Classes.Eq [Language.Fixpoint.Types.Environments.SEnv] = Language.Fixpoint.Types.Environments.$fEqSEnv instance GHC.Classes.Eq [Language.Fixpoint.Types.Environments.SizedEnv] = Language.Fixpoint.Types.Environments.$fEqSizedEnv instance GHC.Classes.Eq [Language.Fixpoint.Types.Environments.SolEnv] = Language.Fixpoint.Types.Environments.$fEqSolEnv instance Language.Fixpoint.Types.PrettyPrint.Fixpoint [Language.Fixpoint.Types.Environments.IBindEnv] = Language.Fixpoint.Types.Environments.$fFixpointIBindEnv instance Language.Fixpoint.Types.PrettyPrint.Fixpoint [Language.Fixpoint.Types.Environments.Packs] = Language.Fixpoint.Types.Environments.$fFixpointPacks instance Language.Fixpoint.Types.PrettyPrint.Fixpoint [Language.Fixpoint.Types.Environments.SEnv] = Language.Fixpoint.Types.Environments.$fFixpointSEnv instance Language.Fixpoint.Types.PrettyPrint.Fixpoint [Language.Fixpoint.Types.Environments.SizedEnv] = Language.Fixpoint.Types.Environments.$fFixpointSizedEnv instance Data.Foldable.Foldable [Language.Fixpoint.Types.Environments.SEnv] = Language.Fixpoint.Types.Environments.$fFoldableSEnv instance Data.Foldable.Foldable [Language.Fixpoint.Types.Environments.SizedEnv] = Language.Fixpoint.Types.Environments.$fFoldableSizedEnv instance GHC.Base.Functor [Language.Fixpoint.Types.Environments.SEnv] = Language.Fixpoint.Types.Environments.$fFunctorSEnv instance GHC.Base.Functor [Language.Fixpoint.Types.Environments.SizedEnv] = Language.Fixpoint.Types.Environments.$fFunctorSizedEnv instance GHC.Generics.Generic [Language.Fixpoint.Types.Environments.IBindEnv] = Language.Fixpoint.Types.Environments.$fGenericIBindEnv instance GHC.Generics.Generic [Language.Fixpoint.Types.Environments.Packs] = Language.Fixpoint.Types.Environments.$fGenericPacks instance GHC.Generics.Generic [Language.Fixpoint.Types.Environments.SEnv] = Language.Fixpoint.Types.Environments.$fGenericSEnv instance GHC.Generics.Generic [Language.Fixpoint.Types.Environments.SizedEnv] = Language.Fixpoint.Types.Environments.$fGenericSizedEnv instance GHC.Generics.Generic [Language.Fixpoint.Types.Environments.SolEnv] = Language.Fixpoint.Types.Environments.$fGenericSolEnv instance GHC.Base.Monoid [Language.Fixpoint.Types.Environments.IBindEnv] = Language.Fixpoint.Types.Environments.$fMonoidIBindEnv instance GHC.Base.Monoid [Language.Fixpoint.Types.Environments.Packs] = Language.Fixpoint.Types.Environments.$fMonoidPacks instance GHC.Base.Monoid [Language.Fixpoint.Types.Environments.SEnv] = Language.Fixpoint.Types.Environments.$fMonoidSEnv instance GHC.Base.Monoid [Language.Fixpoint.Types.Environments.SizedEnv] = Language.Fixpoint.Types.Environments.$fMonoidSizedEnv instance Control.DeepSeq.NFData [Language.Fixpoint.Types.Environments.IBindEnv] = Language.Fixpoint.Types.Environments.$fNFDataIBindEnv instance Control.DeepSeq.NFData [Language.Fixpoint.Types.Environments.Packs] = Language.Fixpoint.Types.Environments.$fNFDataPacks instance Control.DeepSeq.NFData [Language.Fixpoint.Types.Environments.SEnv] = Language.Fixpoint.Types.Environments.$fNFDataSEnv instance Control.DeepSeq.NFData [Language.Fixpoint.Types.Environments.SizedEnv] = Language.Fixpoint.Types.Environments.$fNFDataSizedEnv instance Language.Fixpoint.Types.PrettyPrint.PPrint [Language.Fixpoint.Types.Environments.IBindEnv] = Language.Fixpoint.Types.Environments.$fPPrintIBindEnv instance Language.Fixpoint.Types.PrettyPrint.PPrint [Language.Fixpoint.Types.Environments.Packs] = Language.Fixpoint.Types.Environments.$fPPrintPacks instance Language.Fixpoint.Types.PrettyPrint.PPrint [Language.Fixpoint.Types.Environments.SEnv] = Language.Fixpoint.Types.Environments.$fPPrintSEnv instance Language.Fixpoint.Types.PrettyPrint.PPrint [Language.Fixpoint.Types.Environments.SizedEnv] = Language.Fixpoint.Types.Environments.$fPPrintSizedEnv instance GHC.Show.Show [Language.Fixpoint.Types.Environments.Packs] = Language.Fixpoint.Types.Environments.$fShowPacks instance GHC.Show.Show [Language.Fixpoint.Types.Environments.SEnv] = Language.Fixpoint.Types.Environments.$fShowSEnv instance GHC.Show.Show [Language.Fixpoint.Types.Environments.SizedEnv] = Language.Fixpoint.Types.Environments.$fShowSizedEnv instance GHC.Show.Show [Language.Fixpoint.Types.Environments.SolEnv] = Language.Fixpoint.Types.Environments.$fShowSolEnv instance Data.Traversable.Traversable [Language.Fixpoint.Types.Environments.SEnv] = Language.Fixpoint.Types.Environments.$fTraversableSEnv instance Data.Traversable.Traversable [Language.Fixpoint.Types.Environments.SizedEnv] = Language.Fixpoint.Types.Environments.$fTraversableSizedEnv family instance GHC.Generics.Rep [Language.Fixpoint.Types.Environments.Packs] = Language.Fixpoint.Types.Environments.Rep_Packs family instance GHC.Generics.Rep [Language.Fixpoint.Types.Environments.SolEnv] = Language.Fixpoint.Types.Environments.Rep_SolEnv family instance GHC.Generics.Rep [Language.Fixpoint.Types.Environments.SizedEnv] = Language.Fixpoint.Types.Environments.Rep_SizedEnv family instance GHC.Generics.Rep [Language.Fixpoint.Types.Environments.SEnv] = Language.Fixpoint.Types.Environments.Rep_SEnv family instance GHC.Generics.Rep [Language.Fixpoint.Types.Environments.IBindEnv] = Language.Fixpoint.Types.Environments.Rep_IBindEnv "SPEC/Language.Fixpoint.Types.Environments $dmdataCast1 @ IBindEnv" [ALWAYS] forall ($dData :: Data.Data.Data Language.Fixpoint.Types.Environments.IBindEnv) Data.Data.$dmdataCast1 @ Language.Fixpoint.Types.Environments.IBindEnv $dData = Language.Fixpoint.Types.Environments.$fDataIBindEnv_$s$dmdataCast1 "SPEC/Language.Fixpoint.Types.Environments $dmdataCast2 @ IBindEnv" [ALWAYS] forall ($dData :: Data.Data.Data Language.Fixpoint.Types.Environments.IBindEnv) Data.Data.$dmdataCast2 @ Language.Fixpoint.Types.Environments.IBindEnv $dData = Language.Fixpoint.Types.Environments.$fDataIBindEnv_$s$dmdataCast2 "SPEC/Language.Fixpoint.Types.Environments $dmput @ Packs" [ALWAYS] forall ($dGBinaryPut :: Data.Binary.Class.GBinaryPut (GHC.Generics.Rep Language.Fixpoint.Types.Environments.Packs)) ($dGeneric :: GHC.Generics.Generic Language.Fixpoint.Types.Environments.Packs) ($dBinary :: Data.Binary.Class.Binary Language.Fixpoint.Types.Environments.Packs) Data.Binary.Class.$dmput @ Language.Fixpoint.Types.Environments.Packs $dBinary $dGeneric $dGBinaryPut = Language.Fixpoint.Types.Environments.$fBinaryPacks_$s$dmput "SPEC/Language.Fixpoint.Types.Environments $dmrnf @ BindEnv" [ALWAYS] forall ($dGNFData :: Control.DeepSeq.GNFData (GHC.Generics.Rep Language.Fixpoint.Types.Environments.BindEnv)) ($dGeneric :: GHC.Generics.Generic Language.Fixpoint.Types.Environments.BindEnv) ($dNFData :: Control.DeepSeq.NFData Language.Fixpoint.Types.Environments.BindEnv) Control.DeepSeq.$dmrnf @ (Language.Fixpoint.Types.Environments.SizedEnv (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) $dNFData $dGeneric $dGNFData = Language.Fixpoint.Types.Environments.$fNFDataSizedEnv_$s$dmrnf "SPEC/Language.Fixpoint.Types.Environments $dmrnf @ IBindEnv" [ALWAYS] forall ($dGNFData :: Control.DeepSeq.GNFData (GHC.Generics.Rep Language.Fixpoint.Types.Environments.IBindEnv)) ($dGeneric :: GHC.Generics.Generic Language.Fixpoint.Types.Environments.IBindEnv) ($dNFData :: Control.DeepSeq.NFData Language.Fixpoint.Types.Environments.IBindEnv) Control.DeepSeq.$dmrnf @ Language.Fixpoint.Types.Environments.IBindEnv $dNFData $dGeneric $dGNFData = Language.Fixpoint.Types.Environments.$fNFDataIBindEnv_$s$dmrnf "SPEC/Language.Fixpoint.Types.Environments $dmrnf @ Packs" [ALWAYS] forall ($dGNFData :: Control.DeepSeq.GNFData (GHC.Generics.Rep Language.Fixpoint.Types.Environments.Packs)) ($dGeneric :: GHC.Generics.Generic Language.Fixpoint.Types.Environments.Packs) ($dNFData :: Control.DeepSeq.NFData Language.Fixpoint.Types.Environments.Packs) Control.DeepSeq.$dmrnf @ Language.Fixpoint.Types.Environments.Packs $dNFData $dGeneric $dGNFData = Language.Fixpoint.Types.Environments.$fNFDataPacks_$s$dmrnf "SPEC/Language.Fixpoint.Types.Environments $dmsimplify @ BindEnv" [ALWAYS] forall ($dFixpoint :: Language.Fixpoint.Types.PrettyPrint.Fixpoint Language.Fixpoint.Types.Environments.BindEnv) Language.Fixpoint.Types.PrettyPrint.$dmsimplify @ (Language.Fixpoint.Types.Environments.SizedEnv (Language.Fixpoint.Types.Names.Symbol, Language.Fixpoint.Types.Refinements.SortedReft)) $dFixpoint = Language.Fixpoint.Types.Environments.$fFixpointSizedEnv_$s$dmsimplify "SPEC/Language.Fixpoint.Types.Environments $dmsimplify @ IBindEnv" [ALWAYS] forall ($dFixpoint :: Language.Fixpoint.Types.PrettyPrint.Fixpoint Language.Fixpoint.Types.Environments.IBindEnv) Language.Fixpoint.Types.PrettyPrint.$dmsimplify @ Language.Fixpoint.Types.Environments.IBindEnv $dFixpoint = Language.Fixpoint.Types.Environments.$fFixpointIBindEnv_$s$dmsimplify "SPEC/Language.Fixpoint.Types.Environments $dmsimplify @ Packs" [ALWAYS] forall ($dFixpoint :: Language.Fixpoint.Types.PrettyPrint.Fixpoint Language.Fixpoint.Types.Environments.Packs) Language.Fixpoint.Types.PrettyPrint.$dmsimplify @ Language.Fixpoint.Types.Environments.Packs $dFixpoint = Language.Fixpoint.Types.Environments.$fFixpointPacks_$s$dmsimplify "SPEC/Language.Fixpoint.Types.Environments $fBinary(,) @ Symbol @ SortedReft" [ALWAYS] forall ($dBinary1 :: Data.Binary.Class.Binary Language.Fixpoint.Types.Refinements.SortedReft) ($dBinary :: Data.Binary.Class.Binary Language.Fixpoint.Types.Names.Symbol) Data.Binary.Class.$fBinary(,) @ Language.Fixpoint.Types.Names.Symbol @ Language.Fixpoint.Types.Refinements.SortedReft $dBinary $dBinary1 = Language.Fixpoint.Types.Environments.$fBinarySizedEnv_$s$fBinary(,) "SPEC/Language.Fixpoint.Types.Environments $fDataHashSet @ Int" [ALWAYS] forall ($dHashable :: Data.Hashable.Class.Hashable GHC.Types.Int) ($dEq :: GHC.Classes.Eq GHC.Types.Int) ($dData :: Data.Data.Data GHC.Types.Int) Data.HashSet.$fDataHashSet @ GHC.Types.Int $dData $dEq $dHashable = Language.Fixpoint.Types.Environments.$fDataIBindEnv_$s$fDataHashSet "SPEC/Language.Fixpoint.Types.Environments $fEqHashMap_$c/= @ KVar @ Int" [ALWAYS] forall ($dEq1 :: GHC.Classes.Eq GHC.Types.Int) ($dEq :: GHC.Classes.Eq Language.Fixpoint.Types.Refinements.KVar) Data.HashMap.Base.$fEqHashMap_$c/= @ Language.Fixpoint.Types.Refinements.KVar @ GHC.Types.Int $dEq $dEq1 = Language.Fixpoint.Types.Environments.$fEqPacks_$s$fEqHashMap_$c/= "SPEC/Language.Fixpoint.Types.Environments $fEqHashMap_$c== @ KVar @ Int" [ALWAYS] forall ($dEq1 :: GHC.Classes.Eq GHC.Types.Int) ($dEq :: GHC.Classes.Eq Language.Fixpoint.Types.Refinements.KVar) Data.HashMap.Base.$fEqHashMap_$c== @ Language.Fixpoint.Types.Refinements.KVar @ GHC.Types.Int $dEq $dEq1 = Language.Fixpoint.Types.Environments.$fEqPacks_$s$fEqHashMap_$c== "SPEC/Language.Fixpoint.Types.Environments $fEqHashSet_$c/= @ Int" [ALWAYS] forall ($dEq :: GHC.Classes.Eq GHC.Types.Int) Data.HashSet.$fEqHashSet_$c/= @ GHC.Types.Int $dEq = Language.Fixpoint.Types.Environments.$fEqIBindEnv_$s$fEqHashSet_$c/= "SPEC/Language.Fixpoint.Types.Environments $fEqHashSet_$c== @ Int" [ALWAYS] forall ($dEq :: GHC.Classes.Eq GHC.Types.Int) Data.HashSet.$fEqHashSet_$c== @ GHC.Types.Int $dEq = Language.Fixpoint.Types.Environments.$fEqIBindEnv_$s$fEqHashSet_$c== "SPEC/Language.Fixpoint.Types.Environments $fShow(,) @ Symbol @ SortedReft" [ALWAYS] forall ($dShow1 :: GHC.Show.Show Language.Fixpoint.Types.Refinements.SortedReft) ($dShow :: GHC.Show.Show Language.Fixpoint.Types.Names.Symbol) GHC.Show.$fShow(,) @ Language.Fixpoint.Types.Names.Symbol @ Language.Fixpoint.Types.Refinements.SortedReft $dShow $dShow1 = Language.Fixpoint.Types.Environments.$fShowSizedEnv_$s$fShow(,) "SPEC/Language.Fixpoint.Types.Environments $fShow(,)_$cshow @ Symbol @ SortedReft" [ALWAYS] forall ($dShow1 :: GHC.Show.Show Language.Fixpoint.Types.Refinements.SortedReft) ($dShow :: GHC.Show.Show Language.Fixpoint.Types.Names.Symbol) GHC.Show.$fShow(,)_$cshow @ Language.Fixpoint.Types.Names.Symbol @ Language.Fixpoint.Types.Refinements.SortedReft $dShow $dShow1 = Language.Fixpoint.Types.Environments.$fShowSizedEnv_$s$fShow(,)_$cshow "SPEC/Language.Fixpoint.Types.Environments $fShow(,)_$cshowList @ Symbol @ SortedReft" [ALWAYS] forall ($dShow1 :: GHC.Show.Show Language.Fixpoint.Types.Refinements.SortedReft) ($dShow :: GHC.Show.Show Language.Fixpoint.Types.Names.Symbol) GHC.Show.$fShow(,)_$cshowList @ Language.Fixpoint.Types.Names.Symbol @ Language.Fixpoint.Types.Refinements.SortedReft $dShow $dShow1 = Language.Fixpoint.Types.Environments.$fShowSizedEnv_$s$fShow(,)_$cshowList "SPEC/Language.Fixpoint.Types.Environments $wunion @ BindId _" [0] forall @ v (w :: GHC.Classes.Eq Language.Fixpoint.Types.Environments.BindId) Data.HashMap.Base.$wunion @ GHC.Types.Int @ v w = Language.Fixpoint.Types.Environments.$fMonoidIBindEnv_$s$wunion @ v "SPEC/Language.Fixpoint.Types.Environments $wunion @ KVar _" [0] forall @ v (w :: GHC.Classes.Eq Language.Fixpoint.Types.Refinements.KVar) Data.HashMap.Base.$wunion @ Language.Fixpoint.Types.Refinements.KVar @ v w = Language.Fixpoint.Types.Environments.$fMonoidPacks_$s$wunion @ v "SPEC/Language.Fixpoint.Types.Environments $wunion @ Symbol _" [0] forall @ v (w :: GHC.Classes.Eq Language.Fixpoint.Types.Names.Symbol) Data.HashMap.Base.$wunion @ Language.Fixpoint.Types.Names.Symbol @ v w = Language.Fixpoint.Types.Environments.$fMonoidSEnv_$s$wunion @ v "SPEC/Language.Fixpoint.Types.Environments $wupdateOrConcatWithKey @ BindId _" [0] forall @ v (w :: GHC.Classes.Eq Language.Fixpoint.Types.Environments.BindId) Data.HashMap.Base.$wupdateOrConcatWithKey @ GHC.Types.Int @ v w = Language.Fixpoint.Types.Environments.$s$wupdateOrConcatWithKey1 @ v "SPEC/Language.Fixpoint.Types.Environments $wupdateOrConcatWithKey @ KVar _" [0] forall @ v (w :: GHC.Classes.Eq Language.Fixpoint.Types.Refinements.KVar) Data.HashMap.Base.$wupdateOrConcatWithKey @ Language.Fixpoint.Types.Refinements.KVar @ v w = Language.Fixpoint.Types.Environments.$s$wupdateOrConcatWithKey @ v "SPEC/Language.Fixpoint.Types.Environments adjust @ BindId _" [ALWAYS] forall @ v ($dHashable :: Data.Hashable.Class.Hashable Language.Fixpoint.Types.Environments.BindId) ($dEq :: GHC.Classes.Eq Language.Fixpoint.Types.Environments.BindId) Data.HashMap.Strict.adjust @ GHC.Types.Int @ v $dEq $dHashable = Language.Fixpoint.Types.Environments.$sadjust @ v "SPEC/Language.Fixpoint.Types.Environments difference @ Symbol _ _" [ALWAYS] forall @ v @ w ($dHashable :: Data.Hashable.Class.Hashable Language.Fixpoint.Types.Names.Symbol) ($dEq :: GHC.Classes.Eq Language.Fixpoint.Types.Names.Symbol) Data.HashMap.Base.difference @ Language.Fixpoint.Types.Names.Symbol @ v @ w $dEq $dHashable = Language.Fixpoint.Types.Environments.$sdifference @ v @ w "SPEC/Language.Fixpoint.Types.Environments insert @ Symbol _" [ALWAYS] forall @ v ($dHashable :: Data.Hashable.Class.Hashable Language.Fixpoint.Types.Names.Symbol) ($dEq :: GHC.Classes.Eq Language.Fixpoint.Types.Names.Symbol) Data.HashMap.Base.insert @ Language.Fixpoint.Types.Names.Symbol @ v $dEq $dHashable = Language.Fixpoint.Types.Environments.$sinsert @ v "SPEC/Language.Fixpoint.Types.Environments intersectionWith @ Symbol _ _ _" [ALWAYS] forall @ v1 @ v2 @ v3 ($dHashable :: Data.Hashable.Class.Hashable Language.Fixpoint.Types.Names.Symbol) ($dEq :: GHC.Classes.Eq Language.Fixpoint.Types.Names.Symbol) Data.HashMap.Strict.intersectionWith @ Language.Fixpoint.Types.Names.Symbol @ v1 @ v2 @ v3 $dEq $dHashable = Language.Fixpoint.Types.Environments.$sintersectionWith @ v1 @ v2 @ v3 "SPEC/Language.Fixpoint.Types.Environments lookup @ KVar _" [ALWAYS] forall @ v ($dHashable :: Data.Hashable.Class.Hashable Language.Fixpoint.Types.Refinements.KVar) ($dEq :: GHC.Classes.Eq Language.Fixpoint.Types.Refinements.KVar) Data.HashMap.Base.lookup @ Language.Fixpoint.Types.Refinements.KVar @ v $dEq $dHashable = Language.Fixpoint.Types.Environments.$slookup @ v "SPEC/Language.Fixpoint.Types.Environments lookup @ Symbol _" [ALWAYS] forall @ v ($dHashable :: Data.Hashable.Class.Hashable Language.Fixpoint.Types.Names.Symbol) ($dEq :: GHC.Classes.Eq Language.Fixpoint.Types.Names.Symbol) Data.HashMap.Base.lookup @ Language.Fixpoint.Types.Names.Symbol @ v $dEq $dHashable = Language.Fixpoint.Types.Environments.$slookup1 @ v "SPEC/Language.Fixpoint.Types.Environments pprint @ [BindId]" [ALWAYS] forall ($dPPrint :: Language.Fixpoint.Types.PrettyPrint.PPrint [Language.Fixpoint.Types.Environments.BindId]) Language.Fixpoint.Types.PrettyPrint.pprint @ [Language.Fixpoint.Types.Environments.BindId] $dPPrint = Language.Fixpoint.Types.Environments.$fPPrintIBindEnv_$spprint "SPEC/Language.Fixpoint.Types.Environments shows @ Packs" [ALWAYS] forall ($dShow :: GHC.Show.Show Language.Fixpoint.Types.Environments.Packs) GHC.Show.shows @ Language.Fixpoint.Types.Environments.Packs $dShow = Language.Fixpoint.Types.Environments.$fShowPacks_$sshows "SPEC/Language.Fixpoint.Types.Environments shows @ SolEnv" [ALWAYS] forall ($dShow :: GHC.Show.Show Language.Fixpoint.Types.Environments.SolEnv) GHC.Show.shows @ Language.Fixpoint.Types.Environments.SolEnv $dShow = Language.Fixpoint.Types.Environments.$fShowSolEnv_$sshows vectorised variables: vectorised tycons: vectorised reused tycons: parallel variables: parallel tycons: trusted: none require own pkg trusted: False