while 1:
 s=raw_input();c=i=0
 while-1<i<len(s):c+=1;i+=ord(s[i])%3*c-c
 print~i/-i