Problem: Drazil likes heap very much. So he created a problem with heap:

There is a max heap with a height h implemented on the array. The details of this heap are the following:

This heap contains exactly 2^h - 1 distinct positive non-zero integers. All integers are distinct. These numbers are stored in the array a indexed from 1 to 2^h-1. For any 1 < i < 2^h, a[i] < a[\left ⌊{i/2}\right ⌋].

Now we want to reduce the height of this heap such that the height becomes g with exactly 2^g-1 numbers in heap. To reduce the height, we should perform the following action 2^h-2^g times:

Choose an index i, which contains an element and call the following function f in index i:

<image>

Note that we suppose that if a[i]=0, then index i don't contain an element.

After all operations, the remaining 2^g-1 element must be located in indices from 1 to 2^g-1. Now Drazil wonders what's the minimum possible sum of the remaining 2^g-1 elements. Please find this sum and find a sequence of the function calls to achieve this value.

Input

The first line of the input contains an integer t (1 ≤ t ≤ 70 000): the number of test cases.

Each test case contain two lines. The first line contains two integers h and g (1 ≤ g < h ≤ 20). The second line contains n = 2^h-1 distinct positive integers a[1], a[2], …, a[n] (1 ≤ a[i] < 2^{20}). For all i from 2 to 2^h - 1, a[i] < a[\left ⌊{i/2}\right ⌋].

The total sum of n is less than 2^{20}.

Output

For each test case, print two lines.

The first line should contain one integer denoting the minimum sum after reducing the height of heap to g. The second line should contain 2^h - 2^g integers v_1, v_2, …, v_{2^h-2^g}. In i-th operation f(v_i) should be called.

Example

Input


2
3 2
7 6 3 5 4 2 1
3 2
7 6 5 4 3 2 1


Output


10
3 2 3 1
8
2 1 3 1

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
inline int popcount(int x) {
  int t = 0;
  while (x) {
    x >>= 1;
    t++;
  }
  return t;
}
struct node {
  node *left, *right;
  int v, dist;
  node(int v = 0) : v(v), left(0), right(0), dist(1) {}
};
node* merge(node* x, node* y) {
  if (x == 0) return y;
  if (y == 0) return x;
  if (x->v > y->v) std::swap(x, y);
  x->right = merge(x->right, y);
  if ((x->right ? x->right->dist : 0) > (x->left ? x->left->dist : 0))
    std::swap(x->left, x->right);
  x->dist = (x->right ? x->right->dist : 0) + 1;
  return x;
}
void destroy(node* x) {
  if (x->left) destroy(x->left);
  if (x->right) destroy(x->right);
  delete x;
}
int n, m;
int a[2100000], b[2100000], trace[2100000], opt[2100000];
node* root[2100000];
bool exist[2100000];
inline void demo() {
  for (int i = 1; i <= 50; i++) a[i] = i;
  for (int i = 1; i <= 50; i++) {
    int j = rand() % 50 + 1;
    std::swap(a[i], a[j]);
  }
  node* root = 0;
  for (int i = 1; i <= 50; i++) {
    node* x = new node(a[i]);
    root = merge(x, root);
  }
  for (int i = 1; i <= 50; i++) {
    printf("value[%d] = %d\n", i, root->v);
    root = merge(root->left, root->right);
  }
}
void erase(int x) {
  trace[a[x]] = 0;
  a[x] = 0;
  if (popcount(x) == n) return;
  if (a[x << 1] == 0 && a[(x << 1) ^ 1] == 0) return;
  if (a[x << 1] > a[(x << 1) ^ 1]) {
    std::swap(a[x], a[x << 1]);
    if (a[x]) {
      trace[a[x]] = x;
      erase(x << 1);
    }
  } else {
    std::swap(a[x], a[(x << 1) ^ 1]);
    if (a[x]) {
      trace[a[x]] = x;
      erase((x << 1) ^ 1);
    }
  }
}
inline void solve() {
  scanf("%d%d", &n, &m);
  for (int i = 1; i < (1 << n); i++) scanf("%d", &a[i]);
  for (int i = (1 << n) - 1; i >= 1; i--) {
    root[i] = new node(a[i]);
    if (popcount(i) != n) {
      root[i] = merge(root[i], root[i << 1]);
      root[i] = merge(root[i], root[(i << 1) ^ 1]);
    }
    if (popcount(i) == m) {
      node* x = root[i];
      opt[i] = x->v;
      root[i] = merge(x->left, x->right);
      delete x;
    } else if (popcount(i) < m) {
      do {
        node* x = root[i];
        opt[i] = x->v;
        root[i] = merge(x->left, x->right);
        delete x;
      } while (!(opt[i] > opt[i << 1] && opt[i] > opt[(i << 1) ^ 1]));
    }
  }
  for (int i = 1; i < (1 << n); i++) {
    b[i] = a[i];
    trace[a[i]] = i;
  }
  long long sum = 0;
  for (int i = 1; i < (1 << m); i++) {
    exist[opt[i]] = true;
    sum += opt[i];
  }
  printf("%lld\n", sum);
  for (int i = (1 << n) - 1; i >= 1; i--)
    if (!exist[b[i]]) {
      printf("%d ", trace[b[i]]);
      erase(trace[b[i]]);
    }
  putchar('\n');
  destroy(root[1]);
  for (int i = 1; i < (1 << m); i++) exist[opt[i]] = false;
  for (int i = 1; i < (1 << n); i++) trace[a[i]] = 0;
}
int main() {
  srand(time(0));
  int T;
  scanf("%d", &T);
  while (T--) solve();
  return 0;
}