Day13
Description
parsePair :: (Num a, MonadParsec e s m, Token s ~ Char) => m (a, a) Source #
parseFold :: (Num a, Ord a, MonadParsec e s m, Token s ~ Char, IsString (Tokens s)) => m ((a, a) -> (a, a)) Source #
foldX :: (Num a, Ord a) => a -> (a, a) -> (a, a) Source #
foldY :: (Num a, Ord a) => a -> (a, a) -> (a, a) Source #
day13a :: Text -> Either (ParseErrorBundle Text Void) Int Source #
day13b :: Text -> Either (ParseErrorBundle Text Void) [String] Source #