ModuleJuicyPixels-3.3.9Haskell2010

Codec.Picture.Jpg.Internal.DefaultTable

Module used by the jpeg decoder internally, shouldn't be used in user code.

Synopsis

data DctComponent
data HuffmanTree
type HuffmanTable
type HuffmanPackedTree
type MacroBlock
type QuantificationTable
type HuffmanWriterCode
value scaleQuantisationMatrix
value makeMacroBlock
value makeInverseTable
value buildHuffmanTree
value packHuffmanTree
value huffmanPackedDecode
value defaultChromaQuantizationTable
value defaultLumaQuantizationTable
value defaultAcChromaHuffmanTree
value defaultAcChromaHuffmanTable
value defaultAcLumaHuffmanTree
value defaultAcLumaHuffmanTable
value defaultDcChromaHuffmanTree
value defaultDcChromaHuffmanTable
value defaultDcLumaHuffmanTree
value defaultDcLumaHuffmanTable

PackageJuicyPixels-3.3.9
Exports23
LanguageHaskell2010
LicenceBSD-3-Clause
SourceDefaultTable.hs

datadata DctComponent

Source#

Enumeration used to search in the tables for different components.

DcComponent AcComponent

Instances5Eq, Show, Generic, NFData, Rep

Eq DctComponentDefined in JuicyPixels-3.3.9 · Codec.Picture.Jpg.Internal.DefaultTable
Show DctComponentDefined in JuicyPixels-3.3.9 · Codec.Picture.Jpg.Internal.DefaultTable
Generic DctComponentDefined in JuicyPixels-3.3.9 · Codec.Picture.Jpg.Internal.DefaultTable
NFData DctComponentDefined in JuicyPixels-3.3.9 · Codec.Picture.Jpg.Internal.DefaultTable
type Rep DctComponent = D1 ('MetaData "DctComponent" "Codec.Picture.Jpg.Internal.DefaultTable" "JuicyPixels-3.3.9-98IomDAxCXK9DDHNBBweia" 'False) (C1 ('MetaCons "DcComponent" 'PrefixI 'False) U1 :+: C1 ('MetaCons "AcComponent" 'PrefixI 'False) U1)Defined in JuicyPixels-3.3.9 · Codec.Picture.Jpg.Internal.DefaultTable

datadata HuffmanTree

Source#

Tree storing the code used for huffman encoding.

Constructors

Branch HuffmanTree HuffmanTree
If bit is 0 take the first subtree, if 1, the right.
Leaf Word8
We should output the value
Empty
no value present

Instances2Eq, Show

Eq HuffmanTreeDefined in JuicyPixels-3.3.9 · Codec.Picture.Jpg.Internal.DefaultTable
Show HuffmanTreeDefined in JuicyPixels-3.3.9 · Codec.Picture.Jpg.Internal.DefaultTable

typetype HuffmanTable = [[Word8]]

typetype HuffmanPackedTree = Vector Word16

typetype MacroBlock a = Vector a

Source#

Represent a compact array of 8 * 8 values. The size is not guarenteed by type system, but if makeMacroBlock is used, everything should be fine size-wise

typetype QuantificationTable = MacroBlock Int16

typetype HuffmanWriterCode = Vector (Word8, Word16)

valuescaleQuantisationMatrix :: Int -> QuantificationTable -> QuantificationTable

valuemakeMacroBlock :: Storable a => [a] -> MacroBlock a

Source#

Helper function to create pure macro block of the good size.

valuemakeInverseTable :: HuffmanTree -> HuffmanWriterCode

valuebuildHuffmanTree :: [[Word8]] -> HuffmanTree

Source#

Transform parsed coefficients from the jpeg header to a tree which can be used to decode data.

valuepackHuffmanTree :: HuffmanTree -> HuffmanPackedTree

valuehuffmanPackedDecode :: HuffmanPackedTree -> BoolReader s Word8

valuedefaultChromaQuantizationTable :: QuantificationTable

valuedefaultLumaQuantizationTable :: QuantificationTable

valuedefaultAcChromaHuffmanTree :: HuffmanTree

valuedefaultAcChromaHuffmanTable :: HuffmanTable

valuedefaultAcLumaHuffmanTree :: HuffmanTree

valuedefaultAcLumaHuffmanTable :: HuffmanTable

Source#

From the Table K.5 of ITU-81 (p154)

valuedefaultDcChromaHuffmanTree :: HuffmanTree

valuedefaultDcChromaHuffmanTable :: HuffmanTable

Source#

From the Table K.4 of ITU-81 (p153)

valuedefaultDcLumaHuffmanTree :: HuffmanTree

valuedefaultDcLumaHuffmanTable :: HuffmanTable

Source#

From the Table K.3 of ITU-81 (p153)