Problem: This is the hard version of the problem. You can find the easy version in the Div. 2 contest. Both versions only differ in the number of times you can ask your friend to taste coffee.

This is an interactive problem.

You're considering moving to another city, where one of your friends already lives. There are n cafés in this city, where n is a power of two. The i-th café produces a single variety of coffee a_i. 

As you're a coffee-lover, before deciding to move or not, you want to know the number d of distinct varieties of coffees produced in this city.

You don't know the values a_1, …, a_n. Fortunately, your friend has a memory of size k, where k is a power of two.

Once per day, you can ask him to taste a cup of coffee produced by the café c, and he will tell you if he tasted a similar coffee during the last k days.

You can also ask him to take a medication that will reset his memory. He will forget all previous cups of coffee tasted. You can reset his memory at most 30\ 000 times.

More formally, the memory of your friend is a queue S. Doing a query on café c will: 

  * Tell you if a_c is in S; 
  * Add a_c at the back of S; 
  * If |S| > k, pop the front element of S. 



Doing a reset request will pop all elements out of S.

Your friend can taste at most (3n^2)/(2k) cups of coffee in total. Find the diversity d (number of distinct values in the array a).

Note that asking your friend to reset his memory does not count towards the number of times you ask your friend to taste a cup of coffee.

In some test cases the behavior of the interactor is adaptive. It means that the array a may be not fixed before the start of the interaction and may depend on your queries. It is guaranteed that at any moment of the interaction, there is at least one array a consistent with all the answers given so far.

Input

The first line contains two integers n and k (1 ≤ k ≤ n ≤ 1024, k and n are powers of two).

It is guaranteed that (3n^2)/(2k) ≤ 15\ 000.

Interaction

You begin the interaction by reading n and k.

  * To ask your friend to taste a cup of coffee produced by the café c, in a separate line output

? c

Where c must satisfy 1 ≤ c ≤ n. Don't forget to flush, to get the answer.

In response, you will receive a single letter Y (yes) or N (no), telling you if variety a_c is one of the last k varieties of coffee in his memory.

  * To reset the memory of your friend, in a separate line output the single letter R in upper case. You can do this operation at most 30\ 000 times.
  * When you determine the number d of different coffee varieties, output

! d




In case your query is invalid, you asked more than (3n^2)/(2k) queries of type ? or you asked more than 30\ 000 queries of type R, the program will print the letter E and will finish interaction. You will receive a Wrong Answer verdict. Make sure to exit immediately to avoid getting other verdicts.

After printing a query do not forget to output end of line and flush the output. Otherwise, you will get Idleness limit exceeded. To do this, use:

  * fflush(stdout) or cout.flush() in C++; 
  * System.out.flush() in Java; 
  * flush(output) in Pascal; 
  * stdout.flush() in Python; 
  * see documentation for other languages. 



Hack format

The first line should contain the word fixed

The second line should contain two integers n and k, separated by space (1 ≤ k ≤ n ≤ 1024, k and n are powers of two).

It must hold that (3n^2)/(2k) ≤ 15\ 000.

The third line should contain n integers a_1, a_2, …, a_n, separated by spaces (1 ≤ a_i ≤ n).

Examples

Input


4 2
N
N
Y
N
N
N
N


Output


? 1
? 2
? 3
? 4
R
? 4
? 1
? 2
! 3


Input


8 8
N
N
N
N
Y
Y


Output


? 2
? 6
? 4
? 5
? 2
? 5
! 6

Note

In the first example, the array is a = [1, 4, 1, 3]. The city produces 3 different varieties of coffee (1, 3 and 4).

The successive varieties of coffee tasted by your friend are 1, 4, 1, 3, 3, 1, 4 (bold answers correspond to Y answers). Note that between the two ? 4 asks, there is a reset memory request R, so the answer to the second ? 4 ask is N. Had there been no reset memory request, the answer to the second ? 4 ask is Y.

In the second example, the array is a = [1, 2, 3, 4, 5, 6, 6, 6]. The city produces 6 different varieties of coffee.

The successive varieties of coffee tasted by your friend are 2, 6, 4, 5, 2, 5.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
using ll = long long int;
template <typename T>
ostream &operator+(ostream &out, const vector<T> &vec) {
  for (const auto &x : vec) {
    out << x << " ";
  }
  out << "\n";
  return out;
}
template <typename T>
ostream &operator*(ostream &out, const vector<T> &vec) {
  for (const auto &x : vec) {
    out + x;
  }
  return out;
}
template <typename T>
istream &operator>>(istream &in, vector<T> &vec) {
  for (auto &x : vec) {
    in >> x;
  }
  return in;
}
vector<vector<int>> euler;
void precompute() {
  euler.resize(11);
  euler[0] = {0, 1};
  euler[1] = {0, 2, 1, 3, 0};
  vector<int> p2(12);
  p2[0] = 1;
  for (int i = 1; i < 12; i++) {
    p2[i] = p2[i - 1] * 2;
  }
  for (int i = 2; i <= 10; i++) {
    int s = euler[i - 1].size();
    auto add = [&](int o1, int o2) {
      for (int j = 0; j < s; j++) {
        euler[i].push_back(euler[i - 1][j] + (j % 2 ? o2 : o1));
      }
    };
    add(0, p2[i - 1]);
    euler[i].pop_back();
    for (int j = 0; j < s; j++) {
      if (j % 2 == 0) {
        euler[i].push_back(euler[i - 1][j]);
      } else {
        euler[i].push_back(euler[i - 1][j] + p2[i]);
      }
    }
    euler[i].pop_back();
    for (int j = 0; j < s; j++) {
      if (j % 2 == 0) {
        euler[i].push_back(p2[i] - 1 - euler[i - 1][j]);
      } else {
        euler[i].push_back(euler[i - 1][j] + p2[i - 1]);
      }
    }
    for (int j = 2; j < s; j++) {
      if (j % 2 == 0) {
        euler[i].push_back(p2[i + 1] - 1 - euler[i - 1][j]);
      } else {
        euler[i].push_back(p2[i] - 1 - (euler[i - 1][j] - p2[i - 1]));
      }
    }
    euler[i].push_back(0);
  }
}
struct Judge {
  vector<int> seq;
  queue<int> mem;
  vector<int> cnt;
  int n, k;
  Judge(int k, vector<int> seq)
      : n(seq.size()), seq(seq), k(k), cnt(seq.size() + 1) {}
  char query(int x) {
    bool ans = (cnt[seq[x]] != 0);
    ++cnt[seq[x]];
    mem.push(seq[x]);
    if (mem.size() > k) {
      cnt[mem.front()]--;
      mem.pop();
    }
    return (ans ? 'Y' : 'N');
  }
  void remove() {
    cnt.assign(n + 1, 0);
    mem = queue<int>();
  }
};
void solve() {
  int n, k;
  cin >> n >> k;
  int q = 0;
  vector<bool> distinct(n, 1);
  auto query = [&](int c) {
    char x;
    cout << "? " << c + 1 << endl;
    cin >> x;
    ++q;
    return (x == 'Y');
  };
  auto clear = [&] { cout << "R" << endl; };
  function<void(int, int)> divide = [&](int l, int r) {
    if (r - l == k) {
      if (k == 1) return;
      for (int i = l; i < r; i++) {
        if (query(i)) {
          distinct[i] = 0;
        }
      }
      clear();
      return;
    }
    int mid = (l + r) / 2;
    divide(l, mid);
    divide(mid, r);
    int range = (r - l) / k;
    auto makequeries = [&](int p) {
      int cnt = 0;
      int didx = -1;
      for (int i = 0; i < (k + 1) / 2; i++) {
        int idx = p * ((k + 1) / 2) + l + i;
        if (!distinct[idx]) {
          if (k != 1) ++cnt;
          continue;
        } else {
          didx = idx;
        }
        if (query(idx)) {
          distinct[idx] = 0;
        }
      }
      if (didx == -1) {
        clear();
      } else {
        while (cnt) {
          query(didx);
          --cnt;
        }
      }
    };
    int p2 = 30 - __builtin_clz(range * 2);
    if (k == 1) --p2;
    vector<int> &ord = euler[p2];
    for (const auto &x : ord) {
      makequeries(x);
    }
    clear();
  };
  divide(0, n);
  cout << "! " << count(distinct.begin(), distinct.end(), 1) << "\n";
}
int main() {
  ios_base::sync_with_stdio(false);
  cin.tie(NULL);
  precompute();
  solve();
}