diff --git a/byg/src/Types/Value.hs b/byg/src/Types/Value.hs
index baa916f..bfa1269 100644
--- a/byg/src/Types/Value.hs
+++ b/byg/src/Types/Value.hs
@@ -25,7 +25,7 @@ data Value = String String
            | Empty
            | Tuple (Value, Value)
            | List [Value]
-  deriving (Eq, Show)
+  deriving (Show)
 
 class Valuable a where
   toValue :: a -> Value