#include #include #define R return #define W(x)for(;x;) #define I typedef #define H unsigned I jmp_buf J; I void P; I char L; I int Q; I H C; I long long V; I H char O; I H short Y; I H long long Z; O S[]="syntax_error=" "M@K~|JOEF\\^~_NHIA"; L*N,*K,* B,*E,*T,*A,*x,D; Q(*k)(),v; V z(P),j,_,* o,b,f,u,s,c,a,t,e,d; J l; Q _k(P){ R*K?*K++: ~-d; } V r(L a){ R a&&putchar(a); } L n(){ R*T=j= k(),++j; } O G(P){ *o=d,longjmp(l,b); } Z g(Y a){ R a >>s|(a&~-e)<>s*f); } P _i (L*T) { *o||p(T); } V _b(V a ){ Z e=a ; R A[*T++]!=v+c?G():~-v ?a<> z():e>>z();} V _c(L* l){ T=B +a; W(j)*T-- =v+j%c ,j/=c; E=B+ (*B== a+c+u );W(T< B+a)* E++=* ++T; T =E ; l-B&& ++ *-- E; } P M( Z k){ L*p,e =a>> u; m ()&&G( ); p =T=B ; _=j=k ; v=u <>=e; W(T -e*f>p)*T--=v; W(Tc&&A[v]==T++&&(v|a)-a*-~f<~-s?D=b+(v&a)+a*f-c:d; D&&(j=o-D); }V y(P){ V a=z();W(m()&&v=d)v?v-b?v-f?v-u?v-=t,a=_b(a):(a&=z()):(a%=z( )):(a/=z()):(a*=z()); R--T,a;} V _f(P){ V e=c; j=d; D=b; *T==u<>f==a-f&&(e<<=b)&&T++; W(D&&(v=*T++))_d(e); R--T,j; } V F(P){ V n=y(); W(m()&&v> a/f? n>>a ?h(n)<>a ):h(n):g(n); } Q main(Q x ,L**K){V*A; *K=basename( *K);q(K); W(w())** K-c*c-b||p(B),_i(!setjmp(l)?T=B ,M(((A=(*o=m()==c-~s&&(j=a|T[-b])&& c-m()==-c)?&o[j-a*u]:(T=B,&_)),*A=F()) ),B:(L*)S); } V z(P){ V s; W(m() &&v< f*c )R v> b?s :G (): _:! (v-= t)? --T,_f (): v==b?o[ (T[ -b]|a)- a*u]: !z(); G(); }