move-by-page ( amount range -- )

Vocabulary

models.range

Inputs

amount	a real
range	a range

Outputs

None

Word description

Adds a multiple of the page size to a range model's current value.

Side effects

Modifies range

Definition

USING: kernel math ;

IN: models.range

: move-by-page ( amount range -- )
    [ range-page-value * ] keep move-by ;