box-matrix ( r -- matrix )

Vocabulary
math.matrices

Definition

USING: arrays kernel math sequences ;

IN: math.matrices

: box-matrix ( r -- matrix )
    2 * 1 + dup [ 1 <array> ] curry replicate ;