#include <bits/stdc++.h>
#pragma GCC optimize("O3,unroll-loops")
#pragma GCC target("avx2,bmi,bmi2,popcnt,lzcnt")
#define fio ios_base::sync_with_stdio(0);cin.tie(0);
#define ll long long
#define ld long double
#define en exit(0);
#define pb push_back
#define fi first
#define se second
using namespace std;
mt19937 rng(chrono::steady_clock::now().time_since_epoch().count());
const int N = 1e5 + 5;
const int LOG = log2(N) + 2;
const ll INF = 1e18 + 5;
vector<pair<int,int> > edg;
vector<pair<int,int> > g[N];
bool shop[N];
ll dist[N];
int tin[N], tout[N], tt;
void dfs(int u, int p)
{
tin[u] = ++tt;
for(auto [v, w] : g[u])
{
if(v != p)
{
dist[v] = dist[u] + w;
dfs(v, u);
}
}
tout[u] = tt;
}
bool isanc(int u, int v)
{
return (tin[u] <= tin[v] && tout[v] <= tout[u]);
}
int main()
{
fio
// ifstream cin("in.in");
int n, s, q, e;
cin >> n >> s >> q >> e;
edg.resize(n - 1);
for(int i = 0;i < n - 1;i++)
{
int u, v, w;
cin >> u >> v >> w;
g[u].pb({v, w});
g[v].pb({u, w});
edg[i] = {u, v};
}
for(int i = 1;i <= s;i++)
{
int p;
cin >> p;
shop[p] = 1;
}
dfs(e, e);
while(q--)
{
int i, r;
cin >> i >> r;
int u = edg[i - 1].fi, v = edg[i - 1].se;
if(dist[u] < dist[v])
swap(u, v);
if(isanc(u, r))
cout << 0;
else
cout << "escaped";
cout << "\n";
}
return 0;
}
