Problem: According to the last order issued by the president of Berland every city of the country must have its own Ministry Defense building (their own Pentagon). A megapolis Berbourg was not an exception. This city has n junctions, some pairs of which are connected by two-way roads. Overall there are m roads in the city, no more than one between each pair of junctions.

At the moment choosing a location place for Pentagon in Berbourg is being discussed. It has been decided that Pentagon should cover the territory of five different junctions which are joined into a cycle by roads. In the order to build Pentagon a special wall will be built along the roads (with high-tension razor, high-voltage wire and other attributes). Thus, the number of possible ways of building Pentagon in the city is equal to the number of different cycles at lengths of 5, composed of junctions and roads.

Your task is to prints the number of ways of building Pentagon in Berbourg. Only well-optimized solutions will be accepted. Please, test your code on the maximal testcase.

Input

The first line contains two integers n and m (1 ≤ n ≤ 700;0 ≤ m ≤ n·(n - 1) / 2), where n represents the number of junctions and m is the number of roads in the city. Then follow m lines containing the road descriptions, one in each line. Every road is set by a number of integers ai, bi (1 ≤ ai, bi ≤ n;ai ≠ bi), where ai and bi represent the numbers of junctions, connected by the road. The junctions are numbered from 1 to n. It is not guaranteed that from any junction one can get to any other one moving along the roads.

Output

Print the single number which represents the required number of ways. Please, do not use %lld specificator to read or write 64-bit integers in C++. It is preffered to use cout (also you may use %I64d).

Examples

Input

5 5
1 2
2 3
3 4
4 5
5 1


Output

1


Input

5 10
1 2
1 3
1 4
1 5
2 3
2 4
2 5
3 4
3 5
4 5


Output

12

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
#pragma comment(linker, "/stack:200000000")
#pragma GCC optimize("Ofast")
#pragma GCC optimize("unroll-loops")
#pragma GCC target("sse,sse2,sse3,ssse3,sse4,popcnt,abm,mmx,avx,tune=native")
using namespace std;
const long long inf = numeric_limits<long long>::max() / 2;
const long double eps = 1e-9;
const long double pi = acos(-1);
template <typename T>
inline bool mineq(T& a, T b) {
  return (a > b) ? (a = b, 1) : 0;
}
template <typename T>
inline bool maxeq(T& a, T b) {
  return (a < b) ? (a = b, 1) : 0;
}
inline void solve(), read();
const string file = "";
int main() {
  if (file != "") {
    freopen((file + ".in").c_str(), "r", stdin);
    freopen((file + ".out").c_str(), "w", stdout);
  }
  ios_base::sync_with_stdio(0), cin.tie(0), cout.tie(0);
  ;
  read();
  solve();
  return 0;
}
long long n, m;
vector<vector<long long> > adj;
vector<vector<long long> > can;
vector<long long> d;
inline void solve() {
  can.assign(n, vector<long long>(n, 0));
  for (long long i = 0; i < n; i++) {
    for (long long j = i + 1; j < n; j++) {
      for (long long k = 0; k < n; k++) {
        if (adj[i][k] && adj[k][j]) {
          ++can[i][j];
          ++can[j][i];
        }
      }
    }
  }
  long long ans = 0;
  for (long long i = 0; i < n; i++) {
    for (long long j = i + 1; j < n; j++) {
      if (!adj[i][j]) {
        continue;
      }
      for (long long k = 0; k < n; k++) {
        if (i == k || j == k) {
          continue;
        }
        long long a1 = can[i][k];
        long long a2 = can[k][j];
        if (adj[i][k]) {
          --a2;
        }
        if (adj[k][j]) {
          --a1;
        }
        ans += a1 * a2;
        if (adj[i][k] && adj[k][j]) {
          ans -= d[k] - 2;
        }
      }
    }
  }
  ans /= 5;
  cout << ans << "\n";
}
inline void read() {
  cin >> n >> m;
  adj.resize(n, vector<long long>(n, 0));
  d.assign(n, 0);
  for (long long i = 0; i < m; i++) {
    long long v, u;
    cin >> v >> u;
    --v, --u;
    adj[v][u] = 1;
    adj[u][v] = 1;
    ++d[v], ++d[u];
  }
}