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)