#include<bits/stdc++.h>
using namespace std;
#define int long long
#define endl '\n'
inline int read(){
	int x=0,k=1;char c=getchar();
	while(c<'0'||c>'9'){
		if(c=='-')k=-1;
		c=getchar();
	}
	while(c>='0'&&c<='9')x=(x<<3)+(x<<1)+(c^48),c=getchar();
	return x*k;
}
void sol(){
	int h=read();
	int n=read();
	map<int,vector<int>>a,b;
	for(int i=1;i<=n;++i){
		int x=read(),y=read();
		b[(x%(2*h)+y)%(2*h)].push_back(x);
		b[(x%(2*h)+2*h-y)%(2*h)].push_back(x);
	}
	int m=read();
	for(int i=1;i<=m;++i){
		int x=read(),y=read();
		a[(x%(2*h)+y)%(2*h)].push_back(x);
		a[(x%(2*h)+2*h-y)%(2*h)].push_back(x);
	}
	int ans=0; 
	queue<pair<int,int>>q;
	q.push({0,0});
	map<int,map<int,int>>f;
	set<pair<int,int>>se;
	se.insert({0,0});
	while(!q.empty()){
		int k=q.front().first,x=q.front().second;
		q.pop();
		se.erase({k,x});
		int c=a[k].end()-upper_bound(a[k].begin(),a[k].end(),x);
		ans=max(ans,f[k][x]+c);
		auto it=upper_bound(b[k].begin(),b[k].end(),x);
		if(it==b[k].end())continue;
		int cc=a[k].end()-upper_bound(a[k].begin(),a[k].end(),*it);
		int kk=k;
		int y=(*it-k)%(2*h);
		if(y>h)y=2*h-y;
		if((*it-k)%(2*h)>h){
			kk=(*it%(2*h)+2*h-y)%(2*h);
		}
		else kk=(*it%(2*h)+y)%(2*h);
		if(!f.count(kk)||f[kk].count(*it)||f[kk][*it]<f[k][x]+c-cc){
			f[kk][*it]=f[k][x]+c-cc;
			if(se.count({kk,*it}))continue;
			se.insert({kk,*it});
			q.push({kk,*it});
		}
		q.push({k,*it});
	}
	
	cout<<ans<<endl;
}
signed main(){
	int T=read();
	while(T--)sol();
}