ushorts>ubytes ( bitmap -- bitmap' )


Vocabulary
images.normalization.private

Inputs
bitmapan object


Outputs
bitmap'an object


Definition
USING: alien.c-types alien.data math sequences ;

IN: images.normalization.private

: ushorts>ubytes ( bitmap -- bitmap' )
ushort cast-array [ -8 shift ] B{ } map-as ; inline