1 files changed, 6 insertions, 6 deletions

diff --git a/src/Main.hs b/src/Main.hs
index 0da1b8f..e6ed4e2 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -2,11 +2,11 @@
 
 module Main where
 
-import Data.List
-import Data.Matrix
-import Data.String
-import System.Environment
-import System.IO
+import           Data.List
+import           Data.Matrix
+import           Data.String
+import           System.Environment
+import           System.IO
 
 main :: IO ()
 main = do
@@ -17,7 +17,7 @@ main = do
 data Square = O | X | Qu deriving (Show, Eq)
 
 solve :: (Eq t, Num t) => t -> [Matrix Square]
-solve n = solveN n
+solve n = nub $ solveN n
   where
     solveN 1 = solve [initBoard]
     solveN x = solve (solveN (x-1))