mmap-index ( matrix quot -- matrix' )

Vocabulary

rosetta-code.bitmap

Inputs

matrix	an object
quot	an object

Outputs

matrix'

an object

Definition

USING: arrays kernel sequences ;

IN: rosetta-code.bitmap

: mmap-index ( matrix quot -- matrix' )
    [ swap 2array ] prepose [ curry map-index ] curry map-index
    ; inline