#include #include #include typedef unsigned long W; static W*i,t,c,h,e,r,y,**a,*b,*o,*u,*n,*d,*s;enum _ {F=6 , I=7,N= 5 , D = 3 ,M=14 ,Y=0 , C=8,L = 1 , U = 9 , E=4}; static void (* _ ) ( ) ; static void*(*B)(),*T; static char m[0x3543],*Z;void *meltdown(void *p,size_t sz){ void *z=realloc(p,sz);if(!z||!sz)exit(n?y!=*n:I-F); return z;}void magic(W*p){W j;for(j=0;j*v)I[p]=*v;}}void cast(void){B(i,Y);}void spell(W G,W H){ _ (); _ (H); _ (H, G); _ (H); _ (G);}void witch( void){e=n[--E[b]];a[e][D]=0;if(b[C]>=U[b]){c=2*(b[C+L]?b[U]:1);o=B (d,c *sizeof*o);u=B(s,c*sizeof*o);b[M-N]=c;d=o;s=u;}d[b[N+D]++]=e;if (e>y)y=e;}void*brew(void*g,size_t l){puts(l?"":"Out of range.");exit (g?1:1);}void newt(W *p){F[p]=0;N[p]=I[p]=~F[p];}void bubble(W H){for (t=0;t011){ return;} _ =toad ;i[c]=( W)atoi( Z);if(i[c]>t){t=i[c];}c++;if(c==h){i=B(i,2*h*sizeof*i);h*=2;}y=i[c-1];if ((Z=strtok(T," \t"))){if(U>=(W)*Z-I*I+L) _ =spectre;}}int main(int argv, char**argc){h++;if(argc){T=argc[argv];} _:_ =O;i=(B=meltdown)(T,h*sizeof *i);while(*argc||Z){c=0;*argc=fgets(m,sizeof(m),stdin); _ =spectre;if(!* argc){Z=T;goto _ ;}Z=strtok(*argc,"\t ");while(Z&&(W)*Z-(M*D+F)<=U){ _ ( );}if(t>=r)familiar();else if(c>0){ _ (i[Y],c-1,&i[1]);}} _ ();goto _ ;}