m-alvarez/gist:9b81383e15633c542582

Created April 23, 2015 02:42

Star () You must be signed in to star a gist
Fork () You must be signed in to fork a gist

Learn more about clone URLs
Clone this repository at <script src="https://gist.github.com/m-alvarez/9b81383e15633c542582.js"></script>
Save m-alvarez/9b81383e15633c542582 to your computer and use it in GitHub Desktop.

Download ZIP

Checking for balanced parentheses

Raw

gistfile1.hs

validParentheses = (== 1) . foldl (flip ($)) 1 . map (\case { '(' -> (* 2); ')' -> (`div` 2) })

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment