From e6bcbbf7444c9a62c87d624a12d4852bb603dc12 Mon Sep 17 00:00:00 2001 From: Jack Bond-Preston Date: Sun, 2 Dec 2018 15:33:01 +0000 Subject: [PATCH] Formatting --- aoc-2/main.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/aoc-2/main.hs b/aoc-2/main.hs index 3e3948f..a809f46 100644 --- a/aoc-2/main.hs +++ b/aoc-2/main.hs @@ -29,8 +29,8 @@ calculateChecksum input = a * b sameChars :: String -> String -> Int sameChars (x:xs) (y:ys) - | x == y = 1 + sameChars xs ys - | otherwise = sameChars xs ys + | x == y = 1 + sameChars xs ys + | otherwise = sameChars xs ys sameChars [] [] = 0 getCorrectBoxes :: [String] -> [String]