int main(int argc,char**argv){char m[9999],*b=m,*c=b+2000,*s[9],**l=s;
int f=open(argv[1],0),p=1,q,r;for(read(f,c,7999);*c|((*c-93)?(*c-91)?p
?(*c-60)?(*c-62)?(*c-45)?(*c-43)?(*c-44)?(*c-46)?0:write(1,b,1):read(0
,b,1):++*b:*b>0&&--*b:*++b:*--b:0:++q&(p?*b?*(*(l++)=c):(p=0)&(r=q):0)
:--q&(p?*(*b?(c=*--l-1):*--l):q<r&&(p=1)));++c);close(f);}