Cleanup

2022-02-13 17:29:32 +00:00
parent eba1713895
commit 40f1d987cb
21 changed files with 109 additions and 171 deletions
@@ -23,7 +23,8 @@ import Data.Maybe
 import Data.List (scanl',sortOn)

 combinationsTrie :: Trie (Int,CombineType) Item
-combinationsTrie = foldr (uncurry insertInTrie . first (sortOn snd)) 
+combinationsTrie = foldr 
+    (uncurry insertInTrie . first (sortOn snd)) 
    emptyTrie
    itemCombinations