blob: 226528447831df50e4ac158d4ef64a76ead7ff2d (
plain) (
tree)
|
|
:top
s/()//
s/\[\]//
s/{}//
s/<>//
t top
/[])}>]/d
:loop
s/\([(\[{<]*\)($/s = s * 5 + 1;\1/
s/\([(\[{<]*\)\[$/s = s * 5 + 2;\1/
s/\([(\[{<]*\){$/s = s * 5 + 3;\1/
s/\([(\[{<]*\)<$/s = s * 5 + 4;\1/
t loop
is = 0;
as
|