gen_brackets:{"[]"@x _draw 2} check:{r:(-1;1)@"["=x; *(0=+/cs<'0)&(0=-1#cs:+\r)} {(x;check x)}' gen_brackets' 2*1+!10 (("[[";0) ("[][]";1) ("][][]]";0) ("[[][[][]";0) ("][]][[[[[[";0) ("]]][[]][]]][";0) ("[[[]][[[][[[][";0) ("[[]][[[]][]][][]";1) ("][[][[]]][[]]]][][";0) ("]][[[[]]]][][][[]]]]";0))