x=getChar
main=x>>=putChar>>x>>main