Problem: In a magical land there are n cities conveniently numbered 1, 2, ..., n. Some pairs of these cities are connected by magical colored roads. Magic is unstable, so at any time, new roads may appear between two cities.

Vicky the witch has been tasked with performing deliveries between some pairs of cities. However, Vicky is a beginner, so she can only complete a delivery if she can move from her starting city to her destination city through a double rainbow. A double rainbow is a sequence of cities c_1, c_2, ..., c_k satisfying the following properties:

  * For each i with 1 ≤ i ≤ k - 1, the cities c_i and c_{i + 1} are connected by a road. 
  * For each i with 1 ≤ i ≤ (k - 1)/(2), the roads connecting c_{2i} with c_{2i - 1} and c_{2i + 1} have the same color. 



For example if k = 5, the road between c_1 and c_2 must be the same color as the road between c_2 and c_3, and the road between c_3 and c_4 must be the same color as the road between c_4 and c_5.

Vicky has a list of events in chronological order, where each event is either a delivery she must perform, or appearance of a new road. Help her determine which of her deliveries she will be able to complete.

Input

The first line contains four integers n, m, c, and q (2 ≤ n ≤ 10^5, 1 ≤ m, c, q ≤ 10^5), denoting respectively the number of cities, the number of roads initially present, the number of different colors the roads can take, and the number of events.

Each of the following m lines contains three integers x, y, and z (1 ≤ x, y ≤ n, 1 ≤ z ≤ c), describing that there initially exists a bidirectional road with color z between cities x and y.

Then q lines follow, describing the events. Each event is one of the following two types: 

  1. + x y z (1 ≤ x, y ≤ n, 1 ≤ z ≤ c), meaning a road with color z appears between cities x and y; 
  2. ? x y (1 ≤ x, y ≤ n), meaning you should determine whether Vicky can make a delivery starting at city x and ending at city y. It is guaranteed that x ≠ y. 



It is guaranteed that at any moment, there is at most one road connecting any pair of cities, and that no road connects a city to itself. It is guaranteed that the input contains at least one event of the second type.

Output

For each event of the second type, print a single line containing "Yes" (without quotes) if the delivery can be made, or a single line containing "No" (without quotes) otherwise.

Example

Input


4 3 2 4
1 2 1
2 3 1
3 4 2
? 1 4
? 4 1
+ 3 1 2
? 4 1


Output


Yes
No
Yes

Note

The following picture corresponds to the sample.

<image>

For her first delivery, Vicky can use the sequence 1, 2, 3, 4 which is a double rainbow. However, she cannot complete the second delivery, as she can only reach city 3. After adding the road between cities 1 and 3, she can now complete a delivery from city 4 to city 1 by using the double rainbow 4, 3, 1.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
inline int read() {
  int w = 1, s = 0;
  char ch = getchar();
  while (!isdigit(ch)) {
    if (ch == '-') w = -1;
    ch = getchar();
  }
  while (isdigit(ch)) {
    s = s * 10 + ch - '0';
    ch = getchar();
  }
  return w * s;
}
struct node {
  int opt, u, v, c;
} e[1010100];
int n, m, c, q, fa[1010100], tot, du[1010100];
unordered_map<int, int> mp[101010];
inline int find(int x) {
  if (x == fa[x])
    return x;
  else
    return fa[x] = find(fa[x]);
}
int cnt;
map<pair<int, int>, int> Idx;
vector<int> vec[101000];
set<int> st[101010];
inline void Ins(int u, int v, int c) {
  int x = find(u), y = find(v);
  int o = Idx[make_pair(v, c)];
  st[u].insert(v);
  st[v].insert(u);
  du[x]++;
  du[y]++;
  if (o) {
    int nw = find(o);
    if (nw == x)
      ;
    else {
      if (du[x] < du[nw]) swap(x, nw);
      fa[nw] = x;
      du[x] += du[nw];
      for (register int i = 0; i < (vec[nw]).size(); ++i) {
        vec[x].push_back(vec[nw][i]);
        for (auto xx : st[vec[nw][i]]) {
          mp[xx][x] = 1;
        }
      }
    }
  }
  Idx[make_pair(v, c)] = x;
  x = find(u);
  y = find(v);
  o = Idx[make_pair(u, c)];
  if (o) {
    int nw = find(o);
    if (nw == y)
      ;
    else {
      if (du[y] < du[nw]) swap(y, nw);
      fa[nw] = y;
      du[y] += du[nw];
      for (register int i = 0; i < (vec[nw]).size(); ++i) {
        vec[y].push_back(vec[nw][i]);
        for (auto xx : st[vec[nw][i]]) {
          mp[xx][y] = 1;
        }
      }
    }
  }
  Idx[make_pair(u, c)] = y;
  mp[u][find(v)] = 1;
  mp[v][find(u)] = 1;
}
inline void Solve() {
  for (register int i = 1; i <= tot; ++i) {
    int opt = e[i].opt, u = e[i].u, v = e[i].v, c = e[i].c;
    if (opt == 1) {
      Ins(u, v, c);
    } else {
      int x = find(u), y = find(v);
      if (x == y) {
        cout << "Yes\n";
      } else if (mp[v][x])
        cout << "Yes\n";
      else
        cout << "No\n";
    }
  }
}
int main() {
  n = read(), m = read(), c = read(), q = read();
  for (register int i = 1; i <= n; ++i) fa[i] = i, vec[i].push_back(i);
  for (register int i = 1; i <= m; ++i) {
    e[++tot].opt = 1;
    e[tot].u = read();
    e[tot].v = read();
    e[tot].c = read();
  }
  for (register int i = 1; i <= q; ++i) {
    char s[10];
    scanf("%s", s + 1);
    if (s[1] == '+')
      e[++tot].opt = 1, e[tot].u = read(), e[tot].v = read(), e[tot].c = read();
    else
      e[++tot].opt = 2, e[tot].u = read(), e[tot].v = read();
  }
  Solve();
  return 0;
}