nonzero ( seq -- seq' ) (original) (raw)

nonzero ( seq -- seq' )

Vocabulary
math.extras

Inputs

seq a sequence

Outputs

seq' a sequence

Word description
Outputs a new sequence of the same type as seq with all zero elements removed.

Definition

USING: math sequences ;

IN: math.extras

: nonzero ( seq -- seq' ) [ zero? ] reject ;