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>
using namespace std;
namespace Fread {
const int MAXN = 1 << 20;
char buf[MAXN], *S, *T;
inline char getchar() {
  if (S == T) {
    T = (S = buf) + fread(buf, 1, MAXN, stdin);
    if (S == T) return EOF;
  }
  return *S++;
}
}  // namespace Fread
namespace Fwrite {
const int MAXN = 1 << 20;
char buf[MAXN], *S = buf, *T = buf + MAXN;
inline void flush() {
  fwrite(buf, 1, S - buf, stdout);
  S = buf;
}
inline void putchar(char c) {
  *S++ = c;
  if (S == T) flush();
}
struct _ {
  ~_() { flush(); }
} __;
}  // namespace Fwrite
template <typename T>
inline void read(T& x) {
  x = 0;
  int f = 1;
  char ch = Fread::getchar();
  while (!isdigit(ch)) {
    if (ch == '-') f = -1;
    ch = Fread::getchar();
  }
  while (isdigit(ch))
    x = (x << 3) + (x << 1) + (ch ^ '0'), ch = Fread::getchar();
  x *= f;
}
template <typename T>
inline void write(T x, bool _enter = 0, bool _space = 0) {
  if (!x)
    Fwrite::putchar('0');
  else {
    if (x < 0) Fwrite::putchar('-'), x = -x;
    static char dig[41];
    int top = 0;
    while (x) dig[++top] = (x % 10) ^ '0', x /= 10;
    while (top) Fwrite::putchar(dig[top--]);
  }
  if (_enter) Fwrite::putchar('\n');
  if (_space) Fwrite::putchar(' ');
}
namespace Fastio {
struct reader {
  template <typename T>
  reader& operator>>(T& x) {
    ::read(x);
    return *this;
  }
  reader& operator>>(char& c) {
    c = Fread::getchar();
    return *this;
  }
  reader& operator>>(char* str) {
    int len = 0;
    char ch = Fread::getchar();
    while (ch != '\n' && ch != ' ') str[len++] = ch, ch = Fread::getchar();
    str[len] = '\0';
    return *this;
  }
  reader& operator>>(std::string& s) {
    std::cin >> s;
    return *this;
  }
} cin;
const char endl = '\n';
struct writer {
  template <typename T>
  writer& operator<<(T x) {
    ::write(x, 0, 0);
    return *this;
  }
  writer& operator<<(char c) {
    Fwrite::putchar(c);
    return *this;
  }
  writer& operator<<(const char* str) {
    int cur = 0;
    while (str[cur]) Fwrite::putchar(str[cur++]);
    return *this;
  }
} cout;
}  // namespace Fastio
const int MAXN = 1 << 20;
int h, g, a[MAXN * 2 + 5], dep[MAXN * 2 + 5], ans[MAXN * 2 + 5], cnt_ans;
void clr() {
  for (int i = 1; i < (1 << h); ++i) a[i] = 0;
  cnt_ans = 0;
}
bool del(int x) {
  if (!a[x << 1] && !a[x << 1 | 1]) {
    if (dep[x] <= g)
      return 0;
    else {
      a[x] = 0;
      return 1;
    }
  }
  if (a[x << 1] > a[x << 1 | 1]) {
    int val = a[x << 1];
    bool res = del(x << 1);
    if (res) a[x] = val;
    return res;
  } else {
    int val = a[x << 1 | 1];
    bool res = del(x << 1 | 1);
    if (res) a[x] = val;
    return res;
  }
}
void dfs(int x) {
  if (!a[x]) return;
  while (del(x)) ans[++cnt_ans] = x;
  dfs(x << 1);
  dfs(x << 1 | 1);
}
int main() {
  for (int i = 1; i < MAXN; ++i) dep[i] = dep[i >> 1] + 1;
  int T;
  Fastio::cin >> T;
  while (T--) {
    Fastio::cin >> h >> g;
    for (int i = 1; i < (1 << h); ++i) Fastio::cin >> a[i];
    dfs(1);
    assert(cnt_ans == (1 << h) - (1 << g));
    long long sum = 0;
    for (int i = 1; i < (1 << g); ++i) sum += a[i];
    Fastio::cout << sum << Fastio::endl;
    for (int i = 1; i <= cnt_ans; ++i)
      Fastio::cout << ans[i] << (" \n"[i == cnt_ans]);
    clr();
  }
  return 0;
}