h,w,n=gets.split.map &:to_i
a=[]
c=[0]*w
h.times do |i|
  a<< g=gets.chomp
  w.times do |i|
    c[i]+=1 if g[i]==?#
  end
end
d=[0]*w
v=*$<.map(&:to_i)
v.each do |e|
  d[e]+=1
  d[e+1]+=1
  d[e+2]+=1
end
n.times do |i|
  v[i]=[v[i],i]
end
w=v.sort
f=[]
w.each do |e|
  g=[]
  3.times do |i|
    t=e[0]+i
    d[t]-=1
    if d[t]==0
      g<< c[t]
    else
      if d[t]*3<c[t]
        g<< c[t]-d[t]*3
        c[t]=d[t]*3
      else
        g<< 0
      end
    end
  end
  if g==[0,0,0]
    3.times do |i|
      t=e[0]+i
      if c[t]!=0
        g[i]+=1
        c[t]-=1
        break
      end
    end
  end
  f<< g+[e[1]]
end
f.sort!{|a,b|a[3]<=>b[3]}
f.each do |e|
  3.times do |i|
    s=""
    3.times do |j|
      s+=e[j]>=3-i ? ?#:?.
    end
    puts s
  end
end