diff --git a/src/Day10.hs b/src/Day10.hs
index 2da8b1a..6434e70 100644
--- a/src/Day10.hs
+++ b/src/Day10.hs
@@ -1,5 +1,6 @@
 {-# LANGUAGE NoImplicitPrelude #-}
 {-# LANGUAGE OverloadedStrings #-}
+{-# LANGUAGE Strict            #-}
 {-|
 description:
 
@@ -145,9 +146,9 @@ import           Protolude
 import           Data.Char       (chr, ord)
 import           Data.List       (foldl1')
 import qualified Data.Map.Strict as Map
+import qualified Data.Text       as T
 import           Numeric         (showHex)
 import           Text.Parsec
-import qualified Data.Text as T
 
 testInput :: AppState
 testInput = mkAppState 5 [3,4,1,5]