#include<bits/stdc++.h>
#define ll int
#define pll pair<ll, ll>
#define pb push_back
#define mp make_pair
#define fi first
#define se second
#define ld long double
using namespace std;

const ll maxn=200005;
ll to[maxn];
ll l1[maxn], r1[maxn], l2[maxn], r2[maxn];
ll X1[maxn], Y1[maxn], X2[maxn], Y2[maxn];
vector <ll> A1[maxn], A2[maxn], H1[maxn], H2[maxn]; 

void dfs1(ll u)
{
    l1[u]=maxn, r1[u]=0;
    for (ll v:A1[u])
    {
        if (!l1[v]) dfs1(v);
        l1[u]=min(l1[u], l1[v]), r1[u]=max(r1[u], r1[v]);
    }
}

void dfs2(ll u)
{
    l2[u]=maxn, r2[u]=0;
    for (ll v:A2[u])
    {
        if (!l2[v]) dfs2(v);
        l2[u]=min(l2[u], l2[v]), r2[u]=max(r2[u], r2[v]);
    }
}

int main()
{
    ios_base::sync_with_stdio(0);
    cin.tie(0); cout.tie(0);
    ll n, m1, m2, q; cin >> n >> m1 >> m2 >> q;
    for (ll i=1; i<=n; i++)
        l1[i]=r1[i]=l2[i]=r2[i]=i;
    vector <ll> num1, num2; num2.pb(0);
    for (ll i=1; i<=m1; i++)
        cin >> X1[i] >> Y1[i], num1.pb(Y1[i]);
    sort(num1.begin(), num1.end());
    num1.resize(unique(num1.begin(), num1.end())-num1.begin());
    for (ll i=1; i<=m1; i++)
        H1[lower_bound(num1.begin(), num1.end(), Y1[i])-num1.begin()].pb(i+n);
    for (ll i=1; i<n+m1; i++)
    {
        ll t, u, v; cin >> t >> u >> v;
        if (t==1) A1[v+n].pb(u);
        else if (Y1[v]>Y1[u]) A1[v+n].pb(u+n);
        else A1[u+n].pb(v+n);
    }
    for (ll i=1; i<=m2; i++)
        cin >> X2[i] >> Y2[i], num2.pb(Y2[i]);
    sort(num2.begin(), num2.end(), greater<ll>());
    num2.resize(unique(num2.begin(), num2.end())-num2.begin());
    for (ll i=1; i<=m2; i++)
        H2[lower_bound(num2.begin(), num2.end(), Y2[i], greater<ll>())-num2.begin()].pb(i+n);
    for (ll i=1; i<n+m2; i++)
    {
        ll t, u, v; cin >> t >> u >> v;
        if (t==1) A2[v+n].pb(u);
        else if (Y2[v]<Y2[u]) A2[v+n].pb(u+n);
        else A2[u+n].pb(v+n);
    }
    for (ll i=1; i<=n+m1; i++)
        if (!l1[i]) dfs1(i);
    for (ll i=1; i<=n+m2; i++)
        if (!l2[i]) dfs2(i);
    set <pll> s;
    auto in=[&](ll l, ll r)
    {
        auto ptr=s.lower_bound(mp(l+1, 0));
        if (ptr==s.begin()) return 0;
        if ((*prev(ptr)).se>=r) return 1;
        else return 0;
    };
    auto insert=[&](ll l, ll r)
    {
        ll L=l, R=r;
        auto ptr=s.lower_bound(mp(l+1, 0));
        if (ptr!=s.begin() && (*prev(ptr)).se>=l)
            ptr--;
        while (ptr!=s.end() && (*ptr).se<=r)
            L=min(L, (*ptr).fi), R=max(R, (*ptr).se), ptr=s.erase(ptr);
        s.insert({L, R});
    };
    ll k1=num1.size(), k2=num2.size();
    for (ll i=k1, ptr=0; i>=0; i--)
    {
        vector <pll> req;
        for (ll j:H1[i])
        {
            vector <pll> c;
            for (ll v:A1[j])
                if (r1[v]) c.pb({l1[v], r1[v]});
            sort(c.begin(), c.end());
            for (ll i=0; i+1<c.size(); i++)
                req.pb({c[i].se, c[i+1].fi});
        }
        for (auto [l, r]:req)
        {
            while (l<1 || r>n){}
            while (!in(l, r))
            {
                ptr++;
                for (ll j:H2[ptr]) 
                    if (r2[j])
                        insert(l2[j], r2[j]);
            }
        }
        to[i]=ptr;
    }
    for (ll i=1; i<=q; i++)
    {
        ll a; cin >> a;
        ll pos=upper_bound(num1.begin(), num1.end(), a)-num1.begin();
        cout << num2[to[pos]] << "\n";
    }
}