Problem: Several years ago Tolya had n computer games and at some point of time he decided to burn them to CD. After that he wrote down the names of the games one after another in a circle on the CD in clockwise order. The names were distinct, the length of each name was equal to k. The names didn't overlap.

Thus, there is a cyclic string of length n·k written on the CD.

Several years have passed and now Tolya can't remember which games he burned to his CD. He knows that there were g popular games that days. All of the games he burned were among these g games, and no game was burned more than once.

You have to restore any valid list of games Tolya could burn to the CD several years ago.

Input

The first line of the input contains two positive integers n and k (1 ≤ n ≤ 105, 1 ≤ k ≤ 105) — the amount of games Tolya burned to the CD, and the length of each of the names.

The second line of the input contains one string consisting of lowercase English letters — the string Tolya wrote on the CD, split in arbitrary place. The length of the string is n·k. It is guaranteed that the length is not greater than 106.

The third line of the input contains one positive integer g (n ≤ g ≤ 105) — the amount of popular games that could be written on the CD. It is guaranteed that the total length of names of all popular games is not greater than 2·106.

Each of the next g lines contains a single string — the name of some popular game. Each name consists of lowercase English letters and has length k. It is guaranteed that the names are distinct.

Output

If there is no answer, print "NO" (without quotes).

Otherwise, print two lines. In the first line print "YES" (without quotes). In the second line, print n integers — the games which names were written on the CD. You should print games in the order they could have been written on the CD, it means, in clockwise order. You can print games starting from any position. Remember, that no game was burned to the CD more than once. If there are several possible answers, print any of them.

Examples

Input

3 1
abc
4
b
a
c
d


Output

YES
2 1 3 


Input

4 2
aabbccdd
4
dd
ab
bc
cd


Output

NO

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
const long long N = 200005, INF = 2000000000000000000;
long long power(long long a, long long b, long long p) {
  if (a == 0) return 0;
  long long res = 1;
  a %= p;
  while (b > 0) {
    if (b & 1) res = (res * a) % p;
    b >>= 1;
    a = (a * a) % p;
  }
  return res;
}
vector<long long> prime;
bool is_composite[N];
void sieve(long long n) {
  memset(is_composite, false, sizeof(is_composite));
  for (long long i = 2; i < n; ++i) {
    if (!is_composite[i]) prime.push_back(i);
    for (long long j = 0; j < prime.size() && i * prime[j] < n; ++j) {
      is_composite[i * prime[j]] = true;
      if (i % prime[j] == 0) break;
    }
  }
}
void print(bool n) {
  if (n) {
    cout << "YES";
  } else {
    cout << "NO";
  }
}
long long prod, inv;
long long compute_hash(string const& s) {
  const long long p = 31;
  const long long m = 1e9 + 7;
  long long hash_value = 0;
  long long p_pow = 1;
  for (char c : s) {
    hash_value = (hash_value + (c - 'a' + 1) * p_pow) % m;
    p_pow = (p_pow * p) % m;
  }
  return hash_value;
}
long long compute_hash2(string const& s) {
  const long long p = 31;
  const long long m = 1e9 + 9;
  long long hash_value = 0;
  long long p_pow = 1;
  for (char c : s) {
    hash_value = (hash_value + (c - 'a' + 1) * p_pow) % m;
    p_pow = (p_pow * p) % m;
  }
  return hash_value;
}
int32_t main() {
  std::ios::sync_with_stdio(false);
  cin.tie(NULL);
  cout.tie(NULL);
  ;
  long long n, k;
  cin >> n >> k;
  string s;
  cin >> s;
  prod = power(31, k, 1000000007);
  inv = power(31, 1000000007 - 2, 1000000007);
  long long prod2 = power(31, k, 1000000009);
  long long inv2 = power(31, 1000000009 - 2, 1000000009);
  s += s.substr(0, k - 1);
  long long roll = compute_hash(s.substr(0, k));
  long long roll2 = compute_hash2(s.substr(0, k));
  vector<pair<long long, long long> > comp[k];
  comp[0].push_back({roll, roll2});
  for (long long i = 1; i < n * k; i++) {
    roll = (roll + (prod * (s[i + k - 1] - 'a' + 1)) % 1000000007) % 1000000007;
    roll = ((roll - (long long)(s[i - 1] - 'a' + 1) + 1000000007) % 1000000007);
    roll = (roll * inv) % 1000000007;
    roll2 =
        (roll2 + (prod2 * (s[i + k - 1] - 'a' + 1)) % 1000000009) % 1000000009;
    roll2 =
        ((roll2 - (long long)(s[i - 1] - 'a' + 1) + 1000000009) % 1000000009);
    roll2 = (roll2 * inv2) % 1000000009;
    comp[i % k].push_back({roll, roll2});
  }
  map<pair<long long, long long>, long long> values;
  long long g;
  cin >> g;
  for (long long i = 1; i <= g; i++) {
    string t;
    cin >> t;
    long long hash = compute_hash(t);
    long long hash2 = compute_hash2(t);
    values[{hash, hash2}] = i;
  }
  vector<long long> ans;
  set<long long> ans2;
  for (long long i = 0; i < k; i++) {
    for (auto j : comp[i]) {
      if (values.count(j))
        ans.push_back(values[j]), ans2.insert(values[j]);
      else {
        ans.clear();
        break;
      }
    }
    if (ans2.size() == n)
      break;
    else
      ans2.clear(), ans.clear();
  }
  print(ans.size());
  cout << "\n";
  if (ans.size() != n) return 0;
  for (auto i : ans) cout << i << " ";
}