main=interact(\x->u[u[z|y<-[n,n+2..7^6],z<-lines x,show y==z]|n<-[0,1]])
u=unlines