| Task: | Kasihymiö |
| Sender: | FSMnArmosta |
| Submission time: | 2018-01-15 07:51:36 +0200 |
| Language: | Haskell |
| Status: | COMPILE ERROR |
Compiler report
input/code.hs:2:4: Parse error in pattern: n
Code
t _ [] = 0
t !n ('8':rest) = t (n+1) rest
t !n (')':rest) = n + (t n rest)
main = getLine >>= (\l -> print (t 0 l))