{-# 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