#include <bits/stdc++.h>
using namespace std;
#define int long long int
#define double long double
#define print(a) for(auto x : a) cout << x << " "; cout << endl
const int M = 1000000007;
const int N = 3e5+9;
const int INF = 2e9+1;
const int LINF = 2000000000000000001;
inline int power(int a, int b, int mod=M) {
int x = 1;
a %= mod;
while (b) {
if (b & 1) x = (x * a) % mod;
a = (a * a) % mod;
b >>= 1;
}
return x;
}
//_ ***************************** START Below *******************************
string a;
int consistency(int n){
vector<vector<int>> dp(n, vector<int>(n, 0));
for(int gap=0; gap<n; gap++){
for(int i=0, j=gap; j<n; i++, j++){
if(gap == 0){
dp[i][j] = 1;
}
else if(gap == 1){
if(a[i] == a[j]) dp[i][j] = 3;
else dp[i][j] = 2;
}
else{
if(a[i] == a[j]){
dp[i][j] = dp[i][j-1] + dp[i+1][j] + 1;
}
else{
dp[i][j] = dp[i][j-1] + dp[i+1][j] - dp[i+1][j-1];
}
}
}
}
return dp[0][n-1];
}
int practice(int n){
return 0;
}
void solve() {
cin >> a;;
int n = a.size();
cout << consistency(n) << endl;
}
int32_t main() {
ios_base::sync_with_stdio(0); cin.tie(0); cout.tie(0);
int t = 1;
// cin >> t;
while (t--) {
solve();
}
return 0;
}
I2luY2x1ZGUgPGJpdHMvc3RkYysrLmg+CnVzaW5nIG5hbWVzcGFjZSBzdGQ7CiNkZWZpbmUgaW50ICAgICAgICAgICAgICBsb25nIGxvbmcgaW50CiNkZWZpbmUgZG91YmxlICAgICAgICAgICBsb25nIGRvdWJsZQojZGVmaW5lIHByaW50KGEpICAgICAgICAgZm9yKGF1dG8geCA6IGEpIGNvdXQgPDwgeCA8PCAiICI7IGNvdXQgPDwgZW5kbAoKCmNvbnN0IGludCBNID0gMTAwMDAwMDAwNzsKY29uc3QgaW50IE4gPSAzZTUrOTsKY29uc3QgaW50IElORiA9IDJlOSsxOwpjb25zdCBpbnQgTElORiA9IDIwMDAwMDAwMDAwMDAwMDAwMDE7CgppbmxpbmUgaW50IHBvd2VyKGludCBhLCBpbnQgYiwgaW50IG1vZD1NKSB7CiAgICBpbnQgeCA9IDE7CiAgICBhICU9IG1vZDsKICAgIHdoaWxlIChiKSB7CiAgICAgICAgaWYgKGIgJiAxKSB4ID0gKHggKiBhKSAlIG1vZDsgCiAgICAgICAgYSA9IChhICogYSkgJSBtb2Q7CiAgICAgICAgYiA+Pj0gMTsKICAgIH0KICAgIHJldHVybiB4Owp9CgoKLy9fICoqKioqKioqKioqKioqKioqKioqKioqKioqKioqIFNUQVJUIEJlbG93ICoqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioKCgoKCnN0cmluZyBhOwoKaW50IGNvbnNpc3RlbmN5KGludCBuKXsKCQogICAgdmVjdG9yPHZlY3RvcjxpbnQ+PiBkcChuLCB2ZWN0b3I8aW50PihuLCAwKSk7CiAgICAKICAgIAogICAgZm9yKGludCBnYXA9MDsgZ2FwPG47IGdhcCsrKXsKICAgICAgICBmb3IoaW50IGk9MCwgaj1nYXA7IGo8bjsgaSsrLCBqKyspewogICAgICAgICAgICBpZihnYXAgPT0gMCl7CiAgICAgICAgICAgICAgICBkcFtpXVtqXSA9IDE7CiAgICAgICAgICAgIH0KICAgICAgICAgICAgZWxzZSBpZihnYXAgPT0gMSl7CiAgICAgICAgICAgICAgICBpZihhW2ldID09IGFbal0pIGRwW2ldW2pdID0gMzsKICAgICAgICAgICAgICAgIGVsc2UgZHBbaV1bal0gPSAyOwogICAgICAgICAgICB9CiAgICAgICAgICAgIGVsc2V7CiAgICAgICAgICAgICAgICBpZihhW2ldID09IGFbal0pewogICAgICAgICAgICAgICAgICAgIGRwW2ldW2pdID0gZHBbaV1bai0xXSArIGRwW2krMV1bal0gKyAxOwogICAgICAgICAgICAgICAgfQogICAgICAgICAgICAgICAgZWxzZXsKICAgICAgICAgICAgICAgICAgICBkcFtpXVtqXSA9IGRwW2ldW2otMV0gKyBkcFtpKzFdW2pdIC0gZHBbaSsxXVtqLTFdOwogICAgICAgICAgICAgICAgfQogICAgICAgICAgICB9CiAgICAgICAgfQogICAgfQogICAgCiAgICByZXR1cm4gZHBbMF1bbi0xXTsKCn0KCgoKCgoKCgoKCgoKCgoKaW50IHByYWN0aWNlKGludCBuKXsKCgogICAgcmV0dXJuIDA7Cn0KCgoKCgp2b2lkIHNvbHZlKCkgewogICAgCiAgICAKICAgIGNpbiA+PiBhOzsKICAgIAogICAgaW50IG4gPSBhLnNpemUoKTsKICAgIAogICAgY291dCA8PCBjb25zaXN0ZW5jeShuKSA8PCBlbmRsOwoKCn0KCgoKCgppbnQzMl90IG1haW4oKSB7CiAgICBpb3NfYmFzZTo6c3luY193aXRoX3N0ZGlvKDApOyBjaW4udGllKDApOyBjb3V0LnRpZSgwKTsKCiAgICBpbnQgdCA9IDE7CiAgICAvLyBjaW4gPj4gdDsKICAgIHdoaWxlICh0LS0pIHsKICAgICAgICBzb2x2ZSgpOwogICAgfQoKICAgIHJldHVybiAwOwp9