matrix>image ( m -- image )


Vocabulary
images.processing

Inputs
man object


Outputs
imagean object


Definition
USING: accessors byte-arrays images kernel math math.order
sequences sequences.deep ;

IN: images.processing

: matrix>image ( m -- image )
<image> over matrix-dim >>dim swap flip flatten
[ 128 * 128 + 0 255 clamp >fixnum ] map >byte-array >>bitmap
L >>component-order ubyte-components >>component-type ;