#include #include #include using namespace std; using namespace __gnu_pbds; #define fi first #define se second #define mp make_pair #define pb push_back #define fbo find_by_order #define ook order_of_key typedef long long ll; typedef pair ii; typedef vector vi; typedef long double ld; typedef tree, rb_tree_tag, tree_order_statistics_node_update> pbds; typedef set::iterator sit; typedef map::iterator mit; const ll MOD = 3000003959; const int ansMOD=int(1e9+7); const int C = 2017; ll add(ll a, ll b) { a+=b; while(a>=MOD) a-=MOD; return a; } ll add2(ll a, ll b) { a+=b; while(a>=ansMOD) a-=ansMOD; return a; } ll multbig(ll a, ll b) { ll r=0; while(b) { if(b&1) r=add(r,a); a=add(a,a); b>>=1; } return r; } ll mult(ll a, ll b) { ll ans=(a*b)%MOD; if(ans<0) ans+=MOD; return ans; } ll hsh(string &s) { ll ans=0; for(int i=int(s.length())-1;i>=0;i--) { ans=mult(ans,C); ans+=s[i]; while(ans>=MOD) ans-=MOD; } return ans; } ll modpow(ll a, ll b) { ll r=1; while(b) { if(b&1) r=mult(r,a); a=mult(a,a); b>>=1; } return r; } ll inv(ll a) { return modpow(a,MOD-2); } ll ipowC[111111]; ll dp[111111]; ll pre[111111]; ll powC[111111]; ll get(int l, int r) { if(l==0) return pre[r]; else return mult(add(pre[r],MOD-pre[l-1]),ipowC[l]); } int main() { ios_base::sync_with_stdio(0); cin.tie(0); powC[0]=1; ipowC[0]=1; ipowC[1]=inv(C); powC[1]=C; for(int i=2;i<=100001;i++) { powC[i]=mult(powC[i-1],C); ipowC[i]=mult(ipowC[i-1],ipowC[1]); } string s; cin>>s; for(int i=0;i0) pre[i]=add(pre[i],pre[i-1]); } int n=s.length(); if(n%2==0) { dp[(n-1)/2] = 1 + (s[n/2-1]==s[n/2]); } else { dp[(n-1)/2] = 1; } dp[(n+1)/2] = 1; for(int i=(n-3)/2;i>=0;i--) { dp[i] = 1; int l = i; int r = n - 1 - i; for(int j=l;j<=(n-1)/2;j++) { if(j>=r-(j-l)) break; if(get(l,j)==get(r-(j-l),r)) { dp[i]=add2(dp[i], dp[j+1]); } } //cerr<