#include <bits/stdc++.h>
using namespace std;
const long long mx = 1e6 + 66;
const long long mod = 1e9 + 7;
const long long inf = 8e18 + 66;
const int llg = 20;
const long long mxk = 31700000;
long long power(long long a, long long b, long long md) {
  if (b == 0) return 1;
  long long c = power(a, b / 2, md);
  if (b % 2)
    return c * c % md * a % md;
  else
    return c * c % md;
}
int n, a[mx], god[mx], mark[mx];
vector<int> g[mx];
vector<pair<int, int> > w;
int get_god(int x) {
  if (god[x] < 0) return x;
  return get_god(god[x]);
}
void dsu(int x, int y) {
  int u = get_god(x);
  int v = get_god(y);
  if (god[u] > god[v]) swap(u, v);
  god[u] += god[v];
  god[v] = u;
}
int main() {
  ios_base::sync_with_stdio(false);
  cin.tie(0);
  cout.tie(0);
  cin >> n;
  for (int i = 1; i < n + 1; i++) {
    cin >> a[i];
    w.push_back({a[i], i});
  }
  for (int i = 1; i < n; i++) {
    int u, v;
    cin >> u >> v;
    g[u].push_back(v);
    g[v].push_back(u);
  }
  fill(god, god + n + 6, -1);
  sort(w.begin(), w.end());
  long long ans = 0;
  for (int i = 0; i < w.size(); i++) {
    int u = w[i].second;
    int st = 1;
    for (auto v : g[u]) {
      if (!mark[v]) continue;
      int gd = get_god(v);
      int sz = -god[gd];
      ans += 1ll * a[u] * st * sz;
      st += sz;
      dsu(u, v);
    }
    mark[u] = 1;
  }
  fill(god, god + n + 6, -1);
  fill(mark, mark + n + 6, 0);
  reverse(w.begin(), w.end());
  for (int i = 0; i < w.size(); i++) {
    int u = w[i].second;
    int st = 1;
    for (auto v : g[u]) {
      if (!mark[v]) continue;
      int gd = get_god(v);
      int sz = -god[gd];
      ans -= 1ll * a[u] * st * sz;
      st += sz;
      dsu(u, v);
    }
    mark[u] = 1;
  }
  cout << ans;
}
