4 lines
172 B
Text
4 lines
172 B
Text
|
bracketDepth =: '[]' -&(+/\)/@:(=/) ]
|
||
|
|
checkBalanced =: _1 -.@e. bracketDepth
|
||
|
|
genBracketPairs =: (?~@# { ])@#"0 1&'[]' NB. bracket pairs in arbitrary order
|