#include <bits/stdc++.h>
#define rep(i,n)for(int i=0;i<(n);i++)
using namespace std;
typedef long long ll;

#define MAX_LOG 18
int d[200000],par[MAX_LOG][200000];
vector<int>E[200000];
ll sum[200000];
int n;

void dfs(int v,int p,int depth){
	d[v]=depth;par[0][v]=p;
	for(int u:E[v]){
		if(u==p)continue;
		dfs(u,v,depth+1);
	}
}
void lca_init(){
	for(int i=1;i<MAX_LOG;i++)rep(j,n){
		if(par[i-1][j]==-1)par[i][j]=-1;
		else par[i][j]=par[i-1][par[i-1][j]];
	}
}
int lca(int u,int v){
	if(d[u]<d[v])swap(u,v);
	rep(i,MAX_LOG){
		if((d[u]-d[v])>>i&1)u=par[i][u];
	}
	if(u==v)return u;
	for(int i=MAX_LOG-1;i>=0;i--){
		if(par[i][u]!=par[i][v]){
			u=par[i][u];
			v=par[i][v];
		}
	}
	return par[0][u];
}
ll ans=0;
void dfs2(int v,int p){
	for(int u:E[v]){
		if(u==p)continue;
		dfs2(u,v);
		sum[v]+=sum[u];
	}
	ans+=(sum[v]+1)*sum[v]/2;
}
int main(){
	scanf("%d",&n);
	rep(i,n-1){
		int u,v;scanf("%d%d",&u,&v);u--;v--;
		E[u].push_back(v);
		E[v].push_back(u);
	}
	dfs(0,-1,0);
	lca_init();
	int q;scanf("%d",&q);
	rep(i,q){
		int a,b;scanf("%d%d",&a,&b);a--;b--;
		sum[a]++;sum[b]++;
		int p=lca(a,b);
		sum[p]--;
		if(par[0][p]!=-1)sum[par[0][p]]--;
	}
	dfs2(0,-1);
	cout<<ans<<endl;
}