Problem: At the first holiday in spring, the town Shortriver traditionally conducts a flower festival. Townsfolk wear traditional wreaths during these festivals. Each wreath contains exactly k flowers.

The work material for the wreaths for all n citizens of Shortriver is cut from the longest flowered liana that grew in the town that year. Liana is a sequence a_1, a_2, ..., a_m, where a_i is an integer that denotes the type of flower at the position i. This year the liana is very long (m ≥ n ⋅ k), and that means every citizen will get a wreath.

Very soon the liana will be inserted into a special cutting machine in order to make work material for wreaths. The machine works in a simple manner: it cuts k flowers from the beginning of the liana, then another k flowers and so on. Each such piece of k flowers is called a workpiece. The machine works until there are less than k flowers on the liana.

Diana has found a weaving schematic for the most beautiful wreath imaginable. In order to weave it, k flowers must contain flowers of types b_1, b_2, ..., b_s, while other can be of any type. If a type appears in this sequence several times, there should be at least that many flowers of that type as the number of occurrences of this flower in the sequence. The order of the flowers in a workpiece does not matter.

Diana has a chance to remove some flowers from the liana before it is inserted into the cutting machine. She can remove flowers from any part of the liana without breaking liana into pieces. If Diana removes too many flowers, it may happen so that some of the citizens do not get a wreath. Could some flowers be removed from the liana so that at least one workpiece would conform to the schematic and machine would still be able to create at least n workpieces?

Input

The first line contains four integers m, k, n and s (1 ≤ n, k, m ≤ 5 ⋅ 10^5, k ⋅ n ≤ m, 1 ≤ s ≤ k): the number of flowers on the liana, the number of flowers in one wreath, the amount of citizens and the length of Diana's flower sequence respectively.

The second line contains m integers a_1, a_2, ..., a_m (1 ≤ a_i ≤ 5 ⋅ 10^5) — types of flowers on the liana.

The third line contains s integers b_1, b_2, ..., b_s (1 ≤ b_i ≤ 5 ⋅ 10^5) — the sequence in Diana's schematic.

Output

If it's impossible to remove some of the flowers so that there would be at least n workpieces and at least one of them fullfills Diana's schematic requirements, output -1.

Otherwise in the first line output one integer d — the number of flowers to be removed by Diana.

In the next line output d different integers — the positions of the flowers to be removed.

If there are multiple answers, print any.

Examples

Input


7 3 2 2
1 2 3 3 2 1 2
2 2


Output


1
4 


Input


13 4 3 3
3 2 6 4 1 4 4 7 1 3 3 2 4
4 3 4


Output


-1


Input


13 4 1 3
3 2 6 4 1 4 4 7 1 3 3 2 4
4 3 4


Output


9
1 2 3 4 5 9 11 12 13

Note

In the first example, if you don't remove any flowers, the machine would put out two workpieces with flower types [1, 2, 3] and [3, 2, 1]. Those workpieces don't fit Diana's schematic. But if you remove flower on 4-th place, the machine would output workpieces [1, 2, 3] and [2, 1, 2]. The second workpiece fits Diana's schematic.

In the second example there is no way to remove flowers so that every citizen gets a wreath and Diana gets a workpiece that fits here schematic.

In the third example Diana is the only citizen of the town and that means she can, for example, just remove all flowers except the ones she needs.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
template <typename S, typename T>
ostream& operator<<(ostream& os, const pair<S, T>& x);
template <typename T>
ostream& operator<<(ostream& os, const vector<T>& x);
template <typename T>
ostream& operator<<(ostream& os, const set<T>& v);
template <typename T>
ostream& operator<<(ostream& os, const multiset<T>& v);
template <typename S, typename T>
ostream& operator<<(ostream& os, const unordered_map<S, T>& v);
vector<long long> readvec(long long length, long long off = 0);
long long k;
long long prev_multiple_of_k(long long i) { return (i / k) * k; }
int main() {
  ios_base::sync_with_stdio(0);
  cin.tie(0);
  long long n_flowers, n_people, n_schema;
  cin >> n_flowers >> k >> n_people >> n_schema;
  vector<long long> v = readvec(n_flowers);
  vector<long long> S = readvec(n_schema);
  long long can_delete = n_flowers - n_people * k;
  vector<long long> targets(6 * 1e5);
  for (long long x : S) targets[x]++;
  vector<long long> counts(6 * 1e5);
  long long redundant = 0;
  long long l = 0;
  long long r = -1;
  while (true) {
    r++;
    if (r >= n_flowers) goto fail;
    counts[v[r]]++;
    if (counts[v[r]] > targets[v[r]]) redundant++;
    long long non_redundant = (r - l + 1) - redundant;
    if (non_redundant >= n_schema) break;
  }
  while (targets[v[l]] == 0) {
    l++;
    if (l >= n_flowers) goto fail;
    redundant--;
  }
  while (true) {
    long long p = prev_multiple_of_k(l) + k - 1;
    long long need_to_del = max(r - p, 0LL);
    if (can_delete >= need_to_del &&
        (l - prev_multiple_of_k(l) + redundant) >= need_to_del) {
      cout << need_to_del << endl;
      long long pos = prev_multiple_of_k(l);
      while (need_to_del > 0) {
        if (pos < l) {
          cout << pos + 1 << " ";
          need_to_del--;
        } else {
          if (counts[v[pos]] > targets[v[pos]]) {
            cout << pos + 1 << " ";
            counts[v[pos]]--;
            need_to_del--;
          }
        }
        pos++;
      }
      cout << endl;
      return 0;
    }
    counts[v[l]]--;
    if (counts[v[l]] >= targets[v[l]]) redundant--;
    while (counts[v[l]] < targets[v[l]]) {
      r++;
      if (r >= n_flowers) goto fail;
      if (counts[v[r]] >= targets[v[r]]) redundant++;
      counts[v[r]]++;
    }
    l++;
    if (l >= n_flowers) goto fail;
    while (targets[v[l]] == 0) {
      l++;
      if (l >= n_flowers) goto fail;
      redundant--;
    }
  }
fail:
  cout << -1 << endl;
}
template <typename S, typename T>
ostream& operator<<(ostream& os, const unordered_map<S, T>& v) {
  os << "[";
  for (auto it = v.begin(); it != v.end(); it++) {
    if (it != v.begin()) os << ", ";
    os << it->first << ": " << it->second;
  }
  os << "]";
  return os;
}
template <typename S, typename T>
ostream& operator<<(ostream& os, const map<S, T>& v) {
  os << "{";
  for (auto it = v.begin(); it != v.end(); it++) {
    if (it != v.begin()) os << ", ";
    os << it->first << ": " << it->second;
  }
  os << "}";
  return os;
}
template <typename T>
ostream& operator<<(ostream& os, const vector<T>& v) {
  os << "[";
  for (auto it = v.begin(); it != v.end(); it++) {
    if (it != v.begin()) os << ", ";
    os << *it;
  }
  os << "]";
  return os;
}
template <typename T>
ostream& operator<<(ostream& os, const set<T>& v) {
  os << "[";
  for (auto it = v.begin(); it != v.end(); it++) {
    if (it != v.begin()) os << ", ";
    os << *it;
  }
  os << "]";
  return os;
}
template <typename T>
ostream& operator<<(ostream& os, const multiset<T>& v) {
  os << "[";
  for (auto it = v.begin(); it != v.end(); it++) {
    if (it != v.begin()) os << ", ";
    os << *it;
  }
  os << "]";
  return os;
}
template <typename S, typename T>
ostream& operator<<(ostream& os, const pair<S, T>& x) {
  os << "(" << x.first << ", " << x.second << ")";
  return os;
}
vector<long long> readvec(long long length, long long off) {
  vector<long long> v;
  for (long long i = 0; i < length; i++) {
    long long x;
    cin >> x;
    v.push_back(x + off);
  }
  return v;
}