-- | Meta data for a presentation of a /movie/.
module Data.ByteString.IsoBaseFileFormat.Boxes.Track where

import Data.ByteString.IsoBaseFileFormat.Box

-- * @trak@ Box
-- | Compose a 'Track' box from the given boxes.
track
  :: Boxes ts -> Box (ContainerBox Track ts)
track = containerBox ()

-- | Container box for tracks.
data Track

instance IsBox Track where
  type BoxContent Track = ()

type instance BoxTypeSymbol Track = "trak"