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 double EPS = 1e-8;
struct Point {
  long double x, y;

 public:
  Point() : x(0), y(0) {}
  Point(long double x, long double y) : x(x), y(y) {}
  long double operator^(const Point &other) const {
    return x * other.y - y * other.x;
  }
  friend ostream &operator<<(ostream &os, const Point &point) {
    return os << point.x << ' ' << point.y << endl;
  }
};
bool eq(long double first, long double second) {
  return abs(first - second) < EPS;
}
struct Line {
  int64_t A, B, C;

 public:
  Line() : A(rand()), B(rand()), C(rand()) {}
  bool Belong(const Point &point) const {
    return eq(point.x * A + point.y * B + C, 0);
  }
  bool Parallel(const Line &other) const {
    return eq(Point(A, B) ^ Point(other.A, other.B), 0);
  }
  Point Intersection(const Line &other) const {
    long double det = Point(A, B) ^ Point(other.A, other.B);
    return Point((Point(-C, B) ^ Point(-other.C, other.B)) / det,
                 (Point(A, -C) ^ Point(other.A, -other.C)) / det);
  }
  friend istream &operator>>(istream &is, Line &line) {
    return is >> line.A >> line.B >> line.C;
  }
  friend ostream &operator<<(ostream &os, const Line &line) {
    return os << line.A << ' ' << line.B << ' ' << line.C << endl;
  }
};
pair<int, int> GetPosRandom(int size) {
  return make_pair(rand() % size, rand() % size);
}
pair<int, int> GetPosCounter(size_t counter, size_t n) {
  return make_pair(counter % n, counter / n);
}
void Solve(int h, int n, const vector<pair<Line, size_t>> &line,
           vector<pair<int, int>> &ans) {
  size_t size = line.size();
  if (h + line.size() <= n) {
    cout << "YES\n" << h + line.size() << endl;
    for (size_t i = 0; i < h; ++i) {
      cout << ans[i].first << ' ' << ans[i].second << endl;
    }
    for (size_t i = 0; i < line.size(); ++i) {
      cout << line[i].second << " -1\n";
    }
    exit(0);
  }
  if (h == n) {
    return;
  }
  int const MAX_SIZE = 100;
  if (line.size() > 30 * ((n - h + 1) * (n - h + 1))) {
    for (size_t q = 0; q < MAX_SIZE; ++q) {
      pair<int, int> pos = GetPosRandom(size);
      ans[h].first = line[pos.first].second;
      ans[h].second = line[pos.second].second;
      vector<pair<Line, size_t>> new_line;
      new_line.reserve(size - 1);
      Line first = line[pos.first].first, second = line[pos.second].first;
      if (first.Parallel(second)) {
        continue;
      }
      Point point = first.Intersection(second);
      size_t counter = 0;
      for (size_t i = 0; i < line.size(); ++i) {
        if (!line[i].first.Belong(point)) {
          new_line.push_back(line[i]);
        } else {
          ++counter;
        }
      }
      if (counter >= n - h + 1 || q + 1 == MAX_SIZE) {
        Solve(h + 1, n, new_line, ans);
        return;
      }
    }
  } else {
    int k = min(n - h + 1, static_cast<int>(line.size()));
    for (size_t q = 0; q < ((k) * (k)); ++q) {
      pair<int, int> pos = GetPosCounter(q, k);
      if (pos.first == pos.second) {
        continue;
      }
      ans[h].first = line[pos.first].second;
      ans[h].second = line[pos.second].second;
      vector<pair<Line, size_t>> new_line;
      new_line.reserve(size - 1);
      Line first = line[pos.first].first, second = line[pos.second].first;
      if (first.Parallel(second)) {
        continue;
      }
      Point point = first.Intersection(second);
      for (size_t i = 0; i < line.size(); ++i) {
        if (!line[i].first.Belong(point)) {
          new_line.push_back(line[i]);
        }
      }
      Solve(h + 1, n, new_line, ans);
    }
  }
}
void Solve(int k, const vector<pair<Line, size_t>> &line) {
  size_t n = line.size();
  vector<pair<int, int>> ans(5);
  Solve(0, k, line, ans);
}
int main() {
  srand(4);
  ios_base::sync_with_stdio(false);
  size_t n, k;
  cin >> n >> k;
  vector<pair<Line, size_t>> line(n);
  for (size_t i = 0; i < n; ++i) {
    cin >> line[i].first;
    line[i].second = i + 1;
  }
  random_shuffle(line.begin(), line.end());
  Solve(k, line);
  cout << "NO\n";
  cerr << clock() / CLOCKS_PER_SEC << endl;
  return 0;
}