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>
#pragma GCC optimize("Ofast")
#pragma GCC optimize("unroll-loops")
using namespace std;
template <class T>
inline bool setmin(T &a, T b) {
  if (a > b) return a = b, 1;
  return 0;
}
template <class T>
inline bool setmax(T &a, T b) {
  if (a < b) return a = b, 1;
  return 0;
}
template <class T>
inline T fast(T a, T b, T mod) {
  long long res = 1;
  while (b) {
    if (b & 1) res = (res * a) % mod;
    a = (a * a) % mod;
    b >>= 1;
  }
  return res;
}
template <class T>
inline T russian(T a, T b, T mod) {
  long long res = 0;
  while (b) {
    if (b & 1) res = (res + a) % mod;
    a = (a + a) % mod;
    b >>= 1;
  }
  return res;
}
template <class T>
istream &operator>>(istream &os, vector<T> &container) {
  for (auto &u : container) os >> u;
  return os;
}
template <class T>
ostream &operator<<(ostream &os, const vector<T> &container) {
  for (auto &u : container) os << u << " ";
  return os;
}
template <typename T>
inline T gcd(T a, T b) {
  while (b) swap(a %= b, b);
  return a;
}
const long long T = 1 << 20;
const long long INF = 1e9 + 7;
const long long mod = 998244353;
const long long BIG_INF = 1e18 + 7;
const long long N = 1e6 + 7;
const int LOG = 17;
int n, m, k, q;
vector<vector<int> > G2;
int dp[13][1 << 12];
int pre[13][1 << 12];
bool cmp(int a, int b) { return G2[a] > G2[b]; }
int main() {
  ios_base::sync_with_stdio(0);
  cin.tie(0);
  cout.tie(0);
  ;
  int t;
  cin >> t;
  while (t--) {
    memset(dp, 0, sizeof dp);
    memset(pre, 0, sizeof pre);
    cin >> n >> m;
    vector<vector<int> > G(m);
    for (int i = 0; i < n; i++)
      for (int j = 0; j < m; j++) {
        int temp;
        cin >> temp;
        G[j].push_back(temp);
      }
    G2 = G;
    vector<int> id;
    for (int i = 0; i < m; i++) id.push_back(i);
    for (auto &u : G2) sort((u).rbegin(), (u).rend());
    sort((id).begin(), (id).end(), cmp);
    for (int i = 1; i <= min(n, m); i++) {
      for (int j = 0; j < (1 << n); j++) {
        for (int I = 0; I < n; I++) {
          int teraz = 0;
          for (int J = 0; J < n; J++)
            if (j & (1 << J)) teraz += G[id[i - 1]][(J + I) % n];
          setmax(pre[i][j], teraz);
        }
      }
      for (int j = 0; j < (1 << n); j++)
        for (int I = j; I >= 0; I = (I - 1) & j) {
          int nowe = (j ^ I);
          setmax(dp[i][j], dp[i - 1][I] + pre[i][nowe]);
          if (I == 0) break;
        }
    }
    cout << dp[min(n, m)][(1 << n) - 1] << '\n';
  }
}