interface ComonadTraced : Type -> (Type -> Type) -> Typetrace : m -> w a -> aMonoid m => ComonadTraced m (Morphism m)ComonadTraced m w => ComonadTraced m (EnvT e w)ComonadTraced m w => ComonadTraced m (StoreT s w)(Comonad w, Monoid m) => ComonadTraced m (TracedT m w)trace : ComonadTraced m w => m -> w a -> atraces : ComonadTraced m w => (a -> m) -> w a -> alowerTrace : (ComonadTrans t, ComonadTraced m w) => m -> t w a -> a