remove-source ( seq elt -- seq )

Vocabulary

project-euler.079.private

Inputs

seq	an object
elt	an object

Outputs

seq

an object

Definition

USING: kernel sequences ;

IN: project-euler.079.private

: remove-source ( seq elt -- seq )
    [ swap member? ] curry reject ;