Documentation

parser :: (MonadParsec e s m, IsString (Tokens s), Token s ~ Char, Num a) => m (Bool, ((a, a), (a, a), (a, a))) Source #

day22 :: (Ix a, Num a) => Bool -> [(Bool, ((a, a), (a, a), (a, a)))] -> Int Source #

day22a :: Text -> Either (ParseErrorBundle Text Void) Int Source #

day22b :: Text -> Either (ParseErrorBundle Text Void) Int Source #