program Untitled;
var
   n, s, r, i, a, rj : integer;
   p : array [ 0..10 ] of integer;
begin
     readln ( n, s, r );
     p[0] := 0;
     for i := 1 to n do
     begin
          p[i] := 1;
     end;
     for i := 1 to s do
     begin
          read ( a );
          p[a] := p[a] - 1;
     end;
     readln;
     for i := 1 to r do
     begin
          read ( a );
          p[a] := p[a] + 1;
     end;
     readln;
     for i := 1 to n do
     begin
          if p[i] = 0 then
          begin
               if p[i - 1] > 1 then
               begin
                    p[i] := p[i] + 1;
                    p[i - 1] := p[i - 1] - 1;
               end;
          end;
          if p[i] = 0 then
          begin
               if p[i + 1] > 1 then
               begin
                    p[i] := p[i] + 1;
                    p[i + 1] := p[i + 1] - 1;
               end;
          end;
     end;
     for i := 1 to n do
     begin
          if p[i] < 1 then rj := rj + 1;
     end;
     writeln ( rj );
readln;
end.
