From 8c1193fece01bb80e86d8cc36efcf8820a6ccb46 Mon Sep 17 00:00:00 2001 From: Akshay Date: Wed, 16 Dec 2020 12:57:38 +0530 Subject: format * --- execs/Day02.hs | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) (limited to 'execs/Day02.hs') diff --git a/execs/Day02.hs b/execs/Day02.hs index 412d1d1..43f6e31 100644 --- a/execs/Day02.hs +++ b/execs/Day02.hs @@ -1,18 +1,18 @@ module Main where -import Text.ParserCombinators.Parsec -import Text.Parsec.Char -import Utils +import Text.Parsec.Char +import Text.ParserCombinators.Parsec +import Utils type PassProp = (Int, Int, Char, String) parseInt :: Parser Int parseInt = read <$> many1 digit parseProp :: Parser PassProp -parseProp = (,,,) - <$> parseInt <* char '-' - <*> parseInt <* space - <*> letter <* string ": " +parseProp = (,,,) + <$> parseInt <* char '-' + <*> parseInt <* space + <*> letter <* string ": " <*> many letter doCheck1 :: PassProp -> Bool -- cgit v1.2.3