char s[],a[1030][11];t,l,r,n;c(a,b){l=strcmp(a,b);}main(i){for(n=strlen(gets(s));t++<1<<n;l=0)for(i=r=n;i--;a[t][i]=s[t&1<<i?l++:--r]);for(qsort(a,t,11,c);t--;i+=!!strcmp(a[t+1],a[t]));t=!printf("%d",i);}