broadcast-shape-matches? ( sa broadcast-shape -- ? )


Vocabulary
arrays.shaped

Inputs
saan object
broadcast-shapean object


Outputs
?an object


Definition
USING: combinators.short-circuit kernel sequences ;

IN: arrays.shaped

: broadcast-shape-matches? ( sa broadcast-shape -- ? )
[ { [ drop 1 = ] [ = ] } 2|| ] 2all? ;