{-# OPTIONS_HADDOCK hide #-}
module Codec.BMP.Base
        ( BMP   (..))
where
import Codec.BMP.FileHeader
import Codec.BMP.BitmapInfo
import Data.ByteString


-- | A BMP image.
--      For an uncompressed image, the image data contains triples of BGR
--      component values. Each line may also have zero pad values on the end,
--      to bring them up to a multiple of 4 bytes in length.
data BMP
        = BMP
        { bmpFileHeader         :: FileHeader
        , bmpBitmapInfo         :: BitmapInfo
        , bmpRawImageData       :: ByteString }
        deriving Show