Problem: Ivan plays some computer game. There are n quests in the game. Each quest can be upgraded once, this increases the reward for its completion. Each quest has 3 parameters a_{i}, b_{i}, p_{i}: reward for completing quest before upgrade, reward for completing quest after upgrade (a_{i} < b_{i}) and probability of successful completing the quest.

Each second Ivan can try to complete one quest and he will succeed with probability p_{i}. In case of success Ivan will get the reward and opportunity to upgrade any one quest (not necessary the one he just completed). In case of failure he gets nothing. Quests do not vanish after completing.

Ivan has t seconds. He wants to maximize expected value of his total gain after t seconds. Help him to calculate this value.

Input

First line contains 2 integers n ( 1 ≤ n ≤ 10^{5}) and t ( 1 ≤ t ≤ 10^{10}) — number of quests and total time.

Following n lines contain description of quests. Each description is 3 numbers a_{i} b_{i} p_{i} (1 ≤ a_{i} < b_{i} ≤ 10^{8}, 0 < p_{i} < 1) — reward for completing quest before upgrade, reward for completing quest after upgrade and probability of successful completing of quest. a_{i} and b_{i} are integers. All probabilities are given with at most 9 decimal places.

Output

Print the expected value.

Your answer will be accepted if absolute or relative error does not exceed 10^{-6}. Formally, let your answer be a, and the jury's answer be b. Your answer is considered correct if (|a-b|)/(max⁡(b,    1)) ≤ 10^{-6}.

Examples

Input

3 2
3 1000 0.5
1 2 0.48
3 20 0.3


Output

252.2500000000000


Input

2 2
1 1000 0.1
2 3 0.2


Output

20.7200000000000

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
int n, s[101000], t;
long long T, rsec[101000];
struct data {
  double a, b, p;
} d[101000];
double ans, MaxBP, rres[101000];
double Mul(long double a, long long b) {
  double c(1);
  for (; b; b >>= 1, a *= a)
    if (b & 1) c *= a;
  return c;
}
bool cmp(data a, data b) { return a.p * a.a > b.p * b.a; }
double f(data x, long long t, long long rsec, double rres) {
  double temp = Mul(1.0 - x.p, t);
  return MaxBP * t + (x.a - MaxBP / x.p) * (1.0 - temp) +
         MaxBP * rsec * (1.0 - temp) + temp * rres;
}
long long GetMinT(data x, data y, long long rsec, long long rres) {
  long long L = 0, R = T, M;
  if (f(x, 1, rsec + R, f(y, R, rsec, rres)) <= f(y, R + 1, rsec, rres))
    return R + rsec + 1;
  for (; L + 1 < R;) {
    M = (L + R + 1) / 2;
    if (f(x, 1, rsec + M, f(y, M, rsec, rres)) > f(y, M + 1, rsec, rres))
      R = M;
    else
      L = M;
  }
  return R + rsec;
}
int main() {
  long long rest;
  scanf("%d%I64d", &n, &T);
  MaxBP = -1e10;
  for (int i = 0; i < n; i++) {
    scanf("%lf%lf%lf", &d[i].a, &d[i].b, &d[i].p);
    if (d[i].b * d[i].p > MaxBP) MaxBP = d[i].b * d[i].p;
  }
  std::sort(d, d + n, cmp);
  t = 0;
  for (int i = 0; i < n; i++) {
    if (t > 0 && GetMinT(d[i], d[s[t - 1]], rsec[t - 1], rres[t - 1]) >= T)
      continue;
    for (; t > 0 && f(d[i], 1, rsec[t - 1], rres[t - 1]) >
                        f(d[s[t - 1]], 1, rsec[t - 1], rres[t - 1]);
         t--)
      ;
    s[t] = i;
    if (t > 0) {
      rsec[t] = GetMinT(d[i], d[s[t - 1]], rsec[t - 1], rres[t - 1]);
      rres[t] = f(d[s[t - 1]], rsec[t] - rsec[t - 1], rsec[t - 1], rres[t - 1]);
    } else {
      rsec[t] = 0;
      rres[t] = 0;
    }
    t++;
  }
  ans = f(d[s[t - 1]], T - rsec[t - 1], rsec[t - 1], rres[t - 1]);
  printf("%lf\n", ans);
  return 0;
}