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;
template <typename A>
ostream& operator<<(ostream& cout, vector<A> const& v);
template <typename A, typename B>
ostream& operator<<(ostream& cout, pair<A, B> const& p) {
  return cout << "(" << p.first << ", " << p.second << ")";
}
template <typename A>
ostream& operator<<(ostream& cout, vector<A> const& v) {
  cout << "[";
  for (int i = 0; i < v.size(); i++) {
    if (i) cout << ", ";
    cout << v[i];
  }
  return cout << "]";
}
template <typename A, typename B>
istream& operator>>(istream& cin, pair<A, B>& p) {
  cin >> p.first;
  return cin >> p.second;
}
mt19937_64 rng(std::chrono::steady_clock::now().time_since_epoch().count());
void usaco(string filename) {
  freopen((filename + ".in").c_str(), "r", stdin);
  freopen((filename + ".out").c_str(), "w", stdout);
}
const long double pi = 3.14159265358979323846;
struct segtree {
  int n, depth;
  vector<long long> tree, lazy;
  void init(int second, long long* arr) {
    n = second;
    tree = vector<long long>(4 * second, 0);
    lazy = vector<long long>(4 * second, 0);
    init(0, 0, n - 1, arr);
  }
  long long init(int i, int l, int r, long long* arr) {
    if (l == r) return tree[i] = arr[l];
    int mid = (l + r) / 2;
    long long a = init(2 * i + 1, l, mid, arr),
              b = init(2 * i + 2, mid + 1, r, arr);
    return tree[i] = a > b ? a : b;
  }
  void update(int l, int r, long long v) { update(0, 0, n - 1, l, r, v); }
  long long update(int i, int tl, int tr, int ql, int qr, long long v) {
    eval_lazy(i, tl, tr);
    if (tr < ql || qr < tl) return tree[i];
    if (ql <= tl && tr <= qr) {
      lazy[i] += v;
      eval_lazy(i, tl, tr);
      return tree[i];
    }
    int mid = (tl + tr) / 2;
    long long a = update(2 * i + 1, tl, mid, ql, qr, v),
              b = update(2 * i + 2, mid + 1, tr, ql, qr, v);
    return tree[i] = a > b ? a : b;
  }
  long long query(int l, int r) { return query(0, 0, n - 1, l, r); }
  long long query(int i, int tl, int tr, int ql, int qr) {
    eval_lazy(i, tl, tr);
    if (ql <= tl && tr <= qr) return tree[i];
    if (tr < ql || qr < tl) return 1e13;
    int mid = (tl + tr) / 2;
    long long a = query(2 * i + 1, tl, mid, ql, qr),
              b = query(2 * i + 2, mid + 1, tr, ql, qr);
    return a > b ? a : b;
  }
  void eval_lazy(int i, int l, int r) {
    tree[i] += lazy[i];
    if (l != r) {
      lazy[i * 2 + 1] += lazy[i];
      lazy[i * 2 + 2] += lazy[i];
    }
    lazy[i] = 0;
  }
};
long long n, m, q, k, l, r, x, y, z;
const long long template_array_size = 1e6 + 16318;
long long a[template_array_size];
long long b[template_array_size];
long long c[template_array_size];
string second, t;
long long ans = 0;
vector<long long> edges[500005];
vector<long long> ch[500005];
long long val[500005];
long long val2[500005];
long long vl[500005];
long long dep[500005];
bool can[500005];
segtree st;
bool cval(long long a, long long b) {
  if (val[a] == val[b]) return dep[a] < dep[b];
  return val[a] > val[b];
}
void setv(long long v, long long p, long long va, long long d = 0) {
  val[v] = va;
  dep[v] = d;
  for (long long x : edges[v]) {
    if (x != p) {
      ch[v].push_back(x);
      setv(x, v, min(va, a[x]), d + 1);
    }
  }
}
void add(long long val, long long x) {
  long long lv = 0, rv = k;
  while (lv < rv) {
    long long mv = (lv + rv) / 2;
    if (b[mv] > val)
      lv = mv + 1;
    else
      rv = mv;
  }
  if (lv < k) st.update(lv, k - 1, x);
}
vector<long long> cur;
long long tsz = 0;
void checkv(long long v, long long va) {
  val2[v] = va;
  cur.push_back(v);
  for (long long x : ch[v]) {
    checkv(x, min(va, a[x]));
  }
}
bool check(long long v, long long t) {
  cur.clear();
  checkv(v, t);
  tsz += cur.size();
  for (long long x : cur) {
    add(val[x], 1);
    add(val2[x], -1);
  }
  bool pos = (st.query(0, k - 1) <= 0);
  for (long long x : cur) {
    add(val2[x], 1);
    add(val[x], -1);
  }
  return pos;
}
void solve(int tc = 0) {
  cin >> n;
  for (long long i = 0; i < n; i++) cin >> a[i];
  for (long long i = 0; i < n - 1; i++) {
    cin >> x >> y;
    --x;
    --y;
    edges[x].push_back(y);
    edges[y].push_back(x);
  }
  setv(0, -1, a[0]);
  cin >> k;
  for (long long i = 0; i < k; i++) cin >> b[i];
  sort(b, b + k);
  reverse(b, b + k);
  iota(c, c + k, 1);
  st.init(k, c);
  for (long long i = 0; i < n; i++) add(val[i], -1);
  iota(vl, vl + n, 0);
  sort(vl, vl + n, cval);
  long long sent = 1e17;
  long long ans = sent;
  can[0] = 1;
  bool pos = 1;
  for (long long i = 0; i < k; i++) {
    long long x = vl[i];
    if (val[x] >= b[i]) {
      for (long long y : ch[x]) can[y] = 1;
      can[x] = 0;
    } else {
      pos = 0;
      for (long long j = 0; j < n; j++) {
        if (can[j]) {
          if (check(j, b[i])) {
            ans = min(ans, b[i] - val[j]);
          }
        }
      }
      break;
    }
  }
  if (pos) ans = 0;
  if (ans == sent) ans = -1;
  cout << ans << '\n';
}
int main() {
  { ios_base::sync_with_stdio(false); }
  { cin.tie(NULL); }
  cout << setprecision(15) << fixed;
  int tc = 1;
  for (int t = 0; t < tc; t++) solve(t);
}