h,w,n=gets.split.map &:to_i
c=[0]*w
h.times do |i|
  g=gets.chomp
  w.times do |i|
    c[i]+=1 if g[i]==?#
  end
end
d=[0]*w
v=[]
n.times do |i|
  v<< [gets.to_i,i]
end
v.each do |e|
  3.times do |i|
    d[e[0]+i]+=1
  end
end
w=v.sort
f=[]
w.each do |e|
  g=[]
  j=true
  3.times do |i|
    t=e[0]+i
    d[t]-=1
    if c[t]>=d[t]*3
      g<< c[t]-d[t]*3
      c[t]=d[t]*3
      j=false
    else
      if j&&c[t]!=0
        g<< 1
        c[t]-=1
        j=false
      else
        g<< 0
      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