Data.HashTable を使ってみます。 > :m + Data.HashTable -- (==) : 比較する関数 -- hashString : Hash 値を計算する関数 > h <- new (==) hashString :: IO (HashTable String [(Int,String)]) -- 適当なキーで適当な値を入れてみる。 > insert h "abc" [(…