nonzero ( seq -- seq' )

Vocabulary
math.extras

Definition

USING: kernel math sequences ;

IN: math.extras

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