#include <bits/stdc++.h>
#define ll long long
#define ull unsigned ll

using namespace std;

const int maxn = 10004;
const int b1 = 31;
const int b2 = 37;

int n, m;
int s[maxn], t[maxn];
ull ps1[maxn], ps2[maxn], pt1[maxn], pt2[maxn];
unordered_map <ull, int> mp1;
ull pwb1[maxn], pwb2[maxn];
ll ans;

int f[maxn], cnt[maxn];
//babaa
void wok(int dlt)
{
    for(int i = 2; i < n; i ++)
    {
        int j = f[i - 1];
        while(j > 0 && (s[j + 1 + dlt] != s[i + dlt] || (i + dlt > n && (i + dlt - j <= n || j + dlt >= n))))
            j = f[j];
        if(s[j + 1 + dlt] == s[i + dlt])
            j ++;
        f[i] = j;
        cnt[i] = 0;
        if(j != 0) cnt[i] ++;
        cnt[i] += cnt[j];
        int l = i + dlt - n + 1;
        int r = dlt;
        if(l > 1) 
        {
            //cout<<l<<' '<<r<<' '<<cnt[i]<<' '<<i<<' '<<f[i]<<' '<<s[i + dlt]<<' '<<s[1 + dlt]<<' ';
            // for(int j = l; j <= r; j ++)
            //     putchar(s[j] + 'a' - 1);
            // cout<<endl;
            ans += cnt[i] * mp1[ps1[r] - ps1[l - 1] * pwb1[r - l + 1]];
            //cout<<ps1[r] - ps1[l - 1] * pwb1[r - l + 1]<<endl;
        }
    }
}

void work()
{
    mp1.clear();
    for(int i = 1; i <= m; i ++)
    {
        for(int j = 1; j <= i; j ++)
        {
            mp1[pt1[i] - pt1[j - 1] * pwb1[(i - j + 1)]] ++;
        }
    }
    for(int i = 1; i <= n; i ++)
        s[i + n] = s[i]; 
    for(int i = 1; i < n; i ++)
    {
        wok(i);
    }
}

signed main()
{
    char c = getchar();
    while('a' <= c && c <= 'z')
        s[++ n] = c - 'a' + 1, c = getchar();
    while(!('a' <= c && c <= 'z'))
        c = getchar();
    while('a' <= c && c <= 'z')
        t[++ m] = c - 'a' + 1, c = getchar();
    for(int i = 1; i <= n; i ++)
    {
        ps1[i] = ps1[i - 1] * b1 + s[i];
    }
    for(int i = 1; i <= m; i ++)
    {
        pt1[i] = pt1[i - 1] * b1 + t[i];
    }
    pwb1[0] = pwb2[0] = 1;
    for(int i = 1; i <= max(n, m); i ++)
    {
        pwb1[i] = 1ll * pwb1[i - 1] * b1;
    }
    work();
    //cout<<"-----"<<endl;
    swap(n, m);
    for(int i = 1; i <= max(n, m); i ++)
    {
        swap(s[i], t[i]);
        swap(ps1[i], pt1[i]);
    }
    work();
    for(int i = 1; i <= n; i ++)
    {
        for(int j = 1; j <= i; j ++)
        {
            ull hsh1 = ps1[i] - ps1[j - 1] * pwb1[(i - j + 1)];
            ans += mp1[hsh1];
        }
    }
    cout<<ans<<endl;
}