make-anagram-hash ( strings -- assoc )

Vocabulary

anagrams

Inputs

strings

an object

Outputs

assoc

an object

Definition

USING: assocs math sequences sets sorting ;

IN: anagrams

: make-anagram-hash ( strings -- assoc )
    [ sort ] collect-by [ members ] assoc-map
    [ length 1 > ] filter-values ;