main=interact$(>>=('a'!)).lines
p!(a:b)|p:b<scanl max p b=a!b|0<1=a:"\n"