k=0
loop{gets
x=puts"#{(0..99).map{|j|[x^(x=?.==k[j])?:|:' ',x^("#$_"[j]==?.)?:_:' ']}}".rstrip.gsub /_ (?=_)/,'__'
k=$_}