Problem: Ujan has a lot of numbers in his boxes. He likes order and balance, so he decided to reorder the numbers.

There are k boxes numbered from 1 to k. The i-th box contains n_i integer numbers. The integers can be negative. All of the integers are distinct.

Ujan is lazy, so he will do the following reordering of the numbers exactly once. He will pick a single integer from each of the boxes, k integers in total. Then he will insert the chosen numbers — one integer in each of the boxes, so that the number of integers in each box is the same as in the beginning. Note that he may also insert an integer he picked from a box back into the same box.

Ujan will be happy if the sum of the integers in each box is the same. Can he achieve this and make the boxes perfectly balanced, like all things should be?

Input

The first line contains a single integer k (1 ≤ k ≤ 15), the number of boxes. 

The i-th of the next k lines first contains a single integer n_i (1 ≤ n_i ≤ 5 000), the number of integers in box i. Then the same line contains n_i integers a_{i,1}, …, a_{i,n_i} (|a_{i,j}| ≤ 10^9), the integers in the i-th box. 

It is guaranteed that all a_{i,j} are distinct.

Output

If Ujan cannot achieve his goal, output "No" in a single line. Otherwise in the first line output "Yes", and then output k lines. The i-th of these lines should contain two integers c_i and p_i. This means that Ujan should pick the integer c_i from the i-th box and place it in the p_i-th box afterwards.

If there are multiple solutions, output any of those.

You can print each letter in any case (upper or lower).

Examples

Input


4
3 1 7 4
2 3 2
2 8 5
1 10


Output


Yes
7 2
2 3
5 1
10 4


Input


2
2 3 -2
2 -1 5


Output


No


Input


2
2 -10 10
2 0 -20


Output


Yes
-10 2
-20 1

Note

In the first sample, Ujan can put the number 7 in the 2nd box, the number 2 in the 3rd box, the number 5 in the 1st box and keep the number 10 in the same 4th box. Then the boxes will contain numbers \{1,5,4\}, \{3, 7\}, \{8,2\} and \{10\}. The sum in each box then is equal to 10.

In the second sample, it is not possible to pick and redistribute the numbers in the required way.

In the third sample, one can swap the numbers -20 and -10, making the sum in each box equal to -10.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
using LL = long long;
using PII = pair<int, int>;
void NO() {
  cout << "No\n";
  exit(0);
}
int vals[15][5000], sz[15], cycle[15][5000];
LL sum[15];
bool poss[1 << 15];
PII par[1 << 15];
int main() {
  ios_base::sync_with_stdio(false);
  cin.tie(NULL);
  memset(par, -1, sizeof par);
  int k;
  cin >> k;
  map<LL, PII> loc;
  LL total = 0;
  for (int i = 0; i < k; i++) {
    cin >> sz[i];
    for (int j = 0; j < sz[i]; j++) {
      cin >> vals[i][j];
      sum[i] += vals[i][j];
      loc[vals[i][j]] = {i, j};
    }
    total += sum[i];
  }
  if (total % k != 0) NO();
  LL average = total / k;
  for (int i = 0; i < k; i++) {
    for (int j = 0; j < sz[i]; j++) {
      if (sum[i] == average) {
        cycle[i][j] = 1 << i;
        continue;
      }
      LL curr = average - (sum[i] - vals[i][j]);
      int idx = i, mask = 0;
      while ((mask & (1 << idx)) == 0) {
        if (loc.count(curr) == 0) {
          mask = 0;
          break;
        }
        mask |= (1 << idx);
        auto [ii, jj] = loc[curr];
        idx = ii;
        curr = average - (sum[idx] - vals[idx][jj]);
      }
      if (mask & (1 << i)) {
        if (mask ^ (1 << i)) {
          if (idx == i && curr == average - (sum[i] - vals[i][j])) {
            cycle[i][j] = mask;
          }
        }
      }
    }
  }
  poss[0] = true;
  for (int mask = 1; mask < (1 << k); mask++) {
    int i;
    for (i = 0; i < k; i++) {
      if (mask & (1 << i)) break;
    }
    for (int j = 0; j < sz[i]; j++) {
      if (cycle[i][j] != 0 && (mask & cycle[i][j]) == cycle[i][j] &&
          poss[mask ^ cycle[i][j]]) {
        poss[mask] = true;
        par[mask] = {i, j};
        break;
      }
    }
  }
  if (!poss[(1 << k) - 1]) NO();
  vector<PII> ans(k);
  for (int mask = (1 << k) - 1; mask != 0;) {
    auto [i, j] = par[mask];
    int idx = i;
    LL curr = average - (sum[i] - vals[i][j]);
    do {
      ans[loc[curr].first] = {curr, idx};
      idx = loc[curr].first;
      int j = loc[curr].second;
      curr = average - (sum[idx] - vals[idx][j]);
    } while (idx != i);
    mask ^= cycle[i][j];
  }
  cout << "Yes\n";
  for (auto [x, i] : ans) {
    cout << x << ' ' << (i + 1) << endl;
  }
  return 0;
}