-- | Glues audio files together sequentially.
concatenate :: (KnownNat r, KnownNat c) => [Audio r c] -> Audio r c
concatenate = concatenate' . map (1,)
concatenate :: (KnownNat r, KnownNat c) => [Audio r c] -> Audio r c
concatenate = concatenate' . map (1,)
concatenate = concatenate' . map (1,)