From 5f2a243e850f2755af82c3ab5e9fc9a0581f8946 Mon Sep 17 00:00:00 2001
From: Gattix <gattix@cock.li>
Date: Fri, 2 Dec 2022 18:36:00 +0100
Subject: [PATCH] minor visuals day2

---
 2022/day02/day02.hs | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/2022/day02/day02.hs b/2022/day02/day02.hs
index 132adf2..7e63f80 100644
--- a/2022/day02/day02.hs
+++ b/2022/day02/day02.hs
@@ -1,9 +1,8 @@
 data Hand = Rock | Paper | Scissor deriving (Eq,Enum,Bounded,Show)
 instance Ord Hand where
-    compare x y = case fromEnum x - fromEnum y `mod` 3 of
+    compare x y = case (fromEnum x - fromEnum y) `mod` 3 of
                     0 -> EQ
                     1 -> GT
-                    (-2) -> GT
                     _ -> LT
 
 (+.) :: Hand -> Int -> Hand