Monoid.hs

{-# LANGUAGE NoImplicitPrelude #-}

module Papa.Data.Monoid(
  mconcat  
) where

import Data.Foldable(Foldable, fold)
import Data.Monoid(Monoid)

mconcat ::
  (Monoid a, Foldable f) =>
  f a
  -> a
mconcat =
  fold