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>
using namespace std;
void read(int &x) {
  int v = 0, f = 1;
  char c = getchar();
  while (!isdigit(c) && c != '-') c = getchar();
  if (c == '-')
    f = -1;
  else
    v = v * 10 + c - '0';
  while (isdigit(c = getchar())) v = v * 10 + c - '0';
  x = v * f;
}
void read(long long &x) {
  long long v = 0ll, f = 1ll;
  char c = getchar();
  while (!isdigit(c) && c != '-') c = getchar();
  if (c == '-')
    f = -1;
  else
    v = v * 10 + c - '0';
  while (isdigit(c = getchar())) v = v * 10 + c - '0';
  x = v * f;
}
void readc(char &x) {
  char c;
  while ((c = getchar()) == ' ' || c == '\n')
    ;
  x = c;
}
void writes(string s) { puts(s.c_str()); }
void writeln() { writes(""); }
void writei(int x) {
  if (x < 0) {
    putchar('-');
    x = abs(x);
  }
  if (!x) putchar('0');
  char a[25];
  int top = 0;
  while (x) {
    a[++top] = (x % 10) + '0';
    x /= 10;
  }
  while (top) {
    putchar(a[top]);
    top--;
  }
}
void writell(long long x) {
  if (x < 0) {
    putchar('-');
    x = abs(x);
  }
  if (!x) putchar('0');
  char a[25];
  int top = 0;
  while (x) {
    a[++top] = (x % 10) + '0';
    x /= 10;
  }
  while (top) {
    putchar(a[top]);
    top--;
  }
}
inline long long inc(int &x) { return ++x; }
inline long long inc(long long &x) { return ++x; }
inline long long inc(int &x, long long y) { return x += y; }
inline long long inc(long long &x, long long y) { return x += y; }
inline double inc(double &x, double y) { return x += y; }
inline long long dec(int &x) { return --x; }
inline long long dec(long long &x) { return --x; }
inline long long dec(int &x, long long y) { return x -= y; }
inline long long dec(long long &x, long long y) { return x -= y; }
inline double dec(double &x, double y) { return x -= y; }
inline long long mul(int &x) { return x = ((long long)x) * x; }
inline long long mul(long long &x) { return x = x * x; }
inline long long mul(int &x, long long y) { return x *= y; }
inline long long mul(long long &x, long long y) { return x *= y; }
inline double mul(double &x, double y) { return x *= y; }
inline long long divi(const int &x) {
  long long ans, l, r, mid;
  ans = 0;
  l = 0;
  r = 0x3fffffff;
  while (l < r) {
    mid = (l + r) / 2;
    if (mid * mid <= x) {
      ans = mid;
      l = mid + 1;
    } else
      r = mid;
  }
  return ans;
}
inline long long divi(const long long &x) {
  long long ans, l, r, mid;
  ans = 0;
  l = 0;
  r = 0x3fffffff;
  while (l < r) {
    mid = (l + r) / 2;
    if (mid * mid <= x) {
      ans = mid;
      l = mid + 1;
    } else
      r = mid;
  }
  return ans;
}
inline long long divi(int &x, long long y) { return x /= y; }
inline long long divi(long long &x, long long y) { return x /= y; }
inline double divi(double &x, double y) { return x /= y; }
inline long long mod(int &x, long long y) { return x %= y; }
inline long long mod(long long &x, long long y) { return x %= y; }
int n, m, q, i, j, a[200005], b[200005], c[200005], d[200005], bel[200005],
    br[200005], id[200005], to[200005], add[200005], cnt[455][16395], x, y, cc,
    bck, blk, bls, ans;
char ch;
int solve() {
  if (cc) return -1;
  return n - ans;
}
void update(int x, int y) {
  int l = id[x], r = to[id[x]], mem = r;
  if (d[r] ^ add[bel[r]]) cc--;
  while (l <= r && bel[l] == bel[l - 1]) {
    if (d[l] == add[bel[l]]) ans--;
    cnt[bel[l]][d[l]]--;
    d[l] ^= y;
    cnt[bel[l]][d[l]]++;
    if (d[l] == add[bel[l]]) ans++;
    l++;
  }
  while (l <= r && bel[r] == bel[r + 1]) {
    if (d[r] == add[bel[r]]) ans--;
    cnt[bel[r]][d[r]]--;
    d[r] ^= y;
    cnt[bel[r]][d[r]]++;
    if (d[r] == add[bel[r]]) ans++;
    r--;
  }
  while (l <= r) {
    ans -= cnt[bel[l]][add[bel[l]]];
    add[bel[l]] ^= y;
    ans += cnt[bel[l]][add[bel[l]]];
    l += blk;
  }
  if (d[mem] ^ add[bel[mem]]) cc++;
}
int main() {
  read(n);
  read(m);
  read(q);
  if ((1) <= ((n)))
    for (((i)) = (1); ((i)) <= ((n)); ((i))++) {
      read(a[i]);
    }
  if ((1) <= ((n)))
    for (((i)) = (1); ((i)) <= ((n)); ((i))++) {
      read(b[i]);
    }
  if ((0) <= (n))
    for ((i) = (0); (i) <= (n); (i)++) {
      c[i] = a[i] ^ b[i] ^ a[i + 1] ^ b[i + 1];
    }
  bck = 0;
  if ((0) <= (m - 1))
    for ((i) = (0); (i) <= (m - 1); (i)++) {
      for (j = i; j <= n; j += m) {
        id[j] = ++bck;
        if (j > i)
          d[bck] = d[bck - 1] ^ c[j];
        else
          d[bck] = c[j];
      }
      for (j = i; j <= n; j += m) {
        to[id[j]] = bck;
      }
      if (d[bck]) cc++;
    }
  n++;
  blk = divi(n);
  if ((1) <= ((n)))
    for (((i)) = (1); ((i)) <= ((n)); ((i))++) bel[i] = (i - 1) / blk + 1;
  bls = bel[n];
  if ((1) <= ((bls)))
    for (((i)) = (1); ((i)) <= ((bls)); ((i))++) br[i] = min(n, i * blk);
  if ((1) <= ((n)))
    for (((i)) = (1); ((i)) <= ((n)); ((i))++) cnt[bel[i]][d[i]]++;
  if ((1) <= ((bls)))
    for (((i)) = (1); ((i)) <= ((bls)); ((i))++) ans += cnt[i][0];
  printf("%d\n", solve());
  while (q--) {
    readc(ch);
    read(x);
    read(y);
    if (ch == 'a')
      a[x] = y;
    else
      b[x] = y;
    int t = c[x];
    c[x] = a[x] ^ b[x] ^ a[x + 1] ^ b[x + 1];
    update(x, t ^ c[x]);
    t = c[x - 1];
    c[x - 1] = a[x - 1] ^ b[x - 1] ^ a[x] ^ b[x];
    update(x - 1, t ^ c[x - 1]);
    printf("%d\n", solve());
  }
  return 0;
}