main=interact$concat.foldr(#)["\n"]
a#b=b++[a:x|x<-b,a/=last b!!0]