#include <stdio.h>
#include <string.h>

int iskaibun(char *s, int f, int t) {
	int i;
	for (i = 0; i <= t - f; i++) {
		if (s[f + i] != s[t - i]) return 0;
	}
	return 1;
}

int main() {
	char s[5001];
	scanf("%s", s);

	int len = strlen(s);
	int p1, p2, a, cnt = 0;

	for (p1 = 1; p1 <= len - 3; p1++) {
		for (p2 = 1; p2 <= len - 3; p2++) {
			for (a = 1; a <= len - 3; a++) {
				if (len - (p1 + p2 + a) < 1) continue;
				if (iskaibun(s, 0, p1 - 1) && 
					iskaibun(s, p1, p1 + p2 - 1) && 
					iskaibun(s, p1 + p2 + a, len - 1)) cnt++;
			}
		}
	}

	printf("%d\n", cnt);
	return 0;
}