From 8020fee479f43865ed872fb88aaad4a322367c86 Mon Sep 17 00:00:00 2001
From: Michael Orlitzky <michael@orlitzky.com>
Date: Fri, 12 Oct 2012 12:52:42 -0400
Subject: [PATCH] Remove an unused variable.

---
 src/Roots/Simple.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Roots/Simple.hs b/src/Roots/Simple.hs
index 7742355..1ab9034 100644
--- a/src/Roots/Simple.hs
+++ b/src/Roots/Simple.hs
@@ -242,4 +242,4 @@ fixed_point f epsilon x0 =
     -- |x_{n} - x_{n+1}| < epsilon. The pattern match on 'Just' is
     -- "safe" since the list is infinite. We'll succeed or loop
     -- forever.
-    Just winning_pair = find (\(x, diff) -> diff < epsilon) pairs
+    Just winning_pair = find (\(_, diff) -> diff < epsilon) pairs
-- 
2.43.2