f(a:b:c:d:e)=a:c:f(b:d:e) f x=x m@main=getLine>>=putStrLn.f>>m