"2      !"#$%&'()*+,-./01portable provisionalEdward Kmett <ekmett@gmail.com>portable provisionalEdward Kmett <ekmett@gmail.com>portable provisionalEdward Kmett <ekmett@gmail.com>     portable provisionalEdward Kmett <ekmett@gmail.com> ;Ideally we would offer a way to lift comonad homomorphisms  but this isn'5t Haskell 98, so we settle for the most common case. 7liftTrans :: (forall a. w a -> v a) -> t w a -> t v a * cohoist = liftTrans (Identity . extract)     portable provisionalEdward Kmett <ekmett@gmail.com>portable provisionalEdward Kmett <ekmett@gmail.com>    portable provisionalEdward Kmett <ekmett@gmail.com>  !"#$%&'(  !"#$%&'( "#$ !%&'(  ! !"#$%&'(portable provisionalEdward Kmett <ekmett@gmail.com> )*+,-./01 )*+,-./01 ,-.)*+0/1 )*+*+,-./012     !"#$%&&'()*+,-.//01234567comonad-transformers-0.2.0Control.Comonad.Trans.IdentityControl.Comonad.Trans.ClassControl.Comonad.Trans.DiscontControl.Comonad.Hoist.ClassControl.Comonad.Trans.EnvControl.Comonad.Trans.StoreControl.Comonad.Trans.TracedControl.Comonad.Trans.Streamtransformers-0.2.2.0Control.Monad.Trans.Identity runIdentityT IdentityT ComonadTranslowerDiscontTDiscontdiscont runDiscont runDiscontTcallCV ComonadHoistcohoistEnvTEnvenvrunEnvrunEnvTaskStoreTStorestorerunStore runStoreTgetputmodify experimentTracedT runTracedTTracedtraced runTracedtracelistenlistenscensorStreamT runStreamTStreamstream runStreamunfoldstailsunfoldsW