bmp-image

Vocabulary

images.bitmap

Definition

IN: images.bitmap

SINGLETON: bmp-image

Methods

USING: images images.bitmap images.loader images.normalization
kernel ;

M: bmp-image image>stream
    2drop BGR reorder-components output-bmp ;


USING: accessors arrays combinators images images.bitmap
images.loader kernel math ;

M: bmp-image stream>image*
    drop load-bitmap [ image new ] dip {
        [ loading-bitmap>bytes >>bitmap ]
        [
            header>> [ width>> ] [ height>> abs ] bi 2array
            >>dim
        ]
        [ header>> height>> 0 < not >>upside-down? ]
        [
            bitmap>component-order >>component-order
            ubyte-components >>component-type
        ]
    } cleave ;