#include <bits/stdc++.h>
using namespace std;
template <class T>
void _R(T &x) {
  cin >> x;
}
void _R(int &x) { scanf("%d", &x); }
void _R(long long &x) {
  long long t;
  scanf("%lld", &t);
  x = t;
}
void _R(unsigned long long &x) { scanf("%llu", &x); }
void _R(double &x) { scanf("%lf", &x); }
void _R(char &x) { scanf(" %c", &x); }
void _R(char *x) { scanf("%s", x); }
void R() {}
template <class T, class... U>
void R(T &head, U &...tail) {
  _R(head);
  R(tail...);
}
template <class T>
void _W(const T &x) {
  cout << x;
}
void _W(const int &x) { printf("%d", x); }
void _W(const long long &x) {
  long long t = x;
  printf("%lld", t);
}
void _W(const double &x) { printf("%.16f", x); }
void _W(const char &x) { putchar(x); }
void _W(const char *x) { printf("%s", x); }
template <class T, class U>
void _W(const pair<T, U> &x) {
  _W(x.first);
  putchar(' ');
  _W(x.second);
}
template <class T>
void _W(const vector<T> &x) {
  for (auto i = x.begin(); i != x.end(); _W(*i++))
    if (i != x.cbegin()) putchar(' ');
}
void W() {}
template <class T, class... U>
void W(const T &head, const U &...tail) {
  _W(head);
  putchar(sizeof...(tail) ? ' ' : '\n');
  W(tail...);
}
const int MOD = 1e9 + 7, mod = 998244353;
long long qpow(long long a, long long b) {
  long long res = 1;
  a %= MOD;
  assert(b >= 0);
  for (; b; b >>= 1) {
    if (b & 1) res = res * a % MOD;
    a = a * a % MOD;
  }
  return res;
}
const int MAXN = 2e4 + 10, MAXM = 4e4 + 10;
const int INF = INT_MAX, SINF = 0x3f3f3f3f;
const long long llINF = LLONG_MAX, SLINF = 0x3f3f3f3f3f3f3f3f;
const int inv2 = (MOD + 1) / 2;
const int Lim = 1 << 20;
struct MCMF {
  const long long SLINF = 0x3f3f3f3f3f3f3f3f;
  struct Edge {
    int u, v;
    long long flow, cap, cost;
    int next;
  };
  int e_ptr = 1, S = 0, T = 1, head[MAXN + 10];
  Edge E[(MAXM + 10) << 1];
  long long MaxFlow = 0;
  long long dist[MAXN + 10], MinCost = 0, delta;
  int inq[MAXN + 10], done[MAXN + 10], n;
  bool vis[MAXN + 10];
  void add_edge(int u, int v, long long cap, long long cost) {
    E[++e_ptr] = {u, v, 0, cap, cost, head[u]};
    head[u] = e_ptr;
    E[++e_ptr] = {v, u, 0, 0, -cost, head[v]};
    head[v] = e_ptr;
  }
  void Reduce() {
    for (int i = 2; i <= e_ptr; i++) E[i].cost += dist[E[i].v] - dist[E[i].u];
    delta += dist[S];
  }
  bool BellmanFord() {
    queue<int> Q;
    memset(dist, -0x3f, (n + 5) * sizeof(long long));
    long long p = dist[T];
    dist[T] = 0;
    Q.push(T);
    inq[T] = true;
    while (!Q.empty()) {
      int u = Q.front();
      Q.pop();
      inq[u] = false;
      for (int j = head[u]; j; j = E[j].next) {
        int v = E[j].v;
        long long f = E[j ^ 1].flow, c = E[j ^ 1].cap;
        long long len = E[j ^ 1].cost;
        if (f < c && dist[v] < dist[u] + len) {
          dist[v] = dist[u] + len;
          if (!inq[v]) {
            inq[v] = true;
            Q.push(v);
          }
        }
      }
    }
    return dist[S] != p;
  }
  bool Dijkstra() {
    memset(dist, -0x3f, (n + 5) * sizeof(long long));
    memset(vis, 0, (n + 5));
    long long p = dist[S];
    priority_queue<pair<long long, long long> > pq;
    dist[T] = 0;
    pq.push({dist[T], T});
    while (!pq.empty()) {
      int u = pq.top().second;
      pq.pop();
      if (vis[u]) continue;
      vis[u] = 1;
      for (int j = head[u]; j; j = E[j].next) {
        int v = E[j].v;
        long long f = E[j ^ 1].flow, c = E[j ^ 1].cap;
        long long len = E[j ^ 1].cost;
        if (f < c && dist[v] < dist[u] + len) {
          dist[v] = dist[u] + len;
          pq.push({dist[v], v});
        }
      }
    }
    return dist[S] != p;
  }
  long long DFS(int u, long long flow) {
    if (u == T || flow == 0) return flow;
    vis[u] = true;
    long long res = flow;
    for (int j = head[u]; j; j = E[j].next) {
      int v = E[j].v;
      long long f = E[j].flow, c = E[j].cap, len = E[j].cost;
      if (!vis[v] && f < c && len == 0) {
        long long tmp = DFS(v, min(res, c - f));
        E[j].flow += tmp;
        E[j ^ 1].flow -= tmp;
        res -= tmp;
      }
    }
    return flow - res;
  }
  void Augment() {
    long long CurFlow = 0;
    while (memset(vis, 0, (n + 5)), (CurFlow = DFS(S, SLINF))) {
      MaxFlow += CurFlow;
      MinCost += CurFlow * delta;
    }
  }
  pair<long long, long long> solve() {
    if (!BellmanFord()) return {-1, -1};
    Reduce();
    Augment();
    while (Dijkstra()) {
      Reduce();
      Augment();
    }
    return {MinCost, MaxFlow};
  }
  void init(int s, int t, int N) {
    S = s;
    T = t;
    n = N;
    e_ptr = 1;
    MaxFlow = MinCost = delta = 0;
    for (int i = 0; i <= n; i++) inq[i] = done[i] = vis[i] = head[i] = 0;
  }
} G;
int popcnt(int x) { return __builtin_popcount(x); }
int popcnt(long long x) { return __builtin_popcountll(x); }
int ctz(int x) { return __builtin_ctz(x); }
int ctz(long long x) { return __builtin_ctzll(x); }
int clz(int x) { return 31 - __builtin_clz(x); }
int clz(long long x) { return 63 - __builtin_clzll(x); }
int n, k;
int a[2000005];
vector<pair<int, int> > vec;
int getval(pair<int, int> &x) { return a[x.first] + a[x.second]; }
bool cmp(pair<int, int> &x, pair<int, int> &y) { return getval(x) > getval(y); }
void calc(vector<pair<int, int> > &vec) {
  vector<int> etc;
  for (auto j : vec) {
    int u = j.first, v = j.second;
    etc.push_back(u);
    etc.push_back(v);
  }
  sort((etc).begin(), (etc).end()),
      etc.resize(unique((etc).begin(), (etc).end()) - etc.begin());
  int sz = ((int)etc.size());
  G.init(sz + 3, sz + 2, sz + 2);
  for (auto j : vec) {
    int u = j.first, v = j.second;
    if (popcnt(u) & 1) swap(u, v);
    G.add_edge((lower_bound((etc).begin(), (etc).end(), u) - etc.begin()) + 1,
               (lower_bound((etc).begin(), (etc).end(), v) - etc.begin()) + 1,
               1, 0);
  }
  for (auto j : etc) {
    if (popcnt(j) & 1)
      G.add_edge((lower_bound((etc).begin(), (etc).end(), j) - etc.begin()) + 1,
                 sz + 2, 1, a[j]);
    else
      G.add_edge(sz + 1,
                 (lower_bound((etc).begin(), (etc).end(), j) - etc.begin()) + 1,
                 1, a[j]);
  }
  G.add_edge(sz + 3, sz + 1, k, 0);
}
int cnt[2000005];
void solve() {
  R(n, k);
  for (int i = 0; i < (1 << n); i++) R(a[i]);
  for (int i = 0; i < (1 << n); i++) {
    for (int j = 0; j < n; j++)
      if (i & (1 << j)) {
        vec.push_back({i, i ^ (1 << j)});
      }
  }
  int cp = min(2 * n * k, ((int)vec.size()));
  nth_element(vec.begin(), vec.begin() + cp - 1, vec.end(), cmp);
  vec.resize(cp);
  calc(vec);
  W(G.solve().first);
}
int main() {
  int T = 1;
  for (int kase = 1; kase <= T; kase++) {
    solve();
  }
  return 0;
}

### Prompt

Please provide a CPP coded solution to the problem described below:

There are currently n hot topics numbered from 0 to n-1 at your local bridge club and 2^n players numbered from 0 to 2^n-1. Each player holds a different set of views on those n topics, more specifically, the i-th player holds a positive view on the j-th topic if i\ \&\ 2^j > 0, and a negative view otherwise. Here \& denotes the [bitwise AND operation](https://en.wikipedia.org/wiki/Bitwise_operation#AND).

You are going to organize a bridge tournament capable of accommodating at most k pairs of players (bridge is played in teams of two people). You can select teams arbitrarily while each player is in at most one team, but there is one catch: two players cannot be in the same pair if they disagree on 2 or more of those n topics, as they would argue too much during the play.

You know that the i-th player will pay you a_i dollars if they play in this tournament. Compute the maximum amount of money that you can earn if you pair the players in your club optimally.

Input

The first line contains two integers n, k (1 ≤ n ≤ 20, 1 ≤ k ≤ 200) — the number of hot topics and the number of pairs of players that your tournament can accommodate.

The second line contains 2^n integers a_0, a_1, ..., a_{2^n-1} (0 ≤ a_i ≤ 10^6) — the amounts of money that the players will pay to play in the tournament.

Output

Print one integer: the maximum amount of money that you can earn if you pair the players in your club optimally under the above conditions.

Examples

Input


3 1
8 3 5 7 1 10 3 2


Output


13


Input


2 3
7 4 5 7


Output


23


Input


3 2
1 9 1 5 7 8 1 1


Output


29

Note

In the first example, the best we can do is to pair together the 0-th player and the 2-nd player resulting in earnings of 8 + 5 = 13 dollars. Although pairing the 0-th player with the 5-th player would give us 8 + 10 = 18 dollars, we cannot do this because those two players disagree on 2 of the 3 hot topics.

In the second example, we can pair the 0-th player with the 1-st player and pair the 2-nd player with the 3-rd player resulting in earnings of 7 + 4 + 5 + 7 = 23 dollars.

### Response

```cpp
#include <bits/stdc++.h>
using namespace std;
template <class T>
void _R(T &x) {
  cin >> x;
}
void _R(int &x) { scanf("%d", &x); }
void _R(long long &x) {
  long long t;
  scanf("%lld", &t);
  x = t;
}
void _R(unsigned long long &x) { scanf("%llu", &x); }
void _R(double &x) { scanf("%lf", &x); }
void _R(char &x) { scanf(" %c", &x); }
void _R(char *x) { scanf("%s", x); }
void R() {}
template <class T, class... U>
void R(T &head, U &...tail) {
  _R(head);
  R(tail...);
}
template <class T>
void _W(const T &x) {
  cout << x;
}
void _W(const int &x) { printf("%d", x); }
void _W(const long long &x) {
  long long t = x;
  printf("%lld", t);
}
void _W(const double &x) { printf("%.16f", x); }
void _W(const char &x) { putchar(x); }
void _W(const char *x) { printf("%s", x); }
template <class T, class U>
void _W(const pair<T, U> &x) {
  _W(x.first);
  putchar(' ');
  _W(x.second);
}
template <class T>
void _W(const vector<T> &x) {
  for (auto i = x.begin(); i != x.end(); _W(*i++))
    if (i != x.cbegin()) putchar(' ');
}
void W() {}
template <class T, class... U>
void W(const T &head, const U &...tail) {
  _W(head);
  putchar(sizeof...(tail) ? ' ' : '\n');
  W(tail...);
}
const int MOD = 1e9 + 7, mod = 998244353;
long long qpow(long long a, long long b) {
  long long res = 1;
  a %= MOD;
  assert(b >= 0);
  for (; b; b >>= 1) {
    if (b & 1) res = res * a % MOD;
    a = a * a % MOD;
  }
  return res;
}
const int MAXN = 2e4 + 10, MAXM = 4e4 + 10;
const int INF = INT_MAX, SINF = 0x3f3f3f3f;
const long long llINF = LLONG_MAX, SLINF = 0x3f3f3f3f3f3f3f3f;
const int inv2 = (MOD + 1) / 2;
const int Lim = 1 << 20;
struct MCMF {
  const long long SLINF = 0x3f3f3f3f3f3f3f3f;
  struct Edge {
    int u, v;
    long long flow, cap, cost;
    int next;
  };
  int e_ptr = 1, S = 0, T = 1, head[MAXN + 10];
  Edge E[(MAXM + 10) << 1];
  long long MaxFlow = 0;
  long long dist[MAXN + 10], MinCost = 0, delta;
  int inq[MAXN + 10], done[MAXN + 10], n;
  bool vis[MAXN + 10];
  void add_edge(int u, int v, long long cap, long long cost) {
    E[++e_ptr] = {u, v, 0, cap, cost, head[u]};
    head[u] = e_ptr;
    E[++e_ptr] = {v, u, 0, 0, -cost, head[v]};
    head[v] = e_ptr;
  }
  void Reduce() {
    for (int i = 2; i <= e_ptr; i++) E[i].cost += dist[E[i].v] - dist[E[i].u];
    delta += dist[S];
  }
  bool BellmanFord() {
    queue<int> Q;
    memset(dist, -0x3f, (n + 5) * sizeof(long long));
    long long p = dist[T];
    dist[T] = 0;
    Q.push(T);
    inq[T] = true;
    while (!Q.empty()) {
      int u = Q.front();
      Q.pop();
      inq[u] = false;
      for (int j = head[u]; j; j = E[j].next) {
        int v = E[j].v;
        long long f = E[j ^ 1].flow, c = E[j ^ 1].cap;
        long long len = E[j ^ 1].cost;
        if (f < c && dist[v] < dist[u] + len) {
          dist[v] = dist[u] + len;
          if (!inq[v]) {
            inq[v] = true;
            Q.push(v);
          }
        }
      }
    }
    return dist[S] != p;
  }
  bool Dijkstra() {
    memset(dist, -0x3f, (n + 5) * sizeof(long long));
    memset(vis, 0, (n + 5));
    long long p = dist[S];
    priority_queue<pair<long long, long long> > pq;
    dist[T] = 0;
    pq.push({dist[T], T});
    while (!pq.empty()) {
      int u = pq.top().second;
      pq.pop();
      if (vis[u]) continue;
      vis[u] = 1;
      for (int j = head[u]; j; j = E[j].next) {
        int v = E[j].v;
        long long f = E[j ^ 1].flow, c = E[j ^ 1].cap;
        long long len = E[j ^ 1].cost;
        if (f < c && dist[v] < dist[u] + len) {
          dist[v] = dist[u] + len;
          pq.push({dist[v], v});
        }
      }
    }
    return dist[S] != p;
  }
  long long DFS(int u, long long flow) {
    if (u == T || flow == 0) return flow;
    vis[u] = true;
    long long res = flow;
    for (int j = head[u]; j; j = E[j].next) {
      int v = E[j].v;
      long long f = E[j].flow, c = E[j].cap, len = E[j].cost;
      if (!vis[v] && f < c && len == 0) {
        long long tmp = DFS(v, min(res, c - f));
        E[j].flow += tmp;
        E[j ^ 1].flow -= tmp;
        res -= tmp;
      }
    }
    return flow - res;
  }
  void Augment() {
    long long CurFlow = 0;
    while (memset(vis, 0, (n + 5)), (CurFlow = DFS(S, SLINF))) {
      MaxFlow += CurFlow;
      MinCost += CurFlow * delta;
    }
  }
  pair<long long, long long> solve() {
    if (!BellmanFord()) return {-1, -1};
    Reduce();
    Augment();
    while (Dijkstra()) {
      Reduce();
      Augment();
    }
    return {MinCost, MaxFlow};
  }
  void init(int s, int t, int N) {
    S = s;
    T = t;
    n = N;
    e_ptr = 1;
    MaxFlow = MinCost = delta = 0;
    for (int i = 0; i <= n; i++) inq[i] = done[i] = vis[i] = head[i] = 0;
  }
} G;
int popcnt(int x) { return __builtin_popcount(x); }
int popcnt(long long x) { return __builtin_popcountll(x); }
int ctz(int x) { return __builtin_ctz(x); }
int ctz(long long x) { return __builtin_ctzll(x); }
int clz(int x) { return 31 - __builtin_clz(x); }
int clz(long long x) { return 63 - __builtin_clzll(x); }
int n, k;
int a[2000005];
vector<pair<int, int> > vec;
int getval(pair<int, int> &x) { return a[x.first] + a[x.second]; }
bool cmp(pair<int, int> &x, pair<int, int> &y) { return getval(x) > getval(y); }
void calc(vector<pair<int, int> > &vec) {
  vector<int> etc;
  for (auto j : vec) {
    int u = j.first, v = j.second;
    etc.push_back(u);
    etc.push_back(v);
  }
  sort((etc).begin(), (etc).end()),
      etc.resize(unique((etc).begin(), (etc).end()) - etc.begin());
  int sz = ((int)etc.size());
  G.init(sz + 3, sz + 2, sz + 2);
  for (auto j : vec) {
    int u = j.first, v = j.second;
    if (popcnt(u) & 1) swap(u, v);
    G.add_edge((lower_bound((etc).begin(), (etc).end(), u) - etc.begin()) + 1,
               (lower_bound((etc).begin(), (etc).end(), v) - etc.begin()) + 1,
               1, 0);
  }
  for (auto j : etc) {
    if (popcnt(j) & 1)
      G.add_edge((lower_bound((etc).begin(), (etc).end(), j) - etc.begin()) + 1,
                 sz + 2, 1, a[j]);
    else
      G.add_edge(sz + 1,
                 (lower_bound((etc).begin(), (etc).end(), j) - etc.begin()) + 1,
                 1, a[j]);
  }
  G.add_edge(sz + 3, sz + 1, k, 0);
}
int cnt[2000005];
void solve() {
  R(n, k);
  for (int i = 0; i < (1 << n); i++) R(a[i]);
  for (int i = 0; i < (1 << n); i++) {
    for (int j = 0; j < n; j++)
      if (i & (1 << j)) {
        vec.push_back({i, i ^ (1 << j)});
      }
  }
  int cp = min(2 * n * k, ((int)vec.size()));
  nth_element(vec.begin(), vec.begin() + cp - 1, vec.end(), cmp);
  vec.resize(cp);
  calc(vec);
  W(G.solve().first);
}
int main() {
  int T = 1;
  for (int kase = 1; kase <= T; kase++) {
    solve();
  }
  return 0;
}

```