2 files changed, 0 insertions, 5 deletions
diff --git a/compiler/vectorise/Vectorise/Exp.hs b/compiler/vectorise/Vectorise/Exp.hs
index 34e22f502b..706fc85166 100644
--- a/compiler/vectorise/Vectorise/Exp.hs
+++ b/compiler/vectorise/Vectorise/Exp.hs
@@ -49,9 +49,6 @@ import MonadUtils
 import Control.Monad
 import Data.Maybe
 import Data.List
-import TcRnMonad (goptM)
-import DynFlags
-import Util
 
 
 -- Main entry point to vectorise expressions -----------------------------------
diff --git a/compiler/vectorise/Vectorise/Type/Env.hs b/compiler/vectorise/Vectorise/Type/Env.hs
index ac4c6846d3..0ae0f936b3 100644
--- a/compiler/vectorise/Vectorise/Type/Env.hs
+++ b/compiler/vectorise/Vectorise/Type/Env.hs
@@ -317,8 +317,6 @@ vectTypeEnv tycons vectTypeDecls vectClassDecls
                 , fam_insts, binds)
        }
   where
-    fst3 (a, _, _) = a
-    
     addParallelTyConAndCons tycon
       = do
         { addGlobalParallelTyCon tycon