main=interact$map f.init;f x|x>='a'='0'|0<1='1'