#include <bits/stdc++.h>
using namespace std;
#ifndef ONLINE_JUDGE
	#include <boost/multiprecision/cpp_int.hpp>
	#include <boost/multiprecision/cpp_dec_float.hpp>
	using bll = boost::multiprecision::cpp_int;
	using bdouble = boost::multiprecision::cpp_dec_float_100;
#endif
#ifdef LOCAL_DEV
	void debug_impl() { std::cerr << std::endl; }
	template<typename Head, typename... Tail> void debug_impl(Head head, Tail... tail) { std::cerr << " " << head << (sizeof...(tail) ? "," : ""); debug_impl(tail...); }
	#define debug(...) { std::cerr << std::boolalpha << "(" << #__VA_ARGS__ << ") ="; debug_impl(__VA_ARGS__); std::cerr << std::noboolalpha; }
#else
	#define debug(...) {}
#endif
#ifdef LOCAL_TEST
	#define BOOST_STACKTRACE_USE_ADDR2LINE
	#define BOOST_STACKTRACE_ADDR2LINE_LOCATION /usr/local/opt/binutils/bin/addr2line
	#define _GNU_SOURCE
	#include <boost/stacktrace.hpp>
	namespace std {
		template<typename T> class dvector : public std::vector<T> {
		public:
			dvector() : std::vector<T>() {}
			explicit dvector(size_t n, const T& value = T()) : std::vector<T>(n, value) {}
			dvector(const std::vector<T>& v) : std::vector<T>(v) {}
			dvector(const std::initializer_list<T> il) : std::vector<T>(il) {}
			dvector(const typename std::vector<T>::iterator first, const typename std::vector<T>::iterator last) : std::vector<T>(first, last) {}
			dvector(const std::string::iterator first, const std::string::iterator last) : std::vector<T>(first, last) {}
			T& operator[](size_t n) {
				try { return this->at(n); } catch (const std::exception& e) {
					std::cerr << boost::stacktrace::stacktrace() << std::endl; return this->at(n);
				}
			}
			const T& operator[](size_t n) const {
				try { return this->at(n); } catch (const std::exception& e) {
					std::cerr << boost::stacktrace::stacktrace() << std::endl; return this->at(n);
				}
			}
		};
	}
	class dbool {
	private:
		bool boolvalue;
	public:
		dbool() : boolvalue(false) {}
		dbool(bool b) : boolvalue(b) {}
		dbool(const dbool &b) : boolvalue(b.boolvalue) {}
		operator bool&() { return boolvalue; }
		operator const bool&() const { return boolvalue; }
	};
	template<typename T> std::ostream& operator<<(std::ostream& s, const dvector<T>& v) {
		for (int i = 0, len = v.size(); i < len; ++i){ s << v[i]; if (i < len - 1) s << "\t"; } return s; }
	template<typename T> std::ostream& operator<<(std::ostream& s, const dvector< dvector<T> >& vv) {
		for (int i = 0, len = vv.size(); i < len; ++i){ s << vv[i] << std::endl; } return s; }
	template<typename T> std::ostream& operator<<(std::ostream& s, const std::set<T>& se) {
		s << "{ "; for (auto itr = se.begin(); itr != se.end(); ++itr){ s << (*itr) << "\t"; } s << "}"; return s; }
	template<typename T> std::ostream& operator<<(std::ostream& s, const std::multiset<T>& se) {
		s << "{ "; for (auto itr = se.begin(); itr != se.end(); ++itr){ s << (*itr) << "\t"; } s << "}"; return s; }
	template<typename T1, typename T2> std::ostream& operator<<(std::ostream& s, const std::map<T1, T2>& m) {
		s << "{" << std::endl; for (auto itr = m.begin(); itr != m.end(); ++itr){ s << "\t" << (*itr).first << " : " << (*itr).second << std::endl; } s << "}"; return s; }
	template<typename T1, typename T2> std::ostream& operator<<(std::ostream& s, const std::pair<T1, T2>& p) { 
		return s << "(" << p.first << ", " << p.second << ")"; }
	#define vector dvector
	#define bool dbool
	class SIGFPE_exception : std::exception {};
	class SIGSEGV_exception : std::exception {};
	void catch_SIGFPE(int e) { std::cerr << boost::stacktrace::stacktrace() << std::endl; throw SIGFPE_exception();	}
	void catch_SIGSEGV(int e) { std::cerr << boost::stacktrace::stacktrace() << std::endl; throw SIGSEGV_exception(); }
	signed convertedmain();
	signed main() { signal(SIGFPE, catch_SIGFPE); signal(SIGSEGV, catch_SIGSEGV); return convertedmain(); }
	#define main() convertedmain()
#endif
//#define int long long
using ll = long long;
//constexpr int INF = 1e9;//INT_MAX=(1<<31)-1=2147483647
constexpr ll INF = (ll)1e18;//(1LL<<63)-1=9223372036854775807
constexpr ll MOD = (ll)1e9 + 7;
constexpr double EPS = 1e-9;
constexpr ll dx[4] = {1LL, 0LL, -1LL, 0LL};
constexpr ll dy[4] = {0LL, 1LL, 0LL, -1LL};
constexpr ll dx8[8] = {1LL, 0LL, -1LL, 0LL, 1LL, 1LL, -1LL, -1LL};
constexpr ll dy8[8] = {0LL, 1LL, 0LL, -1LL, 1LL, -1LL, 1LL, -1LL};
#define rep(i, n)   for(ll i=0, i##_length=(n); i< i##_length; ++i)
#define repeq(i, n) for(ll i=1, i##_length=(n); i<=i##_length; ++i)
#define rrep(i, n)   for(ll i=(n)-1; i>=0; --i)
#define rrepeq(i, n) for(ll i=(n)  ; i>=1; --i)
#define all(v) (v).begin(), (v).end()
#define rall(v) (v).rbegin(), (v).rend()
void p() { std::cout << '\n'; }
template<typename Head, typename... Tail> void p(Head head, Tail... tail) { std::cout << head << (sizeof...(tail) ? " " : ""); p(tail...); }
template<typename T> inline void pv(std::vector<T> &v) { for(ll i=0, N=v.size(); i<N; i++) std::cout << v[i] << " \n"[i==N-1]; }
template<typename T> inline T gcd(T a, T b) { return b ? gcd(b,a%b) : a; }
template<typename T> inline T lcm(T a, T b) { return a / gcd(a,  b) * b; }
template<typename T> inline bool chmax(T &a, T b) { return a < b && (a = b, true); }
template<typename T> inline bool chmin(T &a, T b) { return a > b && (a = b, true); }
template<typename T> inline void uniq(std::vector<T> &v) { v.erase(unique(v.begin(), v.end()), v.end()); }

/*-----8<-----template-----8<-----*/

/*
実装では木を 1-indexed の配列で表現している。
ノード k について, 親ノードは k/2, 子ノードは 2k, 2k+1 である。

LazySegmentTree(n, f, g, h, M1, OM0):= サイズ n の初期化。
	f は2つの区間の要素をマージする二項演算, 
	g は要素と作用素をマージする二項演算(第三引数は対応する区間の長さ), 
	h は作用素同士をマージする二項演算, M1 はモノイドの単位元, 
	OM0 は作用素の単位元である。
set(k,x):= k 番目の要素に x を代入する。
build():= セグメント木を構築する。
query(a,b):= 区間 [a,b) に対して二項演算した結果を返す。
update(a, b, x) := 区間 [a,b) に作用素 x を適用する。
operator[k] := k 番目の要素を返す。
find_first(a, check) := [a,x) が check を満たす最初の要素位置 x を返す。見つからない場合は -1 を返す。
find_last(b, check) := [x,b) が check を満たす最後の要素位置 x を返す。見つからない場合は -1 を返す。
*/
template< typename Monoid, typename OperatorMonoid, typename F , typename G , typename H >
class LazySegmentTree {
public:
	ll sz, height;
	vector< Monoid > data;
	vector< OperatorMonoid > lazy;
	const F f;
	const G g;
	const H h;
	const Monoid M1;
	const OperatorMonoid OM0;

	LazySegmentTree(ll n, const F f, const G g, const H h, const Monoid &M1, const OperatorMonoid OM0)
			: f(f), g(g), h(h), M1(M1), OM0(OM0) {
		sz = 1;
		height = 0;
		while(sz < n) sz <<= 1, height++;
		data.assign(2 * sz, M1);
		lazy.assign(2 * sz, OM0);
	}

	void set(ll k, const Monoid &x) {
		data[k + sz] = x;
	}

	void build() {
		for(ll k = sz - 1; k > 0; k--) {
			data[k] = f(data[2 * k + 0], data[2 * k + 1]);
		}
	}

	inline void propagate(ll k) {
		if(lazy[k] != OM0) {
			lazy[2 * k + 0] = h(lazy[2 * k + 0], lazy[k]);
			lazy[2 * k + 1] = h(lazy[2 * k + 1], lazy[k]);
			data[k] = reflect(k);
			lazy[k] = OM0;
		}
	}

	inline Monoid reflect(ll k) {
		return lazy[k] == OM0 ? data[k] : g(data[k], lazy[k]);
	}

	inline void recalc(ll k) {
		while(k >>= 1) data[k] = f(reflect(2 * k + 0), reflect(2 * k + 1));
	}

	inline void thrust(ll k) {
		for(ll i = height; i > 0; i--) propagate(k >> i);
	}

	void update(ll a, ll b, const OperatorMonoid &x) {
		thrust(a += sz);
		thrust(b += sz - 1);
		for(ll l = a, r = b + 1; l < r; l >>= 1, r >>= 1) {
			if(l & 1) lazy[l] = h(lazy[l], x), ++l;
			if(r & 1) --r, lazy[r] = h(lazy[r], x);
		}
		recalc(a);
		recalc(b);
	}

	Monoid query(ll a, ll b) {
		thrust(a += sz);
		thrust(b += sz - 1);
		Monoid L = M1, R = M1;
		for(ll l = a, r = b + 1; l < r; l >>= 1, r >>= 1) {
			if(l & 1) L = f(L, reflect(l++));
			if(r & 1) R = f(reflect(--r), R);
		}
		return f(L, R);
	}

	Monoid operator[](const ll &k) {
		return query(k, k + 1);
	}

	template< typename C >
	ll find_subtree(ll a, const C &check, Monoid &M, bool type) {
		while(a < sz) {
			propagate(a);
			Monoid nxt = type ? f(reflect(2 * a + type), M) : f(M, reflect(2 * a + type));
			if(check(nxt)) a = 2 * a + type;
			else M = nxt, a = 2 * a + 1 - type;
		}
		return a - sz;
	}

	template< typename C >
	ll find_first(ll a, const C &check) {
		Monoid L = M1;
		if(a <= 0) {
			if(check(f(L, reflect(1)))) return find_subtree(1, check, L, false);
			return -1;
		}
		thrust(a + sz);
		ll b = sz;
		for(a += sz, b += sz; a < b; a >>= 1, b >>= 1) {
			if(a & 1) {
				Monoid nxt = f(L, reflect(a));
				if(check(nxt)) return find_subtree(a, check, L, false);
				L = nxt;
				++a;
			}
		}
		return -1;
	}

	template< typename C >
	ll find_last(ll b, const C &check) {
		Monoid R = M1;
		if(b >= sz) {
			if(check(f(reflect(1), R))) return find_subtree(1, check, R, true);
			return -1;
		}
		thrust(b + sz - 1);
		ll a = sz;
		for(b += sz; a < b; a >>= 1, b >>= 1) {
			if(b & 1) {
				Monoid nxt = f(reflect(--b), R);
				if(check(nxt)) return find_subtree(b, check, R, true);
				R = nxt;
			}
		}
		return -1;
	}
};
class HLDecomposition {
private:
	void dfs_sz(ll v) {
		for(ll &u:G[v])
			if(u==par[v]) swap(u,G[v].back());
		if(~par[v]) G[v].pop_back();

		for(ll &u:G[v]){
			par[u]=v;
			dep[u]=dep[v]+1;
			dfs_sz(u);
			sub[v]+=sub[u];
			if(sub[u]>sub[G[v][0]]) swap(u,G[v][0]);
		}
	}

	void dfs_hld(ll v,ll c,ll &pos) {
		vid[v]=pos++;
		inv[vid[v]]=v;
		type[v]=c;
		for(ll u:G[v]){
			if(u==par[v]) continue;
			head[u]=(u==G[v][0]?head[v]:u);
			dfs_hld(u,c,pos);
		}
	}

public:
	ll n;
	vector< vector<ll> > G;
	vector<ll> vid, head, sub, par, dep, inv, type;

	HLDecomposition(ll n):
		n(n),G(n),vid(n,-1),head(n),sub(n,1),
		par(n,-1),dep(n,0),inv(n),type(n){}

	HLDecomposition(vector<vector<ll>> &g):
		n(g.size()),G(g),vid(n,-1),head(n),sub(n,1),
		par(n,-1),dep(n,0),inv(n),type(n){}

	void add_edge(ll u,ll v) {
		G[u].emplace_back(v);
		G[v].emplace_back(u);
	}

	//森のHL分解の場合、 build() に根の頂点群を引数に指定する
	void build(vector<ll> rs={0}) {
		ll c=0,pos=0;
		for(ll r:rs){
			dfs_sz(r);
			head[r]=r;
			dfs_hld(r,c++,pos);
		}
	}

	ll lca(ll u,ll v){
		while(1){
			if(vid[u]>vid[v]) swap(u,v);
			if(head[u]==head[v]) return u;
			v=par[head[v]];
		}
	}

	ll distance(ll u,ll v){
		return dep[u]+dep[v]-2*dep[lca(u,v)];
	}

	// for_each(vertex)
	// [l, r) <- attention!!
	template<typename F>
	void for_each(ll u, ll v, const F& f) {
		while(1){
			if(vid[u]>vid[v]) swap(u,v);
			f(max(vid[head[v]],vid[u]),vid[v]+1);
			if(head[u]!=head[v]) v=par[head[v]];
			else break;
		}
	}

	template<typename T,typename Q,typename F>
	T for_each(ll u,ll v,T ti,const Q &q,const F &f){
		T l=ti,r=ti;
		while(1){
			if(vid[u]>vid[v]){
				swap(u,v);
				swap(l,r);
			}
			l=f(l,q(max(vid[head[v]],vid[u]),vid[v]+1));
			if(head[u]!=head[v]) v=par[head[v]];
			else break;
		}
		return f(l,r);
	}

	// for_each(edge)
	// [l, r) <- attention!!
	template<typename F>
	void for_each_edge(ll u, ll v,const F& f) {
		while(1){
			if(vid[u]>vid[v]) swap(u,v);
			if(head[u]!=head[v]){
				f(vid[head[v]],vid[v]+1);
				v=par[head[v]];
			}else{
				if(u!=v) f(vid[u]+1,vid[v]+1);
				break;
			}
		}
	}
};

/*-----8<-----library-----8<-----*/

template<typename T1, typename T2> inline T1 power(T1 x, T2 n){ return n ? power(x*x,n/2)*(n%2?x:1) : 1; }

constexpr ll N_MAX = 50;

ll N;
vector<ll> a;
vector<ll> b;
ll M;
vector<ll> u;
vector<ll> v;

void solve() {
	scanf("%lld", &N);
	a.assign(N-1, 0);
	b.assign(N-1, 0);
	rep(i, N-1) { scanf("%lld%lld", &a[i], &b[i]); a[i]--;b[i]--;}
	scanf("%lld", &M);
	u.assign(M, 0);
	v.assign(M, 0);
	rep(i, M) { scanf("%lld%lld", &u[i], &v[i]); u[i]--;v[i]--;}

	vector<vector<ll>> g(N);
	rep(i,N-1){
		ll from=a[i];
		ll to=b[i];
		g[from].push_back(to);
		g[to].push_back(from);
	}
	
	HLDecomposition hdl(g);
	hdl.build({0});

	//条件を少なくとも１つ満たしていないものの数
	ll ans=0;
	for (ll bit = 0, size = (1LL<<M); bit < size; bit++) {
		//ビットが立っている＝条件を満たさないようにしたい
		if(bit==0)continue;

		auto F=[](ll x,ll y){return x+y;};
		LazySegmentTree<ll,ll,decltype(F),decltype(F),decltype(F)> seg(N*2, F, F, F, 0LL, 0LL);
		rep(i, M) {
			if (bit & (1LL<<i)) {
				//i番目の条件を満たさないようにする
				hdl.for_each_edge(u[i], v[i], [&](ll l, ll r){
					seg.update(l, r, 1);
				});
			}
		}

		ll shiro=0;
		rep(i,N-1){
			hdl.for_each_edge(a[i], b[i], [&](ll l, ll r){
				ll z=seg.query(l, r);
				if(z>0)shiro++;
			});	
		}
		debug(bit,shiro,N-1-shiro);
		ll t=pow(2, N-1-shiro);
		ll c=__builtin_popcount(bit);
		//包除原理 
		if(c%2==1)ans+=t;
		else ans-=t;
	}
	
	ans=pow(2, N-1)-ans;
	p(ans);
	
}

// https://atcoder.jp/contests/abc152/tasks/abc152_f
signed main() {
	solve();
	return 0;
}


Measured memory_bytes: 256