check-shape-domain ( seq -- seq )

Vocabulary

arrays.shaped

Inputs

seq

an object

Outputs

seq

an object

Definition

USING: kernel math sequences ;

IN: arrays.shaped

: check-shape-domain ( seq -- seq )
    dup [ 0 < ] any? [ no-negative-shape-components ] when ;