From 4b60a06438d9ed131564662220a0501dea6a6c34 Mon Sep 17 00:00:00 2001
From: Joshua Clayton <joshua.clayton@gmail.com>
Date: Wed, 11 May 2016 05:32:10 -0400
Subject: [PATCH] Resolve remaining warnings

---
 src/Unused/CLI/SearchResult/ColumnFormatter.hs | 2 +-
 src/Unused/LikelihoodCalculator.hs             | 1 -
 2 files changed, 1 insertion(+), 2 deletions(-)

diff --git a/src/Unused/CLI/SearchResult/ColumnFormatter.hs b/src/Unused/CLI/SearchResult/ColumnFormatter.hs
index 958e432..343cda7 100644
--- a/src/Unused/CLI/SearchResult/ColumnFormatter.hs
+++ b/src/Unused/CLI/SearchResult/ColumnFormatter.hs
@@ -42,4 +42,4 @@ numberFormat rs =
 
 numberLength :: Int -> Int
 numberLength i =
-    1 + floor (logBase 10 $ fromIntegral i)
+    1 + floor (logBase 10 $ fromIntegral i :: Double)
diff --git a/src/Unused/LikelihoodCalculator.hs b/src/Unused/LikelihoodCalculator.hs
index 297e705..79c3c29 100644
--- a/src/Unused/LikelihoodCalculator.hs
+++ b/src/Unused/LikelihoodCalculator.hs
@@ -2,7 +2,6 @@ module Unused.LikelihoodCalculator
     ( calculateLikelihood
     ) where
 
-import Control.Monad (ap)
 import Unused.Types
 import Unused.ResponseFilter (railsSingleOkay, elixirSingleOkay)