paren "(())()" :: Result ()
paren "(())("  :: Result ()