Problem: One Khanate had a lot of roads and very little wood. Riding along the roads was inconvenient, because the roads did not have road signs indicating the direction to important cities.

The Han decided that it's time to fix the issue, and ordered to put signs on every road. The Minister of Transport has to do that, but he has only k signs. Help the minister to solve his problem, otherwise the poor guy can lose not only his position, but also his head.

More formally, every road in the Khanate is a line on the Oxy plane, given by an equation of the form Ax + By + C = 0 (A and B are not equal to 0 at the same time). You are required to determine whether you can put signs in at most k points so that each road had at least one sign installed.

Input

The input starts with two positive integers n, k (1 ≤ n ≤ 105, 1 ≤ k ≤ 5)

Next n lines contain three integers each, Ai, Bi, Ci, the coefficients of the equation that determines the road (|Ai|, |Bi|, |Ci| ≤ 105, Ai2 + Bi2 ≠ 0).

It is guaranteed that no two roads coincide.

Output

If there is no solution, print "NO" in the single line (without the quotes).

Otherwise, print in the first line "YES" (without the quotes).

In the second line print a single number m (m ≤ k) — the number of used signs. In the next m lines print the descriptions of their locations.

Description of a location of one sign is two integers v, u. If u and v are two distinct integers between 1 and n, we assume that sign is at the point of intersection of roads number v and u. If u = - 1, and v is an integer between 1 and n, then the sign is on the road number v in the point not lying on any other road. In any other case the description of a sign will be assumed invalid and your answer will be considered incorrect. In case if v = u, or if v and u are the numbers of two non-intersecting roads, your answer will also be considered incorrect.

The roads are numbered starting from 1 in the order in which they follow in the input.

Examples

Input

3 1
1 0 0
0 -1 0
7 -93 0


Output

YES
1
1 2


Input

3 1
1 0 0
0 1 0
1 1 3


Output

NO


Input

2 3
3 4 5
5 6 7


Output

YES
2
1 -1
2 -1

Note

Note that you do not have to minimize m, but it shouldn't be more than k.

In the first test all three roads intersect at point (0,0).

In the second test all three roads form a triangle and there is no way to place one sign so that it would stand on all three roads at once.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
const long long INF = 1000000000;
const int dir_4[4][2] = {{1, 0}, {0, 1}, {-1, 0}, {0, -1}};
const int dir_8[8][2] = {{1, 0},  {1, 1},   {0, 1},  {-1, 1},
                         {-1, 0}, {-1, -1}, {0, -1}, {1, -1}};
long long gcd(long long x, long long y) {
  if (y == 0) return x;
  return gcd(y, x % y);
}
pair<long long, long long> yakubun(pair<long long, long long> x) {
  if (x.second < 0) {
    x.first *= -1;
    x.second *= -1;
  }
  long long g = gcd(abs(x.first), abs(x.second));
  x.first /= g;
  x.second /= g;
  return x;
}
pair<pair<long long, long long>, pair<long long, long long> > inter(
    pair<pair<long long, long long>, pair<long long, long long> > l,
    pair<pair<long long, long long>, pair<long long, long long> > m) {
  long long l_a = l.first.second, l_b = l.second.first, l_c = l.second.second;
  long long m_a = m.first.second, m_b = m.second.first, m_c = m.second.second;
  if (l_a * m_b - m_a * l_b == 0)
    return pair<pair<long long, long long>, pair<long long, long long> >(
        pair<long long, long long>(INF, INF),
        pair<long long, long long>(INF, INF));
  pair<long long, long long> x = yakubun(pair<long long, long long>(
      -m_c * l_b + l_c * m_b, l_a * m_b - m_a * l_b));
  pair<long long, long long> y = yakubun(pair<long long, long long>(
      -m_c * l_a + l_c * m_a, l_b * m_a - m_b * l_a));
  return pair<pair<long long, long long>, pair<long long, long long> >(x, y);
}
bool f(pair<pair<long long, long long>, pair<long long, long long> > l,
       pair<pair<long long, long long>, pair<long long, long long> > d) {
  long double a = l.first.second, b = l.second.first, c = l.second.second;
  long double p = d.first.first, q = d.first.second, r = d.second.first,
              w = d.second.second;
  if (abs(a * p * w + b * q * r - c * q * w) <= 0.5) return true;
  return false;
}
long long ccc(long long x) { return (x * (x - 1)) / 2; }
vector<pair<long long, long long> > ans;
vector<pair<pair<long long, long long>, pair<long long, long long> > >
    lines[10];
map<pair<pair<long long, long long>, pair<long long, long long> >, int> M;
bool solve(long long n, long long k) {
  if (n <= k) {
    for (int i = 0; i < n; i++) {
      ans.push_back(pair<long long, long long>(lines[k][i].first.first, -1));
    }
    return true;
  } else if (k == 0)
    return false;
  else if (n <= k * k) {
    M.clear();
    for (int i = 0; i < lines[k].size(); i++) {
      for (int j = i + 1; j < lines[k].size(); j++) {
        pair<pair<long long, long long>, pair<long long, long long> > p =
            inter(lines[k][i], lines[k][j]);
        if (p.first.first == INF && p.first.second == INF) continue;
        M[p]++;
      }
    }
    for (map<pair<pair<long long, long long>, pair<long long, long long> >,
             int>::iterator itr = M.begin();
         itr != M.end(); itr++) {
      if (itr->second >= ccc((n + k - 1) / k)) {
        lines[k - 1].clear();
        int v = -1, u = -1;
        for (int i = 0; i < lines[k].size(); i++) {
          if (!f(lines[k][i], itr->first)) {
            lines[k - 1].push_back(lines[k][i]);
          } else {
            if (v == -1)
              v = lines[k][i].first.first;
            else
              u = lines[k][i].first.first;
          }
        }
        ans.push_back(pair<long long, long long>(v, u));
        if (solve(lines[k - 1].size(), k - 1)) return true;
        ans.pop_back();
      }
    }
    return false;
  } else {
    M.clear();
    for (int i = 0; i < k * k + 1; i++) {
      for (int j = i + 1; j < k * k + 1; j++) {
        pair<pair<long long, long long>, pair<long long, long long> > p =
            inter(lines[k][i], lines[k][j]);
        if (p.first.first == INF && p.first.second == INF) continue;
        M[p]++;
      }
    }
    for (map<pair<pair<long long, long long>, pair<long long, long long> >,
             int>::iterator itr = M.begin();
         itr != M.end(); itr++) {
      if (itr->second >= ccc(k + 1)) {
        lines[k - 1].clear();
        int v = -1, u = -1;
        for (int i = 0; i < lines[k].size(); i++) {
          if (!f(lines[k][i], itr->first)) {
            lines[k - 1].push_back(lines[k][i]);
          } else {
            if (v == -1)
              v = lines[k][i].first.first;
            else
              u = lines[k][i].first.first;
          }
        }
        ans.push_back(pair<long long, long long>(v, u));
        if (solve(lines[k - 1].size(), k - 1)) return true;
        return false;
      }
    }
    return false;
  }
}
int main() {
  static long long n, k;
  static long long a[100010], b[100010], c[100010];
  scanf("%I64d%I64d", &n, &k);
  for (int i = 0; i < n; i++) {
    scanf("%I64d%I64d%I64d", &a[i], &b[i], &c[i]);
    lines[k].push_back(
        pair<pair<long long, long long>, pair<long long, long long> >(
            pair<long long, long long>(i + 1, a[i]),
            pair<long long, long long>(b[i], c[i])));
  }
  if (solve(n, k)) {
    puts("YES");
    printf("%d\n", ans.size());
    for (int i = 0; i < ans.size(); i++) {
      printf("%I64d %I64d\n", ans[i].first, ans[i].second);
    }
  } else
    puts("NO");
}