program stax;
var n,m,h,i,j,s:word; f:text; v1,v2:array[1..1000] of word; a,b,c:array[1..1000,1..1000] of char;
begin
assign(f,'text.in'); reset(f);
readln(f,n,m,h);
for i:=1 to n do begin for j:=1 to m do read(f,a[i,j]); readln(f); end;
for i:=1 to h do begin for j:=1 to m do read(f,b[i,j]); readln(f); end;
for i:=1 to h do begin for j:=1 to n do read(f,c[i,j]); readln(f); end;
for i:=1 to n do begin for j:=1 to m do write(a[i,j],' '); writeln; end;

for i:=1 to m do begin s:=0;
                       for j:=1 to h do
                       if b[j,i]='#' then
                       inc(s);
                       v1[i]:=s;
                       end;
for i:=n downto 1 do begin s:=0;
                       for j:=1 to h do if c[j,i]='#' then inc(s);
                       v2[n-i+1]:=s;
                       end;
for i:=1 to m do write(v1[i],' '); writeln;
for i:=1 to n do write(v2[i],' ');
for i:=1 to n do begin
for j:=1 to m do if a[i,j]='.' then write('.')
else if v2[i]>v1[j] then write(v1[j]) else write(v2[i]);
writeln;
end;
close(f);
end.