main=interact$(>>=f.span(/='*')).lines f(p,q)=['S'|'S'<-p,'S'<-max" S"q]++"0\n"
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page