s=substr;a=readLines("stdin");for(v in a){for(i in seq(1,nchar(v)-2,2))cat(min(s(v,i,i),s(v,i+1,i+1)));cat(". ")}