This submission is migrated from previous version of oj.uz, which used different machine for grading. This submission may have different result if resubmitted.
#include <bits/stdc++.h>
using namespace std ;
typedef long long ll ;
typedef long double ld ;
typedef pair<int, int> pii ;
typedef pair<int, long long> pil ;
typedef pair<long long, int> pli ;
typedef pair<long long, long long> pll ;
typedef vector<int> vi ;
typedef vector<long long> vll ;
#define bitc(n) (__builtin_popcountll(n))
#define clz(n) (__builtin_clzll(n))
#define ctz(n) (__builtin_ctzll(n))
#define lg(n) (31 - __builtin_clz(n))
#define MASK(k) (1ll << (k))
#define getbit(n, k) ((n) >> (k) & 1)
#define flipbit(n, k) ((n) ^ (1ll << (k)))
#define ton(n, k) ((n) | (1ll << (k)))
#define toff(n, k) ((n) & ~(1ll << (k)))
#define fi first
#define se second
#define mp make_pair
#define eb emplace_back
#define lwb lower_bound
#define upb upper_bound
#define sz(x) (int)(x.size())
#define all(x) x.begin(),x.end()
#define taskname "input"
template<class X, class Y> bool maximize(X &x, const Y &y) {return (x < y ? x = y, true : false) ;}
template<class X, class Y> bool minimize(X &x, const Y &y) {return (x > y ? x = y, true : false) ;}
template<class X>
void remove_dup(vector<X> &ve) {
    sort(ve.begin(), ve.end()) ;
    ve.resize(unique(ve.begin(), ve.end()) - ve.begin()) ;
}
const ll mod = 1e9 + 7 ;
const ll INF = 1e18 ;
const int inf = 1e9 ;
const int N = 1e5 + 5 ;
/* Some Peach Tea Is Great ;-; */
/* Author : Tuandq */
struct E {
    int u, v, w ;
    E() {}
    E(int _u, int _v, int _w): u(_u), v(_v), w(_w) {}  
};
int a[N], n, m, q, hel ;
vector<int> adj[N] ;
pii query[N] ;
E e[N] ;
namespace sub4 {
    #define tiii tuple<int, int, int>
    const int LG = 17 ;
    int st[N], en[N], h[N], dfscnt = 0 ;
    ll dis[N], dp[N] ;
    pil up[LG][N] ;
    bool mark[N] ;
    void dfs(int u, int par) {
        st[u] = ++dfscnt ;
        dp[u] = (mark[u] ? 0 : INF) ;
        for(int i : adj[u]) {
            int v = e[i].u ^ e[i].v ^ u ;
            if(v != par) {
                dis[v] = dis[u] + e[i].w ;
                h[v] = h[u] + 1 ;
                up[0][v].fi = u ;
                dfs(v, u) ;
                minimize(dp[u], dp[v] + 1ll * e[i].w) ;
            }
        }
        up[0][u].se = dp[u] - dis[u] ;
        en[u] = dfscnt ;
    }
    bool inside(int u, int v) {
        return st[u] <= st[v] && en[v] <= en[u] ;
    }
    int get_lca(int u, int v) {
        if(inside(u, v)) return u ;
        for(int k = lg(u) - 1; k > -1; k --) {
            int nxt = up[k][u].fi ;
            if(!inside(nxt, v)) {
                u = nxt ;
            }
        }
        return up[0][u].fi ;
    }
    pil go_up(int u, int k) {
        ll res = INF ;
        for(int j = lg(k); j > -1; j --) {
            if(k >> j & 1) {
                minimize(res, up[j][u].se) ;
                u = up[j][u].fi ;
            }
        }
        minimize(res, up[0][u].se) ;
        return mp(u, res) ;
    }
    ll trySolve(int del, int town) {
        int u = e[del].u ;
        int v = e[del].v ;
        if(st[u] > st[v]) swap(u, v) ;
        if(!inside(v, town)) {
            return -1 ;
        }
        int k = h[town] - h[v] ;
        return go_up(town, k).se + dis[town] ;
    }
    void solve() {
        for(int i = 1; i <= m; i ++) {
            mark[a[i]] = true ;
        }
        for(int i = 1; i <= n; i ++) {
            dp[i] = INF ;
            for(int j = 0; (1 << j) <= n; j ++) {
                up[j][i].se = INF ;
            }
        }
        dfs(hel, 0) ;
        for(int j = 1; (1 << j) <= n; j ++) {
            for(int i = 1; i <= n; i ++) {
                up[j][i] = up[j - 1][up[j - 1][i].fi] ;
                minimize(up[j][i].se, up[j - 1][i].se) ;
                // cerr << j << ' ' << i << ' ' << up[j][i].fi << ' ' << up[j][i].se << endl ;
            }
        }
        for(int i = 1; i <= q; i ++) {
            ll x = trySolve(query[i].fi, query[i].se) ;
            if(x == -1) {
                cout << "escaped\n" ;
            }
            else if(x >= INF) {
                // cout << x << ' ' ;
                cout << "oo\n" ;
            }
            else {
                cout << x << '\n' ;
            }
        }
    }
}
signed main() {
    ios_base::sync_with_stdio(0) ; cin.tie(0) ; cout.tie(0) ;
    if(fopen(taskname".inp", "r")) {
        freopen(taskname".inp", "r", stdin) ;
        freopen(taskname".out", "w", stdout) ;
    }
    cin >> n >> m >> q >> hel ;
    for(int i = 1; i < n; i ++) {
        int u, v, w ; cin >> u >> v >> w ;
        adj[u].push_back(i) ;
        adj[v].push_back(i) ;
        e[i] = E(u, v, w) ;
    }
    for(int i = 1; i <= m; i ++) {
        cin >> a[i] ;
    }
    for(int i = 1; i <= q; i ++) {
        cin >> query[i].fi >> query[i].se ;
    }
    return sub4::solve(), 0 ;
}
Compilation message (stderr)
valley.cpp: In function 'int main()':
valley.cpp:166:16: warning: ignoring return value of 'FILE* freopen(const char*, const char*, FILE*)' declared with attribute 'warn_unused_result' [-Wunused-result]
  166 |         freopen(taskname".inp", "r", stdin) ;
      |         ~~~~~~~^~~~~~~~~~~~~~~~~~~~~~~~~~~~
valley.cpp:167:16: warning: ignoring return value of 'FILE* freopen(const char*, const char*, FILE*)' declared with attribute 'warn_unused_result' [-Wunused-result]
  167 |         freopen(taskname".out", "w", stdout) ;
      |         ~~~~~~~^~~~~~~~~~~~~~~~~~~~~~~~~~~~~| # | Verdict | Execution time | Memory | Grader output | 
|---|
| Fetching results... | 
| # | Verdict | Execution time | Memory | Grader output | 
|---|
| Fetching results... | 
| # | Verdict | Execution time | Memory | Grader output | 
|---|
| Fetching results... | 
| # | Verdict | Execution time | Memory | Grader output | 
|---|
| Fetching results... |