Problem: This is a harder version of the problem. The difference is only in constraints.

You are given a rectangular n × m matrix a. In one move you can choose any column and cyclically shift elements in this column. You can perform this operation as many times as you want (possibly zero). You can perform this operation to a column multiple times.

After you are done with cyclical shifts, you compute for every row the maximal value in it. Suppose that for i-th row it is equal r_i. What is the maximal possible value of r_1+r_2+…+r_n?

Input

The first line contains an integer t (1 ≤ t ≤ 40), the number of test cases in the input.

The first line of each test case contains integers n and m (1 ≤ n ≤ 12, 1 ≤ m ≤ 2000) — the number of rows and the number of columns in the given matrix a. 

Each of the following n lines contains m integers, the elements of a (1 ≤ a_{i, j} ≤ 10^5).

Output

Print t integers: answers for all test cases in the order they are given in the input.

Example

Input


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


Output


12
29
27

Note

In the first test case you can shift the third column down by one, this way there will be r_1 = 5 and r_2 = 7.

In the second case you can don't rotate anything at all, this way there will be r_1 = r_2 = 10 and r_3 = 9.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
struct node {
  int p, v;
  node(int p = 0, int v = 0) : p(p), v(v) {}
  bool operator<(const node b) const { return v > b.v; }
} b[2005];
int t, n, m;
int a[13][2005], f[13][1 << 13], val[1 << 13], c[13][13];
int read() {
  char c = getchar();
  int x = 0;
  while (!isdigit(c)) c = getchar();
  while (isdigit(c)) {
    x = (x << 3) + (x << 1) + c - '0';
    c = getchar();
  }
  return x;
}
int pos(int v) {
  if (v > n) return v - n;
  return v;
}
int solve() {
  int limit = (1 << n) - 1;
  for (int i = 1; i <= m; ++i) {
    memset(val, 0, sizeof(val));
    memcpy(f[i], f[i - 1], sizeof(f[i]));
    for (int s = 1; s <= limit; ++s)
      for (int j = 0; j < n; ++j) {
        int sum = 0;
        for (int k = 1; k <= n; ++k)
          if (s >> (k - 1) & 1) sum += c[i][pos(k + j)];
        val[s] = max(val[s], sum);
        f[i][s] = max(f[i][s], val[s]);
      }
    for (int s = 1; s <= limit; ++s)
      for (int t = (s - 1) & s; t; t = (t - 1) & s)
        f[i][s] = max(f[i][s], f[i - 1][t] + val[s ^ t]);
  }
  return f[m][limit];
}
void init() {
  memset(f, 0, sizeof(f));
  if (n > m) {
    for (int i = 1; i <= m; ++i)
      for (int j = 1; j <= n; ++j) c[i][j] = a[j][i];
    return;
  }
  for (int i = 1; i <= m; ++i) {
    int maxi = 0;
    for (int j = 1; j <= n; ++j) maxi = max(maxi, a[j][i]);
    b[i] = node(i, maxi);
  }
  sort(b + 1, b + m + 1);
  for (int i = 1; i <= n; ++i)
    for (int j = 1; j <= n; ++j) c[i][j] = a[j][b[i].p];
  m = n;
}
int main() {
  t = read();
  while (t--) {
    n = read();
    m = read();
    for (int i = 1; i <= n; ++i)
      for (int j = 1; j <= m; ++j) a[i][j] = read();
    init();
    int ans = solve();
    printf("%d\n", ans);
  }
}