Problem: DZY loves Physics, and he enjoys calculating density.

Almost everything has density, even a graph. We define the density of a non-directed graph (nodes and edges of the graph have some values) as follows: 

<image> where v is the sum of the values of the nodes, e is the sum of the values of the edges.

Once DZY got a graph G, now he wants to find a connected induced subgraph G' of the graph, such that the density of G' is as large as possible.

An induced subgraph G'(V', E') of a graph G(V, E) is a graph that satisfies:

  * <image>; 
  * edge <image> if and only if <image>, and edge <image>; 
  * the value of an edge in G' is the same as the value of the corresponding edge in G, so as the value of a node. 



Help DZY to find the induced subgraph with maximum density. Note that the induced subgraph you choose must be connected.

<image>

Input

The first line contains two space-separated integers n (1 ≤ n ≤ 500), <image>. Integer n represents the number of nodes of the graph G, m represents the number of edges.

The second line contains n space-separated integers xi (1 ≤ xi ≤ 106), where xi represents the value of the i-th node. Consider the graph nodes are numbered from 1 to n.

Each of the next m lines contains three space-separated integers ai, bi, ci (1 ≤ ai < bi ≤ n; 1 ≤ ci ≤ 103), denoting an edge between node ai and bi with value ci. The graph won't contain multiple edges.

Output

Output a real number denoting the answer, with an absolute or relative error of at most 10 - 9.

Examples

Input

1 0
1


Output

0.000000000000000


Input

2 1
1 2
1 2 1


Output

3.000000000000000


Input

5 6
13 56 73 98 17
1 2 56
1 3 29
1 4 42
2 3 95
2 4 88
3 4 63


Output

2.965517241379311

Note

In the first sample, you can only choose an empty subgraph, or the subgraph containing only node 1.

In the second sample, choosing the whole graph is optimal.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
long dx[] = {-1, -1, -1, 0, 0, 1, 1, 1};
long dy[] = {-1, 0, 1, -1, 1, -1, 0, 1};
template <class T>
T Abs(T a) {
  return (a < 0 ? -a : a);
}
template <class T>
T gcd(T a, T b) {
  return (b != 0 ? gcd(b, a % b) : a);
}
template <class T>
T lcm(T a, T b) {
  return ((a * b) / gcd(a, b));
}
template <class T>
T bigMod(T b, T p, T m) {
  if (p == 0)
    return 1;
  else if (p & 1)
    return (b * bigMod(b, p - 1, m)) % m;
  else {
    T temp = bigMod(b, p >> 1, m);
    return (((temp) * (temp))) % m;
  }
}
template <class T>
T modInverse(T b, T m) {
  return bigMod(b, m - 2, m);
}
long long power(long long b, long long p) {
  long long res = 1ll, x = b;
  while (p) {
    if (p & 1) res *= x;
    x *= x;
    p = p >> 1;
  }
  return res;
}
template <typename T>
inline bool isOn(T mask, T pos) {
  return mask & (1 << pos);
}
template <typename T>
inline int Off(T mask, T pos) {
  return mask ^ (1 << pos);
}
template <typename T>
inline int On(T mask, T pos) {
  return mask | (1 << pos);
}
bool stringMod(string a, long long n) {
  long long num = 0;
  for (long i = 0; i < a.size(); i++) num = ((num * 10) + (a[i] - '0')) % n;
  if (num == 0)
    return 1;
  else
    return 0;
}
bool prime[10000 + 2];
vector<long long> primes;
void seive() {
  for (long long i = 4; i <= 10000; i += 2) prime[i] = 1;
  for (long long i = 3; i * i <= 10000; i += 2) {
    if (prime[i] == 0) {
      for (long long j = 2 * i; j <= 10000; j += i) prime[j] = 1;
    }
  }
  primes.push_back(2);
  for (long long i = 3; i <= 10000; i += 2)
    if (prime[i] == 0) primes.push_back(i);
}
double ar[505];
int main() {
  long m, n, a, b;
  double z;
  ios_base::sync_with_stdio(0);
  while (cin >> n >> m) {
    for (long i = 1; i <= n; i++) cin >> ar[i];
    double ans = 0;
    for (long i = 0; i < m; i++) {
      cin >> a >> b >> z;
      ans = max(ans, (ar[a] + ar[b]) / z);
    }
    cout << setprecision(11) << ans << endl;
  }
  return 0;
}