Problem: Bob has a simple undirected connected graph (without self-loops and multiple edges). He wants to learn whether his graph is bipartite (that is, you can paint all vertices of the graph into two colors so that there is no edge connecting two vertices of the same color) or not. As he is not very good at programming, he asked Alice for help. He does not want to disclose his graph to Alice, but he agreed that Alice can ask him some questions about the graph.

The only question that Alice can ask is the following: she sends s — a subset of vertices of the original graph. Bob answers with the number of edges that have both endpoints in s. Since he doesn't want Alice to learn too much about the graph, he allows her to ask no more than 20000 questions. Furthermore, he suspects that Alice might introduce false messages to their communication channel, so when Alice finally tells him whether the graph is bipartite or not, she also needs to provide a proof — either the partitions themselves or a cycle of odd length.

Your task is to help Alice to construct the queries, find whether the graph is bipartite. 

Input

The first line contains a single integer n (1 ≤ n ≤ 600) — the number of vertices in Bob's graph.

Interaction

First, read an integer n (1≤ n≤ 600) — the number of vertices in Bob's graph.

To make a query, print two lines. First of which should be in the format "? k" (1 ≤ k ≤ n), where k is the size of the set to be queried. The second line should contain k space separated distinct integers s_1, s_2, ..., s_k (1 ≤ s_i ≤ n) — the vertices of the queried set.

After each query read a single integer m (0 ≤ m ≤ (n(n-1))/(2)) — the number of edges between the vertices of the set \\{s_i\}.

You are not allowed to ask more than 20000 queries.

If m = -1, it means that you asked more queries than allowed, or asked an invalid query. Your program should immediately terminate (for example, by calling exit(0)). You will receive Wrong Answer; it means that you asked more queries than allowed, or asked an invalid query. If you ignore this, you can get other verdicts since your program will continue to read from a closed stream.

After printing a query do not forget to print 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.



When you know the answer, you need to print it.

The format of the answer depends on whether the graph is bipartite or not.

If the graph is bipartite, print two lines. The first should contain the letter "Y" (short for "YES") followed by a space, and then a single integer s (0 ≤ s ≤ n) — the number of vertices in one of the partitions. Second line should contain s integers a_1, a_2, ..., a_s — vertices belonging to the first partition. All a_i must be distinct, and all edges in the main graph must have exactly one endpoint in the set \\{a_i\}.

If the graph is not bipartite, print two lines. The first should contain the letter "N" (short for "NO") followed by a space, and then a single integer l (3 ≤ l ≤ n) — the length of one simple cycle of odd length. Second line should contain l integers c_1, c_2, ..., c_l — the vertices along the cycle. It must hold that for all 1 ≤ i ≤ l, there is an edge \\{c_i, c_{(i mod l)+1}\} in the main graph, and all c_i are distinct.

If there are multiple possible answers, you may print any of them.

Hacks format For hacks, use the following format:

The first line contains two integers n and m~(1 ≤ n ≤ 600, 0 ≤ m ≤ (n(n-1))/(2)) — the number of vertices and edges of the graph, respectively.

Each of the next m lines contains two integers u_i and v_i~(1 ≤ u_i, v_i ≤ n) mean that there is an edge between u_i and v_i. There must not be any multiple edges, no loops, and the graph must be connected.

For example, you need to use this test to get the first sample:
    
    
      
    4 4  
    4 1  
    1 3  
    3 2  
    2 4  
    

Examples

Input

4
4
0
1
1
1
0

Output

? 4 
1 2 3 4
? 2
1 2
? 2
1 3
? 2
1 4
? 2
2 4
? 2
3 4
Y 2
1 2

Input

4
4
3

Output

? 4
1 4 2 3
? 3
1 2 4
N 3
2 1 4

Note

In the first case, Alice learns that there are 4 edges in the whole graph. Over the course of the next three queries, she learns that vertex 1 has two neighbors: 3 and 4. She then learns that while vertex 2 is adjacent to 4, the vertex 3 isn't adjacent to 4. There is only one option for the remaining edge, and that is (2, 3). This means that the graph is a cycle on four vertices, with (1, 2) being one partition and (3, 4) being the second. Here, it would be also valid to output "3 4" on the second line.

In the second case, we also have a graph on four vertices and four edges. In the second query, Alice learns that there are three edges among vertices (1, 2, 4). The only way this could possibly happen is that those form a triangle. As the triangle is not bipartite, Alice can report it as a proof. Notice that she does not learn where the fourth edge is, but she is able to answer Bob correctly anyway.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using ll = long long;
using ull = unsigned long long;
using uint = unsigned int;
using ld = long double;
using vi = std::vector<int>;
using pii = std::pair<int, int>;
using vvi = std::vector<vi>;
using vii = std::vector<pii>;
using vll = std::vector<ll>;
using pll = std::pair<ll, ll>;
template <typename T>
int sign(const T& t) {
  return (t > 0) - (t < 0);
}
template <typename T, typename U>
bool remax(T& a, U b) {
  if (a < b) {
    a = b;
    return true;
  }
  return false;
}
template <typename T, typename U>
bool remin(T& a, U b) {
  if (a > b) {
    a = b;
    return true;
  }
  return false;
}
template <typename T>
T gcd(T a, T b) {
  a = std::abs(a);
  b = std::abs(b);
  while (b) {
    a %= b;
    std::swap(a, b);
  }
  return a;
}
template <typename T>
T lcm(T a, T b) {
  a = std::abs(a);
  b = std::abs(b);
  return a / gcd(a, b) * b;
}
double get_time() { return static_cast<double>(clock()) / CLOCKS_PER_SEC; }
uint32_t mrand_32t() {
  static std::random_device rd;
  static std::mt19937 rng(rd());
  return rng();
}
uint64_t mrand_64t() {
  static std::random_device rd;
  static std::mt19937_64 rng(rd());
  return rng();
}
template <typename T>
void make_unique(std::vector<T>& v) {
  std::sort(std::begin(v), std::end(v));
  v.erase(std::unique(std::begin(v), std::end(v)), std::end(v));
}
namespace std {
template <typename A, typename B>
string to_string(const pair<A, B>& p) {
  string str;
  str += "(";
  str += to_string(p.first);
  str += ", ";
  str += to_string(p.second);
  str += ")";
  return str;
}
string to_string(bool value) { return value ? "true" : "false"; }
template <typename T>
string to_string(const vector<T>& vec) {
  string str = "{ ";
  bool first = true;
  for (const auto& it : vec) {
    if (!first) {
      str += ", ";
    }
    str += to_string(it);
    first = false;
  }
  str += " }";
  return str;
}
template <typename T>
string to_string(const set<T>& s) {
  string str = "{ ";
  bool first = true;
  for (const auto& it : s) {
    if (!first) {
      str += ", ";
    }
    str += to_string(it);
    first = false;
  }
  str += " }";
  return str;
}
template <typename K, typename V>
string to_string(const map<K, V>& m) {
  string str = "{ ";
  bool first = true;
  for (const auto& it : m) {
    if (!first) {
      str += ", ";
    }
    first = false;
    str += to_string(it.first);
    str += " -> ";
    str += to_string(it.second);
  }
  str += " }";
  return str;
}
string to_string(const string& s) { return "\"" + s + "\""; }
string to_string(const char* s) { return to_string(string(s)); }
string to_string(char ch) { return "\'" + string(1, ch) + "\'"; }
template <size_t N>
string to_string(const bitset<N>& b) {
  string res(N, '0');
  for (size_t i = 0; i < N; ++i) {
    res[i] = '0' + b[i];
  }
  return res;
}
template <typename T>
string to_string(const T& t) {
  std::stringstream ss;
  ss << t;
  return ss.str();
}
}  // namespace std
void debug_out() { std::cerr << std::endl; }
template <typename Head, typename... Tail>
void debug_out(Head H, Tail... T) {
  std::cerr << " " << std::to_string(H);
  debug_out(T...);
}
using namespace std;
int n;
bool read() {
  if (!(cin >> n)) {
    return 0;
  }
  return 1;
}
int ask(vi vs) {
  cout << "? " << int((vs).size()) << endl;
  for (int v : vs) {
    cout << v + 1 << " ";
  }
  cout << endl;
  int m;
  cin >> m;
  if (m == -1) {
    exit(0);
  }
  return m;
}
struct Ans {
  bool ok;
  vi vs;
  void print() const {
    if (ok) {
      cout << "Y ";
    } else {
      cout << "N ";
    }
    cout << int((vs).size()) << endl;
    for (int v : vs) {
      cout << v + 1 << " ";
    }
    cout << endl;
  }
};
void append(vi& a, const vi& b) {
  for (const auto& x : b) {
    a.push_back(x);
  }
}
vi merge(const vi& a, const vi& b) {
  vi c = a;
  append(c, b);
  return c;
}
Ans solve() {
  const auto get_edge = [&](const vi& vs, int v) {
    {
      vi cur = vs;
      cur.push_back(v);
      if (ask(cur) == 0) {
        return -1;
      }
    }
    int L = -1;
    int R = int((vs).size());
    while (L != R - 1) {
      int M = (L + R) / 2;
      auto cur = vi(vs.begin(), vs.begin() + (M + 1));
      cur.push_back(v);
      if (ask(cur) > 0) {
        R = M;
      } else {
        L = M;
      }
    }
    if (R == int((vs).size())) {
      return -1;
    }
    return vs.at(R);
  };
  vvi g(n);
  const function<bool(int, int, vi&, vi&)> dfs = [&](int v, int want, vi& was,
                                                     vi& path) -> bool {
    assert(!was[v]);
    was[v] = 1;
    path.push_back(v);
    if (v == want) {
      return 1;
    }
    for (int u : g[v]) {
      if (!was[u]) {
        if (dfs(u, want, was, path)) {
          return 1;
        }
      }
    }
    assert(path.back() == v);
    path.pop_back();
    return 0;
  };
  const auto addE = [&](int v, int u) {
    if (v == -1 || u == -1) {
      return;
    }
    g[v].push_back(u);
    g[u].push_back(v);
  };
  vi left___;
  vi right___;
  left___.push_back(0);
  vi used(n, 0);
  used[0] = 1;
  vi pref;
  while (1) {
    vi rest;
    for (int v = int(0); v < int(n); ++v) {
      if (!used[v]) {
        rest.push_back(v);
      }
    }
    if (rest.empty()) {
      break;
    }
    vi lr = left___;
    append(lr, right___);
    const int base = ask(lr);
    int L = -1;
    int R = int((rest).size());
    while (L != R - 1) {
      int M = (L + R) / 2;
      const int old = int((lr).size());
      append(lr, vi(rest.begin(), rest.begin() + (M + 1)));
      int xxx = ask(vi(rest.begin(), rest.begin() + (M + 1)));
      if (ask(lr) > base + xxx) {
        R = M;
      } else {
        L = M;
      }
      lr.resize(old);
    }
    if (R == int((rest).size())) {
      append(pref, left___);
      left___.clear();
      right___.clear();
      const int v = rest.at(0);
      used[v] = 1;
      left___.push_back(v);
      continue;
    }
    const int v = rest.at(R);
    used[v] = 1;
    int Lv = get_edge(left___, v);
    int Rv = get_edge(right___, v);
    if (Lv != -1 && Rv != -1) {
      vi was(n, 0);
      vi path;
      bool found = dfs(Lv, Rv, was, path);
      assert(found);
      path.push_back(v);
      return Ans{false, path};
    }
    addE(Lv, v);
    addE(Rv, v);
    if (Lv != -1) {
      right___.push_back(v);
    } else if (Rv != -1) {
      left___.push_back(v);
    } else {
      assert(0);
    }
  }
  append(pref, left___);
  return Ans{true, pref};
}
int main() {
  read();
  auto ans = solve();
  ans.print();
  return 0;
}