main=interact$ \x->unlines$mapM(\_->x)x