/*input
4
1 4 6 2
5
5 1 5 7 9
*/
#include <iostream>
#include <vector>
#include <queue>
#include <climits>
using namespace std;
#define pb push_back
#define sz 100001
int boysSkillz[sz], girlsSkillz[sz];
//Maximal Matching begins
vector<int> adj[sz];
int pairU [sz], pairV[sz], dist[sz];
bool HK_Bfs(int m)
{
queue<int> Q;
for (int u=1; u<=m; u++)
{
if (pairU[u]==0)
{
dist[u] = 0;
Q.push(u);
}
else
dist[u] = INT_MAX;
}
dist[0] = INT_MAX;
while (!Q.empty())
{
int u = Q.front();
Q.pop();
if (dist[u] < dist[0])
for (int v:adj[u])
if (dist[pairV[v]] == INT_MAX)
{
dist[pairV[v]] = dist[u]+1;
Q.push(pairV[v]);
}
}
return (dist[0] != INT_MAX);
}
bool HK_Dfs(int u)
{
if (u != 0)
{
for (int v: adj[u])
if (dist[pairV[v]] == dist[u]+1 && HK_Dfs(pairV[v]))
{
pairV[v] = u;
pairU[u] = v;
return true;
}
dist[u] = INT_MAX;
return false;
}
return true;
}
int HopcroftKarp(int m, int n)
{
for (int u=0; u<m; u++)
pairU[u] = 0;
for (int v=0; v<n; v++)
pairV[v] = 0;
int maxMatching = 0;
while (HK_Bfs(m))
for (int u=1; u<=m; u++)
if (pairU[u]==0 && HK_Dfs(u))
maxMatching++;
return maxMatching;
}
//Maximal Matching ends
int main()
{
int n, m;
cin>>n;
for(int i=1;i<=n;i++)
cin>>boysSkillz[i];
cin>>m;
for(int i=1;i<=m;i++)
cin>>girlsSkillz[i];
for(int i=1;i<=n;i++) //Building graph according to logic mentioned
for(int j=1;j<=m;j++)
if(abs(boysSkillz[i]-girlsSkillz[j])<=1)
{
adj[i].pb(j);
adj[j].pb(i);
}
cout<<HopcroftKarp(n,m);
return 0;
}
LyppbnB1dAo0CjEgNCA2IDIKNQo1IDEgNSA3IDkKKi8KCiNpbmNsdWRlIDxpb3N0cmVhbT4KI2luY2x1ZGUgPHZlY3Rvcj4KI2luY2x1ZGUgPHF1ZXVlPgojaW5jbHVkZSA8Y2xpbWl0cz4KdXNpbmcgbmFtZXNwYWNlIHN0ZDsKI2RlZmluZSBwYiBwdXNoX2JhY2sKI2RlZmluZSBzeiAxMDAwMDEKCmludCBib3lzU2tpbGx6W3N6XSwgZ2lybHNTa2lsbHpbc3pdOwoKLy9NYXhpbWFsIE1hdGNoaW5nIGJlZ2lucwp2ZWN0b3I8aW50PiBhZGpbc3pdOwppbnQgcGFpclUgW3N6XSwgcGFpclZbc3pdLCBkaXN0W3N6XTsKCmJvb2wgSEtfQmZzKGludCBtKQp7CiAgICBxdWV1ZTxpbnQ+IFE7CiAgICBmb3IgKGludCB1PTE7IHU8PW07IHUrKykKICAgIHsKICAgICAgICBpZiAocGFpclVbdV09PTApCiAgICAgICAgewogICAgICAgICAgICBkaXN0W3VdID0gMDsKICAgICAgICAgICAgUS5wdXNoKHUpOwogICAgICAgIH0KICAgICAgICBlbHNlCiAgICAgICAgICAgIGRpc3RbdV0gPSBJTlRfTUFYOwogICAgfQogICAgZGlzdFswXSA9IElOVF9NQVg7CiAgICB3aGlsZSAoIVEuZW1wdHkoKSkKICAgIHsKICAgICAgICBpbnQgdSA9IFEuZnJvbnQoKTsKICAgICAgICBRLnBvcCgpOwogICAgICAgIGlmIChkaXN0W3VdIDwgZGlzdFswXSkKICAgICAgICAgICAgZm9yIChpbnQgdjphZGpbdV0pCiAgICAgICAgICAgICAgICBpZiAoZGlzdFtwYWlyVlt2XV0gPT0gSU5UX01BWCkKICAgICAgICAgICAgICAgIHsKICAgICAgICAgICAgICAgICAgICBkaXN0W3BhaXJWW3ZdXSA9IGRpc3RbdV0rMTsKICAgICAgICAgICAgICAgICAgICBRLnB1c2gocGFpclZbdl0pOwogICAgICAgICAgICAgICAgfQogICAgfQogICAgcmV0dXJuIChkaXN0WzBdICE9IElOVF9NQVgpOwp9Cgpib29sIEhLX0RmcyhpbnQgdSkKewogICAgaWYgKHUgIT0gMCkKICAgIHsKICAgICAgICBmb3IgKGludCB2OiBhZGpbdV0pCiAgICAgICAgICAgIGlmIChkaXN0W3BhaXJWW3ZdXSA9PSBkaXN0W3VdKzEgJiYgSEtfRGZzKHBhaXJWW3ZdKSkKICAgICAgICAgICAgewogICAgICAgICAgICAgICAgcGFpclZbdl0gPSB1OwogICAgICAgICAgICAgICAgcGFpclVbdV0gPSB2OwogICAgICAgICAgICAgICAgcmV0dXJuIHRydWU7CiAgICAgICAgICAgIH0KICAgICAgICBkaXN0W3VdID0gSU5UX01BWDsKICAgICAgICByZXR1cm4gZmFsc2U7CiAgICB9CiAgICByZXR1cm4gdHJ1ZTsKfQoKaW50IEhvcGNyb2Z0S2FycChpbnQgbSwgaW50IG4pCnsKICAgIGZvciAoaW50IHU9MDsgdTxtOyB1KyspCiAgICAgICAgcGFpclVbdV0gPSAwOwogICAgZm9yIChpbnQgdj0wOyB2PG47IHYrKykKICAgICAgICBwYWlyVlt2XSA9IDA7CiAgICBpbnQgbWF4TWF0Y2hpbmcgPSAwOwoKICAgIHdoaWxlIChIS19CZnMobSkpCiAgICAgICAgZm9yIChpbnQgdT0xOyB1PD1tOyB1KyspCiAgICAgICAgICAgIGlmIChwYWlyVVt1XT09MCAmJiBIS19EZnModSkpCiAgICAgICAgICAgICAgICBtYXhNYXRjaGluZysrOwogICAgcmV0dXJuIG1heE1hdGNoaW5nOwp9Ci8vTWF4aW1hbCBNYXRjaGluZyBlbmRzCgppbnQgbWFpbigpCnsKCWludCBuLCBtOwoJY2luPj5uOwoJZm9yKGludCBpPTE7aTw9bjtpKyspCgkJY2luPj5ib3lzU2tpbGx6W2ldOwoJY2luPj5tOwoJZm9yKGludCBpPTE7aTw9bTtpKyspCgkJY2luPj5naXJsc1NraWxseltpXTsKCWZvcihpbnQgaT0xO2k8PW47aSsrKSAvL0J1aWxkaW5nIGdyYXBoIGFjY29yZGluZyB0byBsb2dpYyBtZW50aW9uZWQKCQlmb3IoaW50IGo9MTtqPD1tO2orKykKCQkJaWYoYWJzKGJveXNTa2lsbHpbaV0tZ2lybHNTa2lsbHpbal0pPD0xKQoJCQl7CgkJCQlhZGpbaV0ucGIoaik7CgkJCQlhZGpbal0ucGIoaSk7CgkJCX0KCWNvdXQ8PEhvcGNyb2Z0S2FycChuLG0pOwoJcmV0dXJuIDA7Cn0=