d=[0]*11 u=d.dup o=$<.map{|$_|(~/\#$/).times{|i|d[i]+=(c=$_[i])%5&1;u[i]+=c/85} chomp.tr("RDU",' ')+gsub(/[^R]/){}} s='D' [d,u].map{|c|10.times{|i|c.any?{|x|x>i}&&o<<(c.map{|x|x>i ?s:' '}*"").rstrip} s='U' o.reverse!} puts o