m s|s!!1==s!!2=s!!2|True=s!!4
main=getContents>>=putChar.m.lines