@@ -111,9 +111,11 @@ class Streaming t where
111-- Constructing a stream
111-- Constructing a stream
112------------------------------------------------------------------------------
112------------------------------------------------------------------------------
114+-- | Add an element a the head of a stream.
114cons :: (Streaming t) => a -> t m a -> t m a
115cons :: (Streaming t) => a -> t m a -> t m a
115cons a r = fromStream $ scons a (Just (toStream r))
116cons a r = fromStream $ scons a (Just (toStream r))
118+-- | An empty stream.
117nil :: Streaming t => t m a
119nil :: Streaming t => t m a
118nil = fromStream $ snil
120nil = fromStream $ snil