[Haskell-cafe] Ord k => Data.Set.Set k -> (k->v) -> Data.Map.Map k v