From 6e9b85b894be85d184d3d92c9310a5ec05faf6e4 Mon Sep 17 00:00:00 2001 From: shu Date: Wed, 4 Dec 2019 11:13:17 +0100 Subject: [PATCH] =?UTF-8?q?=E2=80=A6?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- 2019/day4/day4.hs | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/2019/day4/day4.hs b/2019/day4/day4.hs index cf31af7..556c618 100644 --- a/2019/day4/day4.hs +++ b/2019/day4/day4.hs @@ -6,8 +6,7 @@ main = do day4 p = sum . map (fromEnum . p . show) -p x - | sort x /= x = False +p x | sort x /= x = False | nub x == x = False | otherwise = True