char s[99],*t,*u;main(l){for(;gets(s);puts(s))if(l=strlen(s),strpbrk(s," R")){for(t=s+1,u=s+l;(t-s+1)<l;++t)if(*t!=32)*u++=*t,*t=32;*u=0;}}