#include <float.h>
#include <limits.h>
#include <math.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <time.h>

// 内部定数
#define D_MOD			1000000007								// 除数(10の9乗+7)
#define D_CHAR_MAX		10005									// 最大文字数

// 内部構造体 - 分解情報
typedef struct Div {
	int miNo;													// 位置
	int miLen;													// 長さ
	int miPCnt;													// パターン数
} Div;

// 内部変数
static FILE *szpFpI;											// 入力
static char sc1Str[D_CHAR_MAX];									// 文字列
static int siLen;												// 文字列長
static Div sz1Div[D_CHAR_MAX / 2];								// 分解
static int siDCnt;												// 分解数

// 内部変数 - テスト用
#ifdef D_TEST
	static int siRes;
	static FILE *szpFpA;
	static int siTNo;
#endif

// 出力
int
fOut(
	char *pcpLine				// <I> １行
)
{
	char lc1Buf[1024];

#ifdef D_TEST
	fgets(lc1Buf, sizeof(lc1Buf), szpFpA);
	if (strcmp(lc1Buf, pcpLine)) {
		siRes = -1;
	}
#else
	printf("%s", pcpLine);
#endif

	return 0;
}

// 改行カット
// 戻り値：文字数
int
fCutCrLf(
	char *pcpStr				// <I> 文字列
)
{
	int i;

	for (i = 0; pcpStr[i] != '\0'; i++) {
		if (pcpStr[i] == '\n') {
			pcpStr[i] = '\0';
			break;
		}
	}

	return i;
}

// 文字列分解
int
fDiv(
)
{
	int liRLast = siLen / 2 + siLen % 2;
	int liLNo, liRNo, liLen;

	// 左側位置
	for (liLNo = 0; liLNo < siLen / 2; ) {

		// 右側位置
		for (liRNo = siLen - liLNo - 1; liRNo >= liRLast; liRNo--) {

			// 一致チェック
			liLen = siLen - liLNo - liRNo;
			if (!strncmp(&sc1Str[liLNo], &sc1Str[liRNo], liLen)) {

				// 文字列分解
				sz1Div[siDCnt].miNo = liLNo;
				sz1Div[siDCnt].miLen = liLen;
				siDCnt++;
				break;
			}
		}
		if (liRNo < liRLast) {
			break;
		}

		// 次の位置へ
		liLNo += liLen;
	}

	return 0;
}

// 実行メイン
int
fMain(
)
{
	int i;

	// 文字列 - 取得
	fgets(sc1Str, sizeof(sc1Str), szpFpI);
	siLen = fCutCrLf(sc1Str);

	// 分解
	fDiv();

	// パターン数 - セット
	sz1Div[0].miPCnt = 1;
	for (i = 1; i < siDCnt; i++) {
		sz1Div[i].miPCnt = sz1Div[i - 1].miPCnt;
		if (sz1Div[i].miLen == sz1Div[i - 1].miLen) {
			if (!strncmp(&sc1Str[sz1Div[i].miNo], &sc1Str[sz1Div[i - 1].miNo], sz1Div[i].miLen)) {
				sz1Div[i].miPCnt = sz1Div[i - 1].miPCnt * 2;
				sz1Div[i].miPCnt %= D_MOD;
			}
		}
	}

	// パターン数 - 合計
	int liSum = 1;
	for (i = 0; i < siDCnt; i++) {
		liSum += sz1Div[i].miPCnt;
		liSum %= D_MOD;
	}

	return liSum;
}

// １回実行
int
fOne(
)
{
	int liRet;
	char lc1Buf[1024];

	// データ - 初期化
	siDCnt = 0;													// 分解数

	// 入力 - セット
#ifdef D_TEST
	sprintf(lc1Buf, ".\\Test\\T%d.txt", siTNo);
	szpFpI = fopen(lc1Buf, "r");
	sprintf(lc1Buf, ".\\Test\\A%d.txt", siTNo);
	szpFpA = fopen(lc1Buf, "r");
	siRes = 0;
#else
	szpFpI = stdin;
#endif

	// 実行メイン
	liRet = fMain();

	// 出力
	sprintf(lc1Buf, "%d\n", liRet);
	fOut(lc1Buf);

	// 残データ有無
#ifdef D_TEST
	lc1Buf[0] = '\0';
	fgets(lc1Buf, sizeof(lc1Buf), szpFpA);
	if (strcmp(lc1Buf, "")) {
		siRes = -1;
	}
#endif

	// テストファイルクローズ
#ifdef D_TEST
	fclose(szpFpI);
	fclose(szpFpA);
#endif

	// テスト結果
#ifdef D_TEST
	if (siRes == 0) {
		printf("OK %d\n", siTNo);
	}
	else {
		printf("NG %d\n", siTNo);
	}
#endif

	return 0;
}

// プログラム開始
int
main()
{

#ifdef D_TEST
	int i;
	for (i = D_TEST_SNO; i <= D_TEST_ENO; i++) {
		siTNo = i;
		fOne();
	}
#else
	fOne();
#endif

	return 0;
}