main=interact$(>>=f.span(/='*')).lines
f(p,q)=['S'|'S'<-p,'S'<-max" S"q]++"0\n"