Problem: The Fair Nut has two arrays a and b, consisting of n numbers. He found them so long ago that no one knows when they came to him.

The Fair Nut often changes numbers in his arrays. He also is interested in how similar a and b are after every modification.

Let's denote similarity of two arrays as the minimum number of operations to apply to make arrays equal (every operation can be applied for both arrays). If it is impossible, similarity will be equal -1.

Per one operation you can choose a subarray with length k (k is fixed), and change every element a_i, which belongs to the chosen subarray, to a_i ⊕ x (x can be chosen), where ⊕ denotes the [bitwise XOR operation](https://en.wikipedia.org/wiki/Bitwise_operation#XOR). 

Nut has already calculated the similarity of the arrays after every modification. Can you do it?

Note that you just need to calculate those values, that is you do not need to apply any operations.

Input

The first line contains three numbers n, k and q (1 ≤ k ≤ n ≤ 2 ⋅ 10^5, 0 ≤ q ≤ 2 ⋅ 10^5) — the length of the arrays, the length of the subarrays, to which the operations are applied, and the number of queries.

The second line contains n integers a_1, a_2, …, a_n (0 ≤ a_i < 2^{14}) — elements of array a.

The third line contains n integers b_1, b_2, …, b_n (0 ≤ b_i < 2^{14}) — elements of array b.

Each of the next q lines describes query and contains string s and two integers p and v (1 ≤ p ≤ n, 0 ≤ v < 2^{14}) — array, which this query changes («a» or «b» without quotes), index of changing element and its new value.

Output

On the first line print initial similarity of arrays a and b.

On the i-th of following q lines print similarity of a and b after applying first i modifications.

Examples

Input

3 3 1
0 4 2
1 2 3
b 2 5


Output

-1
1


Input

3 2 2
1 3 2
0 0 0
a 1 0
b 1 1


Output

2
-1
2

Note

In the first sample making arrays [0, 4, 2] and [1, 2, 3] is impossible with k=3. After the modification, you can apply the operation with x=1 to the whole first array (its length is equal to k), and it will be equal to the second array.

In order to make arrays equal in the second sample before changes, you can apply operations with x=1 on subarray [1, 2] of a and with x=2 on subarray [2, 3] of b.

After all queries arrays will be equal [0, 3, 2] and [1, 0, 0]. The same operations make them equal [1, 2, 2].

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
#pragma GCC optimize(2)
using namespace std;
void read(int &x) {
  x = 0;
  int f = 1;
  char ch = getchar();
  for (; !isdigit(ch); ch = getchar())
    if (ch == '-') f = -f;
  for (; isdigit(ch); ch = getchar()) x = x * 10 + ch - '0';
  x *= f;
}
void print(int x) {
  if (x < 0) putchar('-'), x = -x;
  if (!x) return;
  print(x / 10), putchar(x % 10 + 48);
}
void write(int x) {
  if (!x)
    putchar('0');
  else
    print(x);
  putchar('\n');
}
const int maxn = 1e6 + 10;
const int inf = 1e9;
const double eps = 1e-8;
const int mod = 1e9 + 7;
const int B = 400;
int a[maxn], b[maxn], n, k, q;
int c[maxn], s[maxn], ans, res;
namespace pps {
void modify(int p, int x) {
  c[p] = x;
  for (int i = p; i <= n; i += k) {
    ans -= !(!s[i]);
    if (i + k > n) res -= !s[i];
    s[i] = c[i] ^ (i >= k ? s[i - k] : 0);
    if (i + k > n) res += !s[i];
    ans += !(!s[i]);
  }
}
void solve() {
  ans = n - ans;
  while (q--) {
    char op;
    int p, v;
    scanf("%c", &op), read(p), read(v);
    if (op == 'a')
      a[p] = v;
    else
      b[p] = v;
    modify(p, (a[p] ^ b[p]) ^ (a[p - 1] ^ b[p - 1]));
    p++;
    modify(p, (a[p] ^ b[p]) ^ (a[p - 1] ^ b[p - 1]));
    write(res == k ? ans : -1);
  }
}
}  // namespace pps
namespace modpps {
struct block {
  vector<int> r, bel, val, w;
  vector<vector<int> > t;
  int tag[600], m;
  void init(int x) {
    if (!x) x = k;
    m = 0;
    for (int i = x; i <= n; i += k) m++;
    r.resize(m + 2), bel.resize(m + 2);
    val.resize(m + 2), w.resize(m + 2);
    for (int i = 1; i <= m; i++) bel[i] = (i - 1) / B + 1;
    for (int i = m; i; i--) r[i] = bel[i] == bel[i + 1] ? r[i + 1] : i;
    for (int i = 1; i <= m; i++) {
      w[i] = s[(i - 1) * k + x];
      val[i] = c[(i - 1) * k + x];
    }
    vector<int> et(1 << 14, 0);
    for (int i = 0; i <= bel[m]; i++) t.push_back(et);
    for (int i = 1; i <= m; i++) t[bel[i]][w[i]]++;
  }
  void modify(int x, int v) {
    x = x / k + (x % k != 0);
    int _ = v ^ val[x];
    val[x] = v;
    v = _;
    res -= tag[bel[m]] == w[m];
    for (int i = x; i <= r[x]; i++) {
      t[bel[i]][w[i]]--;
      if (w[i] == tag[bel[i]]) ans--;
      w[i] ^= v;
      t[bel[i]][w[i]]++;
      if (w[i] == tag[bel[i]]) ans++;
    }
    for (int i = bel[x] + 1; i <= bel[m]; i++) {
      ans -= t[i][tag[i]];
      tag[i] ^= v;
      ans += t[i][tag[i]];
    }
    res += tag[bel[m]] == w[m];
  }
} s[402];
void solve() {
  for (int i = 0; i < k; i++) s[i].init(i);
  cerr << "OK" << endl;
  while (q--) {
    char op;
    int p, v;
    scanf("%c", &op), read(p), read(v);
    if (op == 'a')
      a[p] = v;
    else
      b[p] = v;
    s[p % k].modify(p, (a[p] ^ b[p]) ^ (a[p - 1] ^ b[p - 1]));
    p++;
    s[p % k].modify(p, (a[p] ^ b[p]) ^ (a[p - 1] ^ b[p - 1]));
    write(res == k ? n - ans : -1);
    if (q % 10000 == 0) cerr << q << endl;
  }
}
}  // namespace modpps
int main() {
  int st = clock();
  read(n), read(k), read(q);
  for (int i = 1; i <= n; i++) read(a[i]);
  for (int i = 1; i <= n; i++) read(b[i]);
  n++;
  for (int i = 1; i <= n; i++) c[i] = (a[i] ^ b[i]) ^ (a[i - 1] ^ b[i - 1]);
  for (int i = 1; i <= n; i++)
    s[i] = c[i] ^ (i >= k ? s[i - k] : 0), ans += !s[i];
  for (int i = n - k + 1; i <= n; i++) res += !s[i];
  write(res == k ? n - ans : -1);
  if (k > B)
    pps ::solve();
  else
    modpps ::solve();
  cerr << (double)(clock() - st) / 1e3 << endl;
  return 0;
}