@@ -23,7 +23,11 @@ import Data.Tuple
23import Data.List
23import Data.List
24import Data.List.Split
24import Data.List.Split
26−import Prelude
26+import Data.Word
30+import Prelude hiding (sum, concat, forM)
29mergeTree :: Num a => (Monoid (f [a]), Functor f) => Int -> [f a] -> f a
33mergeTree :: Num a => (Monoid (f [a]), Functor f) => Int -> [f a] -> f a