ImageBMP.BitmapMetaData
module HeaderVersion : sig ... end
type bitmap_info_header = {
header_version : HeaderVersion.t;
size : int;
width : int;
height : int;
color_planes : int;
bits_per_pixel : bits_per_pixel;
compression_method : compression_method;
image_data_size : int;
horizontal_ppm : int;
vertical_ppm : int;
palette_colors : int;
important_colors : int;
}
type bitfields = Bitfield.t * Bitfield.t * Bitfield.t * Bitfield.t
type t = {
file_header : FileHeader.t;
info_header : bitmap_info_header;
bitfields : bitfields option;
palette : string option;
}
val int_of_bpp : bits_per_pixel -> int
val read_info_header :
ImageUtil.chunk_reader ->
(bitmap_info_header, [> errors ]) Stdlib.result
val read_bitfield_palette :
FileHeader.t ->
bitmap_info_header ->
ImageUtil.chunk_reader ->
(bitfields option * string option, [> errors ]) Stdlib.result
val read : ImageUtil.chunk_reader -> (t, [> errors ]) Stdlib.result