meaningful-integers ( partition table -- integers )

Vocabulary

regexp.disambiguate

Inputs

partition	an object
table	an object

Outputs

integers

an object

Definition

USING: accessors assocs kernel sequences sets ;

IN: regexp.disambiguate

: meaningful-integers ( partition table -- integers )
    [ [ in>> ] [ out>> ] bi ] dip [ at ] curry
    [ map intersect-all ] curry bi@ diff ;