char*b,*c,*u,*v,q,s[9]['~~']={35};a;main(d){for(;gets(&q);)for(d*=q<48||!++a,v=s[a-1];48/q**v;d+=82,v+=82)for(c=s[a]+d,b=&q;q-48?*b:!puts(v);++b)for(u=v;*c=*u++&*b;++c);}
Note that non-ascii characters in the above source code will be escaped (such as \x9f).