#include <bits/stdc++.h>
#define rep(i, n) for (lli i = 0; i < (n); i++)
#define rrep(i, n) for (lli i = (n)-1; i >= 0; i--)
using namespace std;
using lli = long long int;
string s;
lli mod = 1e9 + 7;
int n;
lli base[2] = {97, 103};
lli p[2] = {(lli)1e9 + 7, (lli)1e9 + 9};
lli dp[10005][10005] = {};
int hash_[10005][10005][2] = {};
void fill()
{
    // hash [l,r)
    rep(i, n)
    {
        for (int j = i; j < n; j++) {
            rep(k, 2)
                hash_[i][j + 1][k]
                = int((lli)base[k] * (lli)hash_[i][j][k] + s[j]) % p[k];
        }
    }
}
lli f(lli l, lli r)
{
    lli ll = l, rr = r;
    if (l >= r)
        return 0;
    //cout << l << " " << r << endl;
    if (dp[l][r] != 0)
        return dp[l][r];
    dp[l][r] = 1;
    rep(i, n)
    {

        if (ll >= rr) {
            break;
        }
        // s l..ll ==  s rr .. r
        bool flag = true;
        rep(k, 2)
        {
            flag &= (hash_[l][ll + 1][k] == hash_[rr - 1][r][k]);
        }
        if (flag)
            dp[l][r] += f(ll + 1, rr - 1);
        dp[l][r] %= mod;

        ll++, rr--;
    }
    return dp[l][r];
}
int main()
{
    cin >> s;
    n = s.size();
    fill();
    // cout << hash_[0][3][1] << endl;
    // cout << hash_[6][9][1] << endl;

    cout << f(0, n) << endl;
}