#include <bits/stdc++.h>
using namespace std;

#define SZ(a) (int)a.size()
#define ALL(a) a.begin(), a.end()
#define FOR(i, a, b) for (int i = (a); i<(b); ++i)
#define RFOR(i, b, a) for (int i = (b)-1; i>=(a); --i)
#define MP make_pair
#define PB push_back
#define F first
#define S second
#define FILL(a, b) memset(a, b, sizeof(a))

typedef long long LL;
typedef pair<int, int> PII;
typedef vector<int> VI;

const int INF = 1e9 + 7;

int main()
{
	ios::sync_with_stdio(false);
	cin.tie(0);
	
	LL n, p;
	cin >> n >> p;
	map<string, int> m;
	FOR (i, 0, n)
	{
		string s;
		cin >> s;
		int x;
		cin >> x;
		m[s] = x;
	}
	int k;
	cin >> k;
	map<string, int> m2;
	map<string, int> cnt;
	map<string, VI> m3;
	map<string, LL> bal;
	LL ans = 0;
	FOR (i, 0, k)
	{
		string s;
		int x;
		cin >> s >> x;
		m3[s].PB(x);
		if (m2.count(s)) m2[s] = max(m2[s], x);
		else m2[s] = x;
		cnt[s]++;
	}
	for (auto [s, x] : m2)
	{
		for (auto a : m3[s])
		{
			if (a < x)
			{
				bal[s] += x;
				ans += x;
			}
		}
	}
	LL need = 0;
	for (auto [s, x] : m2)
		need += max(0, x - m[s]);
	
	if (need > p)
	{
		cout << 0 << '\n';
		return 0;
	}
	p -= need;
	vector<LL> v;
	for (auto [s, x] : m2)
	{
		LL y = LL(x + 1) * cnt[s] - bal[s];
		v.PB(y);
	}
	sort(ALL(v), greater());
	n = min(LL(SZ(v)), p);
	FOR (i, 0, n)
		ans += v[i];
	
	int mxc = 0;
	for (auto [s, x] : cnt)
		mxc = max(mxc, x);
	RFOR (i, n, 0)
	{
		if (v[i] < mxc)
		{
			ans -= v[i];
			ans += mxc;
		}
	}
	p -= n;
	cout << ans + p * mxc << '\n';
	
	
	return 0;
}