Sourcetype mb_type = {quant : bool;forward : bool;backward : bool;pattern : bool;intra : bool;
} Sourceval address_increment : (string * int) list Sourceval coded_block_pattern : (string * int) list Sourceval motion_code : (string * int) list Sourceval dc_size_luminance : (string * int) list Sourceval dc_size_chrominance : (string * int) list Sourcetype coefficient = | Coeff of int * int| Eob| Escape