<relation> ( n -- unionfind )

Vocabulary

project-euler.186

Inputs

n

an object

Outputs

unionfind

an object

Definition

USING: disjoint-sets kernel sequences ;

IN: project-euler.186

: <relation> ( n -- unionfind )
    <iota> <disjoint-set> [ [ add-atom ] curry each ] keep ;