diagonal? ( coord -- ? )

Vocabulary

arrays.shaped

Inputs

coord

an object

Outputs

?

an object

Definition

USING: combinators.short-circuit kernel sequences ;

IN: arrays.shaped

: diagonal? ( coord -- ? ) { [ 2d? ] [ first2 = ] } 1&& ;