Îõ³h&2Œ//þ      !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}(c) 2020-2021 Tim EmiolaBSD30Tim Emiola  Safe-Inferred)*01ÁÂÃÄÅÌÙÚÜïu~tmp-proc Used internally by @SortSymbols.tmp-proc Used internally by @SortSymbols.tmp-procSort a list of type-level symbols using merge sort.Examples):kind! SortSymbols '["xyz", "def", "abc"].SortSymbols '["xyz", "def", "abc"] :: [Symbol]= '["abc", "def", "xyz"]€tmp-proc Implements .tmp-proc"Computes the midpoint of a number.ÚN.B: maximum value that this works for depends on the reduction limit of the type-checker.Examples:kind! CmpNat 49 (HalfOf 99)!CmpNat 49 (HalfOf 99) :: Ordering= 'EQ:kind! CmpNat 50 (HalfOf 100)"CmpNat 50 (HalfOf 100) :: Ordering= 'EQtmp-proc#Counts a list, 1 element at a time.Examples(:kind! CmpNat 4 (LengthOf '[1, 2, 3, 4])-CmpNat 4 (LengthOf '[1, 2, 3, 4]) :: Ordering= 'EQtmp-procÂDrops 1 element at a time until the the dropped target is reached.Examples#:kind! Drop '["a", "b", "c", "d"] 2(Drop '["a", "b", "c", "d"] 2 :: [Symbol] = '["c", "d"]:kind! Drop '["a"] 2Drop '["a"] 2 :: [Symbol]= '[]tmp-procÊTakes 1 element at a time from a list until the desired length is reached.Examples#:kind! Take '["a", "b", "c", "d"] 2(Take '["a", "b", "c", "d"] 2 :: [Symbol] = '["a", "b"](c) 2020-2021 Tim EmiolaBSD30Tim Emiola  Safe-Inferred ")*/01ÁÂÃÄÅÌÙÚÜïetmp-procGenerate proof instances of .tmp-proc2Proves a type is present in a list of other types.tmp-procAllows reordering of similar s.ExamplesÐhReorder @_ @'[Bool, Int] ('c' &: (3 :: Int) &: True &: (3.1 :: Double) &: HNil)True &: 3 &: HNilØhReorder @_ @'[Double, Bool, Int] ('c' &: (3 :: Int) &: True &: (3.1 :: Double) &: HNil)3.1 &: True &: 3 &: HNiltmp-procGenerate proof instances of ‚.‚tmp-proc8Proves that symbols with corresponding types occur as a  in a list of  typesNote - both the list symbols and  types need to be sorted, with  types sorted by key. TODO:? is there an easy way to incorporate this rule into the proof ? tmp-procGenerate proof instances of  . tmp-proc9Proves a symbol and its type occur as entry in a list of  types.tmp-procËA constraint that confirms that a type is not present in a type-level list.tmp-procUse a type-level symbol as key type that indexes a value type.tmp-procDefines a Heterogenous list.tmp-procObtain the first element of a .tmp-procGet an item in an  given its type.tmp-procAn infix alias for .tmp-procConstruct a two-item HList.tmp-procAn infix alias for .tmp-procConstruct a singleton HListtmp-procSelect an item from an  of s by key.N.BÉ Returns the first item. It assumes the keys in the KV HList are unique. TODO:& enforce this rule using a constraint.ExamplesÚselect @"d" @Double @'[KV "b" Bool, KV "d" Double] (V True &: V (3.1 :: Double) &: HNil)3.1tmp-proc)Select items with specified keys from an  of s by key.N.B.# this this is an internal function.€The keys must be provided in the same order as they occur in the HList, any other order will likely result in an compiler error.ExamplesáselectMany @'["b"] @'[Bool] @'[KV "b" Bool, KV "d" Double] (V True &: V (3.1 :: Double) &: HNil) True &: HNil    5566(c) 2020-2021 Tim EmiolaBSD30Tim Emiola  Safe-Inferred "')*/01ÁÂÃÄÅÌÙÚÜãï$—ƒtmp-procSort lists of L types.„tmp-procConvert list of H types to corresponding I types.+tmp-proc4Declares a proof that a list of types only contains Hs.…tmp-procUsed by +( to prove a list of types just contains Hs.†tmp-proc,Used to prove a list of types just contains Ls.,tmp-proc4Declares a proof that a list of types only contains ?s.-tmp-procUsed by ,( to prove a list of types just contains ?s.‡tmp-procConvert list of L types to corresponding  types.ˆtmp-procConverts list of ? the corresponding A symbols.0tmp-proc A list of L values.1tmp-proc,Converts list of types to the corresponding L types.‰tmp-proc*Specifies how to obtain the service URI a L at an index in a list.2tmp-procÑObtains the service URI of the handle whose index is specified by the proxy type.Štmp-procSpecifies how to ping a L at an index in a list.3tmp-proc1 to report any unexpected exceptions that escape E.<tmp-procThe service is running OK.=tmp-procThe service is not running.>tmp-proc+Contact to the service failed unexpectedly.?tmp-proc9Specifies how to launch a temporary process using Docker.@tmp-proc)The image name of the docker image, e.g,  postgres:10.6Atmp-procÊA label used to refer to running process created from this image, e.g,  a-postgres-dbBtmp-procÆAdditional arguments to the docker command that launches the tmp proc.Ctmp-proc;Determines the service URI of the process, when applicable.Dtmp-proc(Resets some state in a tmp proc service.Etmp-proc"Checks if the tmp proc started ok.Ftmp-proc2Maximum number of pings to perform during startup.Gtmp-proc%Number of milliseconds between pings.Htmp-proc)Specifies how to a get a connection to a ?.Itmp-procThe connection type.Jtmp-proc%Get a connection to the Proc via its L.Ktmp-procClose a connection to a ?.Ltmp-procProvides access to a ? that has been started.Rtmp-proc.Determines if the docker daemon is accessible.Stmp-proc Set up some ?s4, run an action that uses them, then terminate them.Ttmp-procStart up processes for each ? type.Utmp-proc&Terminate all processes owned by some Ls.tmp-proc!Terminate the process owned by a Ls.Vtmp-procName of a process.Wtmp-procSimplifies use of B.Žtmp-procSimplifies use of F.tmp-procSimplifies use of G.Xtmp-procSimplifies use of C.tmp-procThe full args of a  docker run command for starting up a ?.Ytmp-proc Starts a ?.It uses E to determine if the ?Å started up ok, and will fail by throwing an exception if it did not. Returns the L used to control the ? once a ping has succeeded.Ztmp-proc6Use an action that might throw an exception as a ping.‘tmp-procPing a L several times.[tmp-procRun an action on a H handle as a callback on its I\tmp-procSelect the named Ls from an  of L.]tmp-proc Builds on 5 ; gives the I of the L to a callback.’tmp-proc Create a  of s from a  of Ls.“tmp-proc Convert a L to a .^tmp-proc Open all the H types to corresponding I types._tmp-proc Close some H types.`tmp-proc9Open some connections, use them in an action; close them.atmp-proc>Open all known connections; use them in an action; close them.btmp-proc>Open the named connections; use them in an action; close them.Ð +,-./0123456789:;<=>?A@DBCEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abÐ?A@DBCEFG;<=>,-./VYZXWLMNOPQ10TUS\5432876HIJK+[]^_`abR:9 (c) 2020-2021 Tim EmiolaBSD30Tim Emiola  Safe-Inferred'Âã.9”tmp-proc&Simplifies creation of a ready action.qtmp-proc.Represents a started Warp application and any , dependencies.rtmp-procRuns an • with  ProcHandle dependencies on a free port.stmp-procLike r; with an additional ready+ that determines if the server is ready.'. ttmp-procLike r; the port is secured with –. utmp-procLike s; the port is secured with –. —tmp-procUsed to implement svtmp-procShuts down the q server and its tmp proc dependencies.wtmp-procThe qs  ProcHandles.xtmp-procThe ˜ on which the qs server is running.ytmp-proc Set up some  ProcHandles then run an •" that uses them on a free port.-Allows the app to configure itself using the  tmp procs6, then provides a callback with access to the handles.The  tmp procs1 are shut down when the application is shut down.ztmp-procLike y6, but the port is secured using a 'Warp.TLSSettings. '{tmp-proc Set up some  ProcHandles then run an •" that uses them on a free port.-Allows the app to configure itself using the  tmp procs6, then provides a callback with access to the handles. Also runs a ready? action that to determine if the application started correctly.The  tmp procs1 are shut down when the application is shut down.|tmp-procLike {; the port is secured with –. }tmp-proc-Simplifies writing the health checks used by ready variants of this module.™tmp-procA š configured with a ready action.9The ready action is used to check if a server is healthy.›tmp-procA š configured with a ready action.9The ready action is used to check if a server is healthy.œtmp-proc&Simplifies creation of a ready action.tmp-proc*Gap between service pings in milliseconds.žtmp-procLike Ÿ/ , but the port is secured using the provided –. tmp-procÒLike "Network.Wai.Handler.Warp.openFreePort" but closes the socket before exiting.¡tmp-procImproves readability... qrstuvwxyz{|} y{z|qxwvrstu}(c) 2020-2021 Tim EmiolaBSD30Tim Emiola  Safe-Inferred.Êà +,-./0123456789:;><=?GFECBDA@@AHKIJILQPOMNRSTUVWXYZ[\]^_`abqrstuvwxyz{|}¢      !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~€‚ƒ„…†‡ˆ‰Š‹ŒŽ‘’“”•–—˜™š›œžŸ ¡¢£¤¡¥¦§¨©ª¡«¬­®¯'tmp-proc-0.5.3.0-Ci3g5OSsHu7AFkrszeN0yySystem.TmpProc.DockerSystem.TmpProc.TypeLevelSystem.TmpProc.WarpSystem.TmpProc.TypeLevel.SortSystem.TmpProc SortSymbolsHalfOfLengthOfDropTake IsInProofReorderHhReorder ManyMemberKV manyProofMemberKV lookupProofLookupKVAtHead OtherKeysIsAbsentKVVHListHNilHConshHeadhOf&:both&:&onlyselect selectMany $fEqHList $fEqHList0 $fShowHList $fShowHList0 $fMemberKVkt:$fMemberKVkt:0$fMemberKVkt:1$fManyMemberKVksts:$fManyMemberKV:::$fManyMemberKV:::0$fReorderHxs[] $fIsInProoft:$fIsInProoft:0 $fReorderHxs: ConnectablesAreProcs SomeProcs SomeProcsNil SomeProcsCons HandlesOf Proc2HandleixUriOfixPingixResethandleOfSomeNamedHandlesHasNamedHandle HasHandleSvcURI HostIpAddressPingedOKNotOK PingFailedProcImageNamerunArgsuriOfresetping pingCountpingGap ConnectableConnopenConn closeConn ProcHandlehProchPidhUrihAddr hasDocker withTmpProcs startupAll terminateAllnameOfrunArgs'uriOf'startuptoPinged withTmpConn manyNamed withConnOfopenAllcloseAll withConnswithKnownConnswithNamedConns $fAreProcs: $fAreProcs[]$fIxUriOfSymbolnameprocs$fIxPingSymbolnameprocs$fIxResetSymbolnameprocs$fHandleOfSymbolnameprocsp$fIxUriOfTYPEpprocs$fIxPingTYPEpprocs$fIxResetTYPEpprocs$fHandleOfTYPEpprocsp$fConnectables:$fConnectables[] $fEqPinged $fShowPinged ServerHandle runServerrunReadyServer runTLSServerrunReadyTLSServershutdownhandles serverPorttestWithApplicationtestWithTLSApplicationtestWithReadyApplicationtestWithReadyTLSApplication checkHealth MergeSymbolsSortSymbolsStep HalfOfImplIsIn LookupMany SortHandlesConnsOf SomeConns SomeHandles Handle2KV Proc2NameIxUriOfIxPingIxResetHandleOf terminate pingCount'pingGap' dockerCmdArgsnPingstoKVstoKV PortWaiter wai-3.2.3-HcRsDPD1jvkAbx3SrvpHv6 Network.Wai Application%warp-tls-3.4.0-5o7AfhqvI0yCBo66L26XRC$Network.Wai.Handler.WarpTLS.Internal TLSSettingsrunReadyServer'"warp-3.3.28-51DgxPZsPNULJJBN3QJIfmNetwork.Wai.Handler.Warp.TypesPort readySettings!Network.Wai.Handler.Warp.SettingsSettingswaiterSettingsmkWaiter pingPeriodwithTLSApplicationSettings(Network.Wai.Handler.Warp.WithApplicationtestWithApplicationSettings withFreePort doNothing