#include <cstdio>
#include <cstring>
#include <cassert>
#include <string>
#include <deque>
#include <vector>
#include <map>
#include <queue>
#include <algorithm>
#include <iostream>
#include <utility>
using namespace std;
using ll = long long;
using ld = long double;
#define ShinLena cin.tie(nullptr)->sync_with_stdio(false)
#define N 200005
#define ALL(x) x.begin(), x.end()
int n, s, e, q, in[N], out[N], timer, P[20][N], dep[N];
vector<tuple<int, int, int>> el;
vector<pair<int, int>> g[N];
ll dp[N], dp2[N], O[20][N];
void dfs0(int u, int p, ll dis)
{
P[0][u] = p; dep[u] = dep[p]+1; dp2[u] = dis;
for (int j = 1; j < 20; ++j) P[j][u] = P[j-1][P[j-1][u]];
in[u] = timer++;
for (auto [w, v] : g[u]) if (v != p) dfs0(v, u, dis+w), dp[u] = min(dp[u], w + dp[v]);
out[u] = timer++;
O[0][u] = dp[u] - dp2[u];
for (int j = 1; j < 20; ++j) O[j][u] = min(O[j-1][P[j-1][u]], O[j-1][u]);
}
void init()
{
ShinLena;
cin >> n >> s >> q >> e;
memset(dp, 63, sizeof dp), memset(O, 63, sizeof O);
el.resize(n-1);
for (auto &[u, v, w] : el) cin >> u >> v >> w, g[u].emplace_back(w, v), g[v].emplace_back(w, u);
for (int i = 0, c; i < s; ++i) cin >> c, dp[c] = 0;
dfs0(e, e, 0);
}
void answer()
{
for (int i, u; q--;)
{
cin >> i >> u;
int v = get<0>(el[i-1]) == u ? get<1>(el[i-1]) : get<0>(el[i-1]), v2 = get<0>(el[i-1]) == v ? get<1>(el[i-1]) : get<0>(el[i-1]);
if (P[0][v2] == v) swap(v, v2);
if (in[v] <= in[u] && out[u] <= out[v])
{
ll z = dp[u], u0 = u, dt = dep[u]-dep[v];
for (int j = 20; j--;) if (dt & (1 << j)) z = min(z, dp2[u0] + O[j][u]), u = P[j][u];
z = min(z, dp[u] - dp2[u] + dp2[u0]);
(z < 1e18 ? (cout << z << '\n') : cout << "oo\n");
}
else cout << "escaped\n";
}
}
int main()
{
init();
answer();
return 0;
}
