#include <string.h>
#include <algorithm>
#include <array>
#include <bitset>
#include <cassert>
#include <cfloat>
#include <climits>
#include <cmath>
#include <complex>
#include <ctime>
#include <deque>
#include <fstream>
#include <functional>
#include <iomanip>
#include <iostream>
#include <iterator>
#include <list>
#include <map>
#include <memory>
#include <queue>
#include <random>
#include <set>
#include <stack>
#include <string>
#include <unordered_map>
#include <unordered_set>
#include <utility>
#include <vector>
using namespace std;

vector<int> Z_algorithm(string S) {
    vector<int>Z(S.size());
    Z[0] = S.size();
    int i = 1,j = 0;
    while(i < S.size()) {
        while(i+j < S.size() && S[i+j] == S[j]) {
            j++;
        }
        Z[i] = j;
        if(j == 0) {
            i++;
            continue;
        }
        int k = 1;
        while(k+Z[k] < j) {
            Z[i+k] = Z[k];
            k++;
        }
        i += k;
        j -= k;
    }
    return Z;
}

int cnt[5050][5050];

long long solve(string s,string t,bool f) {
    for(int i = 0; i <= t.size(); i++) {
        for(int j = 0; j <= t.size(); j++) {
            cnt[i][j] = 0;
        }
    }
    for(int i = 0; i < t.size(); i++) {
        string now = t.substr(i,t.size()-i);
        auto a = Z_algorithm(now);
        for(int j = 2; j < a.size(); j++) {
            if(!a[j]) continue;
            cnt[i+1][i+j]++;
            int nxt = min(i+j,i+a[j]+1);
            cnt[nxt][i+j]--;
        }
    }
    for(int i = 0; i <= t.size(); i++) {
        for(int j = 0; j < t.size(); j++) {
            cnt[j+1][i] += cnt[j][i];
        }
    }
    for(int i = 0; i < t.size(); i++) {
        for(int j = 0; j < t.size(); j++) {
            cnt[i][j+1] += cnt[i][j];
        }
    }
    long long ans = 0;
    string r = s+t;
    for(int i = 0; i < s.size(); i++) {
        string now = r.substr(i,r.size()-i);
        auto a = Z_algorithm(now);
        for(int j = s.size()-i; j < a.size(); j++) {
            if(!a[j]) continue;
            a[j] = min(a[j],(int)s.size()-i);
            if(f) {
                ans += a[j];
            }
            ans += cnt[i+j-s.size()][i+j-s.size()+a[j]];
        }
    }
    return ans;
}

int main() {
    ios::sync_with_stdio(false);
    cin.tie(nullptr);
    string s,t;
    cin >> s >> t;
    long long ans = 0;
    ans += solve(s,t,true);
    reverse(s.begin(),s.end());
    reverse(t.begin(),t.end());
    ans += solve(t,s,false);
    cout << ans << "\n";
}