overlap? ( seq -- ? )

Vocabulary

project-euler.043.private

Inputs

seq

an object

Outputs

?

an object

Definition

USING: kernel sequences ;

IN: project-euler.043.private

: overlap? ( seq -- ? )
    [ first 2 tail* ] [ second 2 head ] bi = ;