main=interact$unlines.foldl(#)[].lines (a:x)#s|a/=s=a:x#s x#s=s:x