abnormal-shape

Vocabulary

arrays.shaped

Definition

IN: arrays.shaped

TUPLE: abnormal-shape shape ;

Methods

USING: arrays.shaped ;

M: abnormal-shape check-underlying-shape
    no-abnormally-shaped-arrays ;


USING: accessors arrays.shaped kernel math sequences
sequences.deep ;

M: abnormal-shape shape-capacity
    shape>> 0 swap
    [ [ dup sequence? [ drop ] [ + ] if ] [ 1 + ] if* ]
    deep-each ;