import Char (#)=map f(x:y:z)=toUpper#x:toLower#y:f z f[]=[] main=interact$unlines.f.lines