Problem: Ralph is going to collect mushrooms in the Mushroom Forest. 

There are m directed paths connecting n trees in the Mushroom Forest. On each path grow some mushrooms. When Ralph passes a path, he collects all the mushrooms on the path. The Mushroom Forest has a magical fertile ground where mushrooms grow at a fantastic speed. New mushrooms regrow as soon as Ralph finishes mushroom collection on a path. More specifically, after Ralph passes a path the i-th time, there regrow i mushrooms less than there was before this pass. That is, if there is initially x mushrooms on a path, then Ralph will collect x mushrooms for the first time, x - 1 mushrooms the second time, x - 1 - 2 mushrooms the third time, and so on. However, the number of mushrooms can never be less than 0.

For example, let there be 9 mushrooms on a path initially. The number of mushrooms that can be collected from the path is 9, 8, 6 and 3 when Ralph passes by from first to fourth time. From the fifth time and later Ralph can't collect any mushrooms from the path (but still can pass it).

Ralph decided to start from the tree s. How many mushrooms can he collect using only described paths?

Input

The first line contains two integers n and m (1 ≤ n ≤ 106, 0 ≤ m ≤ 106), representing the number of trees and the number of directed paths in the Mushroom Forest, respectively.

Each of the following m lines contains three integers x, y and w (1 ≤ x, y ≤ n, 0 ≤ w ≤ 108), denoting a path that leads from tree x to tree y with w mushrooms initially. There can be paths that lead from a tree to itself, and multiple paths between the same pair of trees.

The last line contains a single integer s (1 ≤ s ≤ n) — the starting position of Ralph. 

Output

Print an integer denoting the maximum number of the mushrooms Ralph can collect during his route. 

Examples

Input

2 2
1 2 4
2 1 4
1


Output

16

Input

3 3
1 2 4
2 3 3
1 3 8
1


Output

8

Note

In the first sample Ralph can pass three times on the circle and collect 4 + 4 + 3 + 3 + 1 + 1 = 16 mushrooms. After that there will be no mushrooms for Ralph to collect.

In the second sample, Ralph can go to tree 3 and collect 8 mushrooms on the path from tree 1 to tree 3.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
const int maxn = 1e6 + 5;
const int maxm = 1e6 + 5;
template <typename T>
inline void read(T &x) {
  x = 0;
  T f = 1;
  char ch;
  do {
    ch = getchar();
    if (ch == '-') f = -1;
  } while (ch < '0' || ch > '9');
  do x = x * 10 + ch - '0', ch = getchar();
  while (ch <= '9' && ch >= '0');
  x *= f;
}
template <typename A, typename B>
inline void read(A &x, B &y) {
  read(x);
  read(y);
}
template <typename A, typename B, typename C>
inline void read(A &x, B &y, C &z) {
  read(x);
  read(y);
  read(z);
}
template <typename A, typename B, typename C, typename D>
inline void read(A &x, B &y, C &z, D &w) {
  read(x);
  read(y);
  read(z);
  read(w);
}
struct node {
  int v;
  long long w;
  node() {}
  node(int _v, long long _w) : v(_v), w(_w) {}
};
vector<node> e[maxn];
int Low[maxn], DFN[maxn], Stack[maxn], Belong[maxn];
int num[maxn];
int Index, top, n, m, x, y;
long long z;
int scc;
bool Instack[maxn];
long long score[maxn];
vector<int> scce[maxn];
long long dp[maxn];
void Tarjan(int u) {
  int v;
  Low[u] = DFN[u] = ++Index;
  Stack[top++] = u;
  Instack[u] = true;
  for (auto enxt : e[u]) {
    v = enxt.v;
    if (!DFN[v]) {
      Tarjan(v);
      Low[u] = min(Low[u], Low[v]);
    } else if (Instack[v] && Low[u] > DFN[v])
      Low[u] = DFN[v];
  }
  if (Low[u] == DFN[u]) {
    scc++;
    do {
      v = Stack[--top];
      Instack[v] = false;
      Belong[v] = scc;
      num[scc]++;
    } while (v != u);
  }
}
int indeg[maxn], outdeg[maxn];
long long calc(long long w) {
  long long l = 0, r = 1e6 + 5, rt;
  while (l <= r) {
    long long mid = (l + r) / 2;
    if (mid * (mid + 1) / 2 <= w)
      l = (rt = mid) + 1;
    else
      r = mid - 1;
  }
  long long ret = w * (rt + 1ll) - rt * (rt + 1ll) * (rt + 2ll) / 6ll;
  return ret;
}
inline void solve(int n) {
  memset(DFN, 0, sizeof DFN);
  memset(num, 0, sizeof num);
  memset(Instack, 0, sizeof Instack);
  Index = scc = top = 0;
  for (int i = 1; i <= n; i++)
    if (!DFN[i]) Tarjan(i);
  memset(indeg, 0, sizeof indeg);
  memset(outdeg, 0, sizeof outdeg);
  for (int u = 1; u <= n; u++) scce[Belong[u]].push_back(u);
  for (int u = 1; u <= n; u++)
    for (auto enxt : e[u]) {
      int v = enxt.v;
      if (Belong[u] != Belong[v]) {
        outdeg[Belong[u]]++;
        indeg[Belong[v]]++;
      } else {
        score[Belong[u]] += calc(enxt.w);
      }
    }
}
long long find(int nowscc) {
  if (dp[nowscc] != -1) return dp[nowscc];
  long long ret = 0;
  for (auto u : scce[nowscc])
    for (auto enxt : e[u]) {
      int v = enxt.v;
      if (Belong[u] == Belong[v]) continue;
      long long w = enxt.w;
      ret = max(ret, find(Belong[v]) + w);
    }
  dp[nowscc] = (ret + score[nowscc]);
  return dp[nowscc];
}
int main() {
  read(n, m);
  for (int i = 1; i <= m; i++) {
    read(x, y, z);
    e[x].push_back(node(y, z));
  }
  solve(n);
  memset(dp, -1, sizeof dp);
  int start;
  read(start);
  long long res = find(Belong[start]);
  cout << res;
  return 0;
}