Remove type signatures with undefined variables

hdgarrood · Nov 16, 2015 · 3c49404 · 3c49404
1 parent e3c3707
commit 3c49404
Showing 1 changed file with 0 additions and 3 deletions.
diff --git a/src/Data/FingerTree.purs b/src/Data/FingerTree.purs
@@ -218,10 +218,7 @@ instance traversableFingerTree :: Traversable (FingerTree v) where
            <*> (defer <$> kl)
            <*> traverse f sf
     where
-    l :: m (FingerTree v (Node v a))
     l = traverse (traverse f) (force m)
-
-    kl :: m (Unit -> FingerTree v (Node v a))
     kl = const <$> l
 
   sequence = traverse id