f s=[':'|':'<-s]++["\r.:"!!sum[1|'.'<-s]]
m@main=getLine>>=putStrLn.f>>m