#include <iostream>
#include <fstream>
#define MAX 1000010

using namespace std;

int n,ansf,sz;
int ansi[MAX],ansp[MAX];
string s;
void veri(int ind){
  for(int j1=ind-ansi[ind],j2=ind+ansi[ind];j1>=1&&j2<=n&&s[j1]==s[j2];j1--,j2++)
    ansi[ind]++;
}
void verp(int ind){
  for(int j1=ind-ansi[ind],j2=ind+ansi[ind]+1;j1>=1&&j2<=n&&s[j1]==s[j2];j1--,j2++)
    ansi[ind]++;
}

int main()
{
    ifstream f ("pscpld.in");
    ofstream g ("pscpld.out");
    f>>s;n=s.size();s="!"+s;
    ansi[1]=1; ansp[1]=((s[1]==s[2])?1:0);
    ansf+=ansi[1]+ansp[1];
    for(int i=2;i<=n;i++){
      if(ansi[i]==0){
        sz=0;
        for(int j1=i,j2=i;j1>=1&&j2<=n&&s[j1]==s[j2];j1--,j2++,sz++);
        ansi[i]=sz;
        for(int j=1;j<=sz-1;j++){
          ansi[i+j]=min(ansi[i-j],sz-j);
          veri(i+j);
        }
      }
      if(ansp[i]==0){
        sz=0;
        for(int j1=i,j2=i+1;j1>=1&&j2<=n&&s[j1]==s[j2];j1--,j2++,sz++);
        ansp[i]=sz;
        for(int j=1;j<=sz-1;j++){
          ansi[i+j+1]=min(ansi[i-j],sz-j);
          veri(i+j+1);
        }
      }
      ansf+=ansi[i]+ansp[i];
    }
    //cout<<'\n'; for(int i=1;i<=n;i++)cout<<ansi[i]<<" ";
    //cout<<'\n'; for(int i=1;i<=n;i++)cout<<ansp[i]<<" ";
    g<<ansf<<'\n';
    f.close();
    g.close();
    return 0;
}