Problem: It's May in Flatland, and there are m days in this month. Despite the fact that May Holidays are canceled long time ago, employees of some software company still have a habit of taking short or long vacations in May.

Of course, not all managers of the company like this. There are n employees in the company that form a tree-like structure of subordination: each employee has a unique integer id i between 1 and n, and each employee with id i (except the head manager whose id is 1) has exactly one direct manager with id p_i. The structure of subordination is not cyclic, i.e. if we start moving from any employee to his direct manager, then we will eventually reach the head manager. We define that an employee u is a subordinate of an employee v, if v is a direct manager of u, or the direct manager of u is a subordinate of v. Let s_i be the number of subordinates the i-th employee has (for example, s_1 = n - 1, because all employees except himself are subordinates of the head manager).

Each employee i has a bearing limit of t_i, which is an integer between 0 and s_i. It denotes the maximum number of the subordinates of the i-th employee being on vacation at the same moment that he can bear. If at some moment strictly more than t_i subordinates of the i-th employee are on vacation, and the i-th employee himself is not on a vacation, he becomes displeased.

In each of the m days of May exactly one event of the following two types happens: either one employee leaves on a vacation at the beginning of the day, or one employee returns from a vacation in the beginning of the day. You know the sequence of events in the following m days. Your task is to compute for each of the m days the number of displeased employees on that day.

Input

The first line contains two integers n and m (2 ≤ n, m ≤ 10^5) — the number of employees in the company and the number of days in May.

The second line contains n - 1 integers p_2, p_3, …, p_n (1 ≤ p_i ≤ n), denoting the direct managers of employees.

The third line contains n integers t_1, t_2, …, t_n (0 ≤ t_i ≤ s_i), denoting the bearing limits of empoyees.

The fourth line contains m integers q_1, q_2, …, q_m (1 ≤ |q_i| ≤ n, q_i ≠ 0), denoting the events. If q_i is positive, then the employee with id q_i leaves for a vacation starting from this day, if q_i is negative, then the employee -q_i returns from a vacation starting from this day. In the beginning of May no employee is on vacation. It is guaranteed that if some employee leaves for a vacation, he is not on a vacation at the moment and vice versa.

Output

Print a sequence of m integers a_1, a_2, …, a_m, where a_i is the number of displeased employees on the i-th day.

Examples

Input

7 8
4 5 1 1 5 5
0 0 0 1 2 0 0
2 6 3 7 -2 4 -3 1


Output

1 1 1 2 2 2 1 0


Input

5 6
1 2 3 4
4 0 0 1 0
1 5 2 3 -5 -1


Output

0 2 1 0 0 0

Note

In the first sample test after employee with id 2 leaves for a vacation at the first day, the head manager with id 1 becomes displeased as he does not want any of his subordinates to go for a vacation. At the fourth day employee with id 5 becomes displeased as his last remaining employee with id 7 leaves for a vacation. At the fifth day employee with id 2 returns from the vacation, but it does not affect the number of displeased employees as the employees 5 and 1 are still displeased. At the sixth day employee with id 3 returns back from the vacation, preventing the employee with id 5 from being displeased and at the last day the head manager with id 1 leaves for a vacation, leaving the company without the displeased people at all.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
const int N = 100010, T = 800;
int n, m, tot, cnt, tp, ans, p[N], head[N], to[N], nxt[N], siz[N], son[N],
    topx[N], dep[N], f[N], t[N], dfn[N], rnk[N], q[N], w[N], clr[N], a[N],
    stk[N], ff[N], fhead[N], fnxt[N], fto[N], idx[N], e[N], ad[T * 2 + 10],
    ct[T * 2 + 10], pt[T * 2 + 10];
vector<pair<int, int> > fp[T * 2 + 10];
vector<int> tt[N * 2];
void add_edge(int u, int v) {
  nxt[++tot] = head[u];
  to[tot] = v;
  head[u] = tot;
  return;
}
void dfs1(int u) {
  siz[u] = 1;
  for (int i = head[u]; ~i; i = nxt[i]) {
    int v = to[i];
    dep[v] = dep[u] + 1;
    dfs1(v);
    siz[u] += siz[v];
    if (siz[v] > siz[son[u]]) son[u] = v;
  }
  return;
}
void dfs2(int u, int tpx) {
  rnk[dfn[u] = ++cnt] = u;
  topx[u] = tpx;
  if (!son[u]) return;
  dfs2(son[u], tpx);
  for (int i = head[u]; ~i; i = nxt[i])
    if (to[i] != son[u]) dfs2(to[i], to[i]);
  return;
}
int LCA(int x, int y) {
  while (topx[x] != topx[y]) {
    if (dep[topx[x]] < dep[topx[y]])
      y = f[topx[y]];
    else
      x = f[topx[x]];
  }
  return dep[x] < dep[y] ? x : y;
}
void dfs(int u) {
  w[u] = clr[u];
  for (int i = head[u]; ~i; i = nxt[i]) {
    int v = to[i];
    dfs(v);
    w[u] += w[v];
  }
  return;
}
bool cmp(int x, int y) { return dfn[x] < dfn[y]; }
void fadd_edge(int u, int v) {
  fnxt[++tot] = head[u];
  fto[tot] = v;
  fhead[u] = tot;
  ff[v] = u;
  e[v] = tot;
  for (int i = f[v]; i != u; i = f[i]) idx[i] = tot;
  return;
}
void build(int l, int r) {
  cnt = tp = tot = 0;
  for (int i = l; i <= r; i++) a[++cnt] = abs(q[i]);
  memset(idx, 0, sizeof(idx));
  a[++cnt] = 1;
  sort(a + 1, a + cnt + 1, cmp);
  cnt = unique(a + 1, a + cnt + 1) - a - 1;
  for (int i = 1; i <= cnt; i++) {
    if (tp <= 1)
      stk[++tp] = a[i];
    else {
      int lca = LCA(a[i], stk[tp]);
      if (lca == stk[tp])
        stk[++tp] = a[i];
      else {
        while (dfn[stk[tp]] > dfn[lca]) {
          if (dfn[stk[tp - 1]] > dfn[lca]) {
            fadd_edge(stk[tp - 1], stk[tp]);
            tp--;
          } else {
            fadd_edge(lca, stk[tp]);
            if (dfn[stk[tp - 1]] == dfn[lca])
              tp--;
            else
              stk[tp] = lca;
            stk[++tp] = a[i];
            break;
          }
        }
      }
    }
  }
  while (tp > 1) {
    fadd_edge(stk[tp - 1], stk[tp]);
    tp--;
  }
  return;
}
int main() {
  memset(head, -1, sizeof(head));
  scanf("%d%d", &n, &m);
  for (int i = 2; i <= n; i++) {
    scanf("%d", f + i);
    add_edge(f[i], i);
  }
  for (int i = 1; i <= n; i++) scanf("%d", t + i);
  dfs1(1);
  dfs2(1, 1);
  for (int i = 1; i <= m; i++) scanf("%d", q + i);
  for (int l = 1; l <= m; l += T) {
    int r = min(m, l + T - 1);
    dfs(1);
    build(l, r);
    for (int i = 1; i <= tot; i++) {
      ct[i] = -1;
      fp[i].clear();
    }
    int mini = 1e9, maxn = 0;
    for (int i = 1; i <= n; i++) {
      w[i] = t[i] - w[i];
      mini = min(mini, w[i]);
    }
    for (int i = 1; i <= n; i++) {
      tt[w[i] - mini].push_back(i);
      maxn = max(maxn, w[i] - mini);
    }
    ans = 0;
    for (int i = 0; i <= maxn; i++) {
      for (auto x : tt[i]) {
        if (!clr[x] && idx[x]) {
          if (ct[idx[x]] == -1 || fp[idx[x]][ct[idx[x]]].first != w[x]) {
            fp[idx[x]].push_back(make_pair(w[x], 0));
            ct[idx[x]]++;
          }
          fp[idx[x]][ct[idx[x]]].second++;
        } else {
          if (w[x] < 0 && !clr[x]) ans++;
        }
      }
    }
    for (int i = 1; i <= tot; i++) {
      pt[i] = -1;
      ad[i] = 0;
      while (pt[i] < ct[i] && fp[i][pt[i] + 1].first < 0) {
        pt[i]++;
        ans += fp[i][pt[i]].second;
      }
    }
    for (int i = l; i <= r; i++) {
      int type = 1;
      if (q[i] < 0) {
        type = 0;
        q[i] = -q[i];
      }
      if (type) {
        clr[q[i]] ^= 1;
        if (w[q[i]] < 0) ans--;
        for (int x = q[i]; x; x = ff[x]) {
          if (e[x]) {
            ad[e[x]]--;
            if (pt[e[x]] < ct[e[x]] &&
                fp[e[x]][pt[e[x]] + 1].first + ad[e[x]] < 0) {
              pt[e[x]]++;
              ans += fp[e[x]][pt[e[x]]].second;
            }
          }
          w[x]--;
          if (!clr[x] && w[x] == -1) ans++;
        }
      } else {
        clr[q[i]] ^= 1;
        if (w[q[i]] < 0) ans++;
        for (int x = q[i]; x; x = ff[x]) {
          if (e[x]) {
            ad[e[x]]++;
            if (pt[e[x]] > -1 && fp[e[x]][pt[e[x]]].first + ad[e[x]] >= 0) {
              ans -= fp[e[x]][pt[e[x]]].second;
              pt[e[x]]--;
            }
          }
          w[x]++;
          if (!clr[x] && w[x] == 0) ans--;
        }
      }
      printf("%d ", ans);
    }
    for (int i = 0; i <= maxn; i++) tt[i].clear();
  }
  return 0;
}