a%(b:t)|abs(a-b)==32=t
a%s=a:s
m@main=getLine>>=print.(0^).sum.foldr((%).fromEnum)[]>>m