import Data.List
s t|elem ' 't=t:(s$delete ' 't)
s t=[t]
main=interact(unlines.s)