From 0f54a0975e9435f1e5f3fbb7dba1543105b4e026 Mon Sep 17 00:00:00 2001
From: nisstyre56 <wjak56@gmail.com>
Date: Fri, 18 Jan 2013 02:37:33 -0500
Subject: [PATCH] Update HashTrees.hs

---
 HashTrees.hs | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/HashTrees.hs b/HashTrees.hs
index 8d6068e..35e8252 100644
--- a/HashTrees.hs
+++ b/HashTrees.hs
@@ -1,11 +1,9 @@
 module HashTrees where
 
 import Data.Digest.Pure.SHA
-import Data.List
 import qualified Data.ByteString.Lazy as BL
 import Control.Monad
 import Data.List
-import Data.Bits
 
 data HashTree k a = Leaf | HashTree (Digest k) (HashTree k a) (HashTree k a) deriving (Show)
 
@@ -43,4 +41,4 @@ nextPowerOf n = 2 ^ (ceiling $ logBase 2 $ fromIntegral n)
 padHashes xs = pad' 0 xs where
     pad' n ([]) = [] ++ (take ((nextPowerOf n) - n) $ repeat BL.empty)
     pad' n (x:xs) = x : (pad' (n +1) xs)
-  
\ No newline at end of file
+