Problem: The biggest gold mine in Berland consists of n caves, connected by n - 1 transitions. The entrance to the mine leads to the cave number 1, it is possible to go from it to any remaining cave of the mine by moving along the transitions. 

The mine is being developed by the InMine Inc., k miners work for it. Each day the corporation sorts miners into caves so that each cave has at most one miner working there. 

For each cave we know the height of its ceiling hi in meters, and for each miner we know his height sj, also in meters. If a miner's height doesn't exceed the height of the cave ceiling where he is, then he can stand there comfortably, otherwise, he has to stoop and that makes him unhappy.

Unfortunately, miners typically go on strike in Berland, so InMine makes all the possible effort to make miners happy about their work conditions. To ensure that no miner goes on strike, you need make sure that no miner has to stoop at any moment on his way from the entrance to the mine to his cave (in particular, he must be able to stand comfortably in the cave where he works). 

To reach this goal, you can choose exactly one cave and increase the height of its ceiling by several meters. However enlarging a cave is an expensive and complex procedure. That's why InMine Inc. asks you either to determine the minimum number of meters you should raise the ceiling of some cave so that it is be possible to sort the miners into the caves and keep all miners happy with their working conditions or to determine that it is impossible to achieve by raising ceiling in exactly one cave.

Input

The first line contains integer n (1 ≤ n ≤ 5·105) — the number of caves in the mine.

Then follows a line consisting of n positive integers h1, h2, ..., hn (1 ≤ hi ≤ 109), where hi is the height of the ceiling in the i-th cave.

Next n - 1 lines contain the descriptions of transitions between the caves. Each line has the form ai, bi (1 ≤ ai, bi ≤ n, ai ≠ bi), where ai and bi are the numbers of the caves connected by a path.

The next line contains integer k (1 ≤ k ≤ n).

The last line contains k integers s1, s2, ..., sk (1 ≤ sj ≤ 109), where sj is the j-th miner's height.

Output

In the single line print the minimum number of meters that you need to raise the ceiling by in some cave so that all miners could be sorted into caves and be happy about the work conditions. If it is impossible to do, print  - 1. If it is initially possible and there's no need to raise any ceiling, print 0. 

Examples

Input

6
5 8 4 6 3 12
1 2
1 3
4 2
2 5
6 3
6
7 4 2 5 3 11


Output

6


Input

7
10 14 7 12 4 50 1
1 2
2 3
2 4
5 1
6 5
1 7
6
7 3 4 8 8 10


Output

0


Input

3
4 2 8
1 2
1 3
2
17 15


Output

-1

Note

In the first sample test we should increase ceiling height in the first cave from 5 to 11. After that we can distribute miners as following (first goes index of a miner, then index of a cave): <image>.

In the second sample test there is no need to do anything since it is already possible to distribute miners as following: <image>.

In the third sample test it is impossible.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
inline int read() {
  int x = 0, f = 1;
  char c = getchar();
  while (!isdigit(c)) {
    if (c == '-') f = -1;
    c = getchar();
  }
  while (isdigit(c)) {
    x = x * 10 + c - '0';
    c = getchar();
  }
  return x * f;
}
const int MAXN = 5e5 + 10;
int n, fa[MAXN], d[MAXN], w[MAXN], rnk[MAXN];
int mn[MAXN << 2], tag[MAXN << 2];
struct Heap {
  priority_queue<pair<int, int> > q1, q2;
  Heap() {}
  inline void insert(pair<int, int> now) { q1.push(now); }
  inline void remove(pair<int, int> now) { q2.push(now); }
  inline void fix() {
    while (q2.size() && q1.top() == q2.top()) q1.pop(), q2.pop();
  }
  inline void pop() { q1.pop(); }
  inline pair<int, int> top() {
    fix();
    return q1.top();
  }
  inline int size() { return q1.size() - q2.size(); }
} myheap;
vector<int> Candidate;
inline void update(int x) { mn[x] = min(mn[(x << 1)], mn[(x << 1 | 1)]); }
inline void operate(int x, int v) { tag[x] += v, mn[x] += v; }
inline void pushdown(int x) {
  if (tag[x]) {
    int v = tag[x];
    operate((x << 1), v);
    operate((x << 1 | 1), v);
    tag[x] = 0;
  }
}
inline void modify(int x, int l, int r, int ql, int qr, int v) {
  if (ql > qr) return;
  if (l >= ql && r <= qr) return operate(x, v);
  int mid = (l + r) >> 1;
  pushdown(x);
  if (ql <= mid) modify((x << 1), l, mid, ql, qr, v);
  if (qr > mid) modify((x << 1 | 1), mid + 1, r, ql, qr, v);
  update(x);
}
inline int query(int x, int l, int r, int ql, int qr) {
  if (ql > qr) return 0;
  if (l >= ql && r <= qr) return mn[x];
  int mid = (l + r) >> 1, res = 0;
  pushdown(x);
  if (ql <= mid) res = min(res, query((x << 1), l, mid, ql, qr));
  if (qr > mid) res = min(res, query((x << 1 | 1), mid + 1, r, ql, qr));
  return res;
}
inline int find(int x, int l, int r) {
  if (l == r) return l;
  int mid = (l + r) >> 1;
  pushdown(x);
  if (mn[(x << 1 | 1)] < 0)
    return find((x << 1 | 1), mid + 1, r);
  else
    return find((x << 1), l, mid);
}
vector<int> linker[MAXN];
void GetCandidate() {
  Candidate.clear();
  myheap.insert(pair<int, int>(d[1], 1));
  for (int i = n; i >= 1; i--) {
    pair<int, int> now = myheap.top();
    if (now.first < w[i]) {
      Candidate.push_back(now.second);
      myheap.pop();
      for (; myheap.size(); myheap.pop())
        Candidate.push_back(myheap.top().second);
      break;
    }
    myheap.pop();
    for (int cur : linker[now.second])
      if (cur != fa[now.second]) myheap.insert(pair<int, int>(d[cur], cur));
  }
  if (Candidate.empty()) {
    puts("0");
    exit(0);
  }
}
int lim[MAXN];
void dfs(int x, int mn) {
  lim[x] = mn;
  mn = min(mn, rnk[x]);
  modify(1, 1, n, 1, mn, 1);
  for (int cur : linker[x])
    if (cur != fa[x]) dfs(cur, mn);
}
vector<int> tv;
const int INF = 0x3f3f3f3f;
void foo(int x, int mn) {
  mn = min(mn, rnk[x]);
  tv.push_back(mn);
  for (int cur : linker[x])
    if (cur != fa[x]) foo(cur, mn);
}
int ans;
struct tumple {
  int l, r, v;
  tumple() {}
  tumple(int l, int r, int v) : l(l), r(r), v(v) {}
};
vector<tumple> mystack;
inline void refine() {
  for (tumple &cur : mystack) modify(1, 1, n, cur.l, cur.r, -cur.v);
  mystack.clear();
}
int R;
void Solve(int x) {
  int limit = lim[x], now = min(limit, rnk[x]);
  if (query(1, 1, n, 1, now) < 0 || R > lim[x]) return;
  tv.clear(), mystack.clear();
  for (int cur : linker[x])
    if (cur != fa[x]) foo(cur, lim[x]);
  sort(tv.begin(), tv.end());
  int st = upper_bound(tv.begin(), tv.end(), now) - tv.begin();
  modify(1, 1, n, now, R, 1);
  mystack.push_back(tumple(now + 1, R, 1));
  for (int i = st, j; i < tv.size(); i = j + 1) {
    int bar = tv[i];
    for (j = i; j < tv.size() - 1 && tv[j + 1] == bar; j++)
      ;
    modify(1, 1, n, now + 1, min(R, bar), j - i + 1);
    mystack.push_back(tumple(now + 1, min(R, bar), j - i + 1));
  }
  if (mn[1] >= 0) ans = min(ans, w[R] - d[x]);
  refine();
}
void build(int x, int l, int r) {
  if (l == r) {
    mn[x] = -(n - l + 1);
    return;
  }
  int mid = (l + r) >> 1;
  build((x << 1), l, mid);
  build((x << 1 | 1), mid + 1, r);
  mn[x] = -(n - l + 1);
}
void _dfs(int x) {
  for (int cur : linker[x]) {
    if (cur == fa[x]) continue;
    fa[cur] = x;
    _dfs(cur);
  }
}
int main() {
  n = read(), ans = INF;
  for (int i = 1; i <= n; i++) d[i] = read();
  for (int i = 1; i < n; i++) {
    int u = read(), v = read();
    linker[u].push_back(v);
    linker[v].push_back(u);
  }
  _dfs(1);
  int bar = read();
  for (int i = 1; i <= bar; i++) w[i] = read();
  sort(w + 1, w + 1 + n);
  for (int i = 1; i <= n; i++)
    rnk[i] = upper_bound(w + 1, w + 1 + n, d[i]) - w - 1;
  build(1, 1, n), dfs(1, INF), GetCandidate();
  R = find(1, 1, n);
  for (int cur : Candidate) Solve(cur);
  if (ans == INF) ans = -1;
  printf("%d\n", ans);
  return 0;
}