Problem: You have a directed acyclic graph G, consisting of n vertexes, numbered from 0 to n - 1. The graph contains n edges numbered from 0 to n - 1. An edge with number i connects vertexes i and (i + 1) mod n, and it can be directed in either direction (from i to (i + 1) mod n, or vise versa).

Operation x mod y means taking the remainder after dividing number x by number y.

Let's call two vertexes u and v in graph G comparable if the graph contains a path either from u to v or from v to u. We'll assume that an antichain is a set of vertexes of graph G, where any two distinct vertexes are not comparable. The size of an antichain is the number of vertexes in the corresponding set. An antichain is maximum if the graph doesn't have antichains of a larger size.

Your task is to find the size of the maximum antichain in graph G.

Input

The first line contains the sequence of characters s0s1... sn - 1 (2 ≤ n ≤ 106), consisting of numbers zero and one. The length of the line (number n) corresponds to the number of vertexes and edges in graph G. If character si (i ≥ 0) equals 0, then the edge between vertexes i and (i + 1) mod n is directed from the i-th vertex to the (i + 1) mod n-th one, otherwise — to the opposite point.

It is guaranteed that the given graph is acyclic.

Output

Print a single integer — the size of the maximum antichain of graph G.

Examples

Input

001


Output

1


Input

110010


Output

3

Note

Consider the first test sample. The graph's G edges are: 0 → 1, 1 → 2, 0 → 2. We can choose the set of vertexes [0] as the maximum antichain. We cannot choose an antichain of larger size.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
struct EDGE {
  int to, next, len;
} e[2000010], ee[2000010];
int head[1000001], ehead[1000001], top, etop, n, in[1000001], cnt, vis[1000001],
    cntt[1000001];
queue<int> q;
void eadd(int u, int v) {
  ee[etop].to = v;
  ee[etop].next = ehead[u];
  ehead[u] = etop++;
}
void add(int u, int v) {
  in[v]++;
  e[top].to = v;
  e[top].next = head[u];
  head[u] = top++;
  eadd(v, u);
}
void dfs(int eid) {
  int i, s = e[eid].to;
  bool flag = 0;
  for (i = head[s]; ~i; i = e[i].next) {
    flag = 1;
    dfs(i);
  }
  if (flag)
    e[eid].len = e[head[s]].len + 1;
  else
    e[eid].len = 1;
}
void dfs1(int eid) {
  int i, s = e[eid].to;
  vis[s] = 1;
  for (i = head[s]; ~i; i = e[i].next) {
    dfs1(e[i].to);
  }
}
void print() {
  int i;
  for (i = 0; i < n; i++) {
    if (in[i]) continue;
    printf("i=%d,vis[i]=%d,cntt[i]=%d\n\n", i, vis[i], cntt[i]);
  }
}
void topo() {
  int i, j;
  for (i = 0; i < n; i++) {
    if (in[i] == 0) {
      for (j = head[i]; ~j; j = e[j].next) {
        dfs(j);
        if (e[j].len > 1) {
          cnt++;
          vis[i] = 1;
          dfs1(j);
        }
      }
    }
  }
  for (i = 0; i < n; i++) {
    if (in[i] == 0) {
      for (j = head[i]; ~j; j = e[j].next) {
        cntt[i] += !vis[e[j].to];
      }
      if (cntt[i] == 1 && !vis[i]) {
        q.push(i);
      }
    }
  }
  int s, t;
  while (!q.empty()) {
    s = q.front();
    q.pop();
    if (cntt[s] == 0) {
      vis[s] = 1;
      cnt++;
      continue;
    }
    for (i = head[s]; ~i; i = e[i].next) {
      t = e[i].to;
      if (vis[t]) continue;
      vis[s] = 1;
      vis[t] = 1;
      cntt[s] = 0;
      cnt++;
      for (j = ehead[t]; ~j; j = ee[j].next) {
        if (ee[j].to == s) continue;
        cntt[ee[j].to]--;
        if (cntt[ee[j].to] == 1 && !vis[ee[j].to]) q.push(ee[j].to);
      }
    }
  }
  for (i = 0; i < n; i++) {
    if (in[i] == 0) {
      if (!vis[i]) {
        if (!cntt[i]) {
          vis[i] = 1;
          cnt++;
        }
      }
    }
  }
  q = queue<int>();
  for (i = 0; i < n; i++) {
    if (in[i] == 0) {
      if (vis[i]) {
        if (cntt[i] == 1) {
          q.push(i);
        }
      }
    }
  }
  while (!q.empty()) {
    i = q.front();
    q.pop();
    if (cntt[i] == 0) continue;
    for (j = head[i]; ~j; j = e[j].next) {
      if (vis[e[j].to]) continue;
      t = e[j].to;
    }
    for (j = ehead[t]; ~j; j = ee[j].next) {
      if (ee[j].to == i) continue;
      s = ee[j].to;
    }
    if (vis[s]) {
      vis[t] = 1;
      cntt[s]--;
      cntt[i]--;
      cnt++;
    } else {
      if (cntt[s] != 2) {
        printf("Dblark AK IOI\n");
        return;
      }
      vis[s] = 1;
      vis[t] = 1;
      cnt++;
      cntt[s]--;
      cntt[i]--;
      q.push(s);
    }
  }
  for (i = 0; i < n; i++) {
    if (!in[i]) {
      if (!vis[i]) {
        if (cntt[i] != 2) {
          printf("Keywet AK IOI\n");
          return;
        }
        cnt++;
      }
    }
  }
}
int main() {
  memset(head, 255, sizeof(head));
  memset(ehead, 255, sizeof(ehead));
  int i;
  char s[1000100];
  scanf("%s", s);
  n = strlen(s);
  for (i = 0; i < n; i++) {
    if (s[i] == '0')
      add(i, (i + 1) % n);
    else
      add((i + 1) % n, i);
  }
  topo();
  printf("%d\n", cnt);
  return 0;
}