#include<bits/stdc++.h>
using namespace std;
const int N=5005;
int lcp[N][N],lcpr[N][N];
int cnt[N][N];
long long sum[N][N];
long long calc(string s,string t)
{
    int n=s.size(),m=t.size();
    s=" "+s;
    t=" "+t;
    for(int i=0;i<=max(n,m)+1;i++)
        for(int j=0;j<=max(n,m)+1;j++)
            lcp[i][j]=lcpr[i][j]=cnt[i][j]=sum[i][j]=0;
    for(int i=n;i>=1;i--)
        for(int j=n;j>=1;j--)
            if(s[i]==s[j]) lcp[i][j]=lcp[i+1][j+1]+1;
            else lcp[i][j]=0;
    for(int i=1;i<=n;i++)
        for(int j=1;j<=m;j++)
            if(s[i]==t[j]) lcpr[i][j]=lcpr[i-1][j-1]+1;
            else lcpr[i][j]=0;
    for(int i=1;i<=n;i++)
    {
        for(int j=1;j<=m;j++)
            cnt[i][lcpr[i][j]]++;
        for(int j=max(n,m);j>=1;j--)
            cnt[i][j]+=cnt[i][j+1];
        for(int j=1;j<=max(n,m);j++)
            sum[i][j]=sum[i][j-1]+cnt[i][j];
    }
    long long res=0;
    for(int i=1;i<=n;i++)
        for(int j=i+2;j<=n;j++)
            if(s[i]==s[j])
            {
                int mxa=min(lcp[i][j],j-i-1);
                res+=sum[j-1][j-i-1]-sum[j-1][j-i-mxa-1];
            }
    return res;
}
int main()
{
    ios::sync_with_stdio(false);
    cin.tie(nullptr),cout.tie(nullptr);
    string s,t;
    cin>>s;
    cin>>t;
    long long ans=0;
    ans+=calc(s,t);
    string ss=s,tt=t;
    reverse(ss.begin(),ss.end());
    reverse(tt.begin(),tt.end());
    ans+=calc(tt,ss);
    int n=s.size(),m=t.size();
    s=" "+s;
    t=" "+t;
    for(int i=0;i<=max(n,m)+1;i++)
        for(int j=0;j<=max(n,m)+1;j++)
            lcpr[i][j]=0;
    for(int i=1;i<=n;i++)
        for(int j=1;j<=m;j++)
            if(s[i]==t[j]) lcpr[i][j]=lcpr[i-1][j-1]+1;
            else lcpr[i][j]=0;
    for(int i=1;i<=n;i++)
        for(int j=1;j<=m;j++)
            ans+=lcpr[i][j];
    cout<<ans;
    return 0;
}