continue? ( pair seq -- ? )

Vocabulary

project-euler.050.private

Inputs

pair	an object
seq	an object

Outputs

?

an object

Definition

USING: kernel math sequences ;

IN: project-euler.050.private

: continue? ( pair seq -- ? ) [ first ] [ length 1 - ] bi* < ;