This commit is contained in:
thornAvery 2021-12-10 05:33:11 +00:00
parent 30ba924d0f
commit f575efd5a0

View file

@ -35,7 +35,6 @@ acScore' n (c:cs) = acScore' (x+(5*n)) cs
'<' -> 4
_ -> 0
catLine :: String -> Result
catLine = catLine' []
@ -58,7 +57,6 @@ getMid xs = xs !! n
where
n = (length xs) `div` 2
score :: Char -> Int
score ')' = 3
score ']' = 57