assoc-refine ( seq -- assoc )


Vocabulary
assocs

Definition
USING: sequences ;

IN: assocs

: assoc-refine ( seq -- assoc )
[ f ] [ [ ] [ assoc-intersect ] map-reduce ] if-empty ;