<random-bw-image> ( -- image )

Vocabulary

rosetta-code.image-noise

Inputs

None

Outputs

image

an object

Definition

USING: accessors images kernel ;

IN: rosetta-code.image-noise

: <random-bw-image> ( -- image )
    <image>
    { 320 240 } [ >>dim ] [ <random-images-bytes> >>bitmap ] bi
    L >>component-order ubyte-components >>component-type ;