m s|s!!1==s!!2=s!!2|True=s!!4 main=mapM(\_->getLine>>=putChar.m)[1..32]