From: sabadev <saba@sabadev.xyz>
Date: Mon, 1 Feb 2021 02:54:04 +0000 (-0500)
Subject: Removed unnecessary typeclasses.
X-Git-Url: http://sabadev.xyz:4321/?a=commitdiff_plain;h=0e36299a49e1f67f82aa787ecd7a998fecfd021a;p=avoidance.git

Removed unnecessary typeclasses.
---

diff --git a/src/Game.hs b/src/Game.hs
index c9640fb..a0726c7 100644
--- a/src/Game.hs
+++ b/src/Game.hs
@@ -9,9 +9,9 @@ import qualified Terminal.Game as G
 
 type RandomState = S.State G.StdGen
 
-data Screen = TitleScreen | HelpScreen | GameScreen deriving (Eq)
+data Screen = TitleScreen | HelpScreen | GameScreen
 
-data Direction = U | D | L | R deriving (Eq, Bounded, Enum)
+data Direction = U | D | L | R deriving (Bounded, Enum)
 
 instance Random Direction where
   random g = randomR (minBound, maxBound) g