intercalate package:streamly

intercalate :: (IsStream t, Monad m) => Unfold m b c -> b -> t m b -> t m c

streamly Streamly.Internal.Data.Stream.IsStream Streamly.Prelude

intersperse followed by unfold and concat.

intercalate unf a str = unfoldMany unf $ intersperse a str
intersperse = intercalate (Unfold.function id)
unwords = intercalate Unfold.fromList " "

>>> Stream.toList $ Stream.intercalate Unfold.fromList " " $ Stream.fromList ["abc", "def", "ghi"]
"abc def ghi"

intercalateSuffix :: (IsStream t, Monad m) => Unfold m b c -> b -> t m b -> t m c

streamly Streamly.Internal.Data.Stream.IsStream Streamly.Prelude

intersperseMSuffix followed by unfold and concat.

intercalateSuffix unf a str = unfoldMany unf $ intersperseMSuffix a str
intersperseMSuffix = intercalateSuffix (Unfold.function id)
unlines = intercalateSuffix Unfold.fromList "\n"

>>> Stream.toList $ Stream.intercalateSuffix Unfold.fromList "\n" $ Stream.fromList ["abc", "def", "ghi"]
"abc\ndef\nghi\n"

gintercalate :: (IsStream t, Monad m) => Unfold m a c -> t m a -> Unfold m b c -> t m b -> t m c

streamly Streamly.Internal.Data.Stream.IsStream

interleaveInfix followed by unfold and concat. Pre-release

gintercalateSuffix :: (IsStream t, Monad m) => Unfold m a c -> t m a -> Unfold m b c -> t m b -> t m c

streamly Streamly.Internal.Data.Stream.IsStream

interleaveSuffix followed by unfold and concat. Pre-release