read-numbers ( n lim -- )

Vocabulary

images.pgm

Inputs

n	an object
lim	an object

Outputs

None

Definition

USING: kernel make math ;

IN: images.pgm

:: read-numbers ( n lim -- )
    n lim = [ read-number , n 1 + lim read-numbers ] unless ;