#610686 (C++17) No.430 文字列検索

• 問題: No.430 文字列検索
• ユーザー: Konton7
• 提出日時: 2021-01-29 20:51:40
• 言語: C++17 (gcc 12.3.0 + boost 1.83.0)
• 結果: AC
• 実行時間: 135 ms / 2,000 ms
• コード長: 18,660 bytes
• コンパイル時間: 2,586 ms
• コンパイル使用メモリ: 232,800 KB
• 実行使用メモリ: 5,376 KB
• 最終ジャッジ日時: 2024-11-10 00:52:59
• 合計ジャッジ時間: 3,819 ms
• ジャッジサーバーID （参考情報）: judge3 / judge5

入力	結果	実行時間; 実行使用メモリ
testcase_00	AC	2 ms; 5,248 KB
testcase_01	AC	69 ms; 5,376 KB
testcase_02	AC	135 ms; 5,248 KB
testcase_03	AC	27 ms; 5,248 KB
testcase_04	AC	1 ms; 5,248 KB
testcase_05	AC	2 ms; 5,248 KB
testcase_06	AC	2 ms; 5,248 KB
testcase_07	AC	1 ms; 5,248 KB
testcase_08	AC	7 ms; 5,248 KB
testcase_09	AC	1 ms; 5,248 KB
testcase_10	AC	2 ms; 5,248 KB
testcase_11	AC	74 ms; 5,248 KB
testcase_12	AC	76 ms; 5,248 KB
testcase_13	AC	73 ms; 5,248 KB
testcase_14	AC	83 ms; 5,248 KB
testcase_15	AC	84 ms; 5,248 KB
testcase_16	AC	68 ms; 5,248 KB
testcase_17	AC	80 ms; 5,248 KB

ソースコード

#include <bits/stdc++.h>
// #include <set>
// #include <map>
// #include <cmath>
// #include <deque>
// #include <vector>
// #include <iostream>
// #include <algorithm>

using namespace std;
using ll = long long;
using VI = vector<int>;
using VL = vector<ll>;
using VD = vector<double>;
using VS = vector<string>;
using VB = vector<bool>;
using VVB = vector<vector<bool>>;
using VVI = vector<VI>;
using VVL = vector<VL>;
using VVD = vector<VD>;
using VVVI = vector<VVI>;
using VVVL = vector<VVL>;
using VVVD = vector<VVD>;
using PII = std::pair<int, int>;
using VPII = std::vector<std::pair<int, int>>;
using PLL = std::pair<ll, ll>;
using VPLL = std::vector<std::pair<ll, ll>>;
using TI3 = std::tuple<int, int, int>;
using TI4 = std::tuple<int, int, int, int>;
using TL3 = std::tuple<ll, ll, ll>;
using TL4 = std::tuple<ll, ll, ll, ll>;

#define rep(i, n) for (int i = 0; i < (int)(n); i++)
#define repr(i, n) for (int i = (int)(n)-1; i >= 0; i--)
#define rep2(i, s, n) for (int i = (s); i < (int)(n); i++)
#define repr2(i, g, n) for (int i = (int)(n)-1; i >= (g); i--)
#define rep3(i, s, n, d) for (int i = (s); i < (int)(n); i += (d))
#define repr3(i, g, n, d) for (int i = (int)(n)-1; i >= (g); i -= (d))
#define allpt(v) (v).begin(), (v).end()
#define allpt_c(v) (v).cbegin(), (v).cend()
#define allpt_r(v) (v).rbegin(), (v).rend()
#define allpt_cr(v) (v).crbegin(), (v).crend()

const int mod1 = 1e9 + 7, mod2 = 998244353, mod3 = 1e9 + 9;
const int mod = mod1;
const ll inf = 1e18;
const int infint = 1e9;

const string wsp = " ";
const string tb = "\t";
const string rt = "\n";
const string alphabets = "abcdefghijklmnopqrstuvwxyz";

template <typename T>
void show1dvec(const vector<T> &v) {
    if (v.size() == 0) return;
    int n = v.size() - 1;
    rep(i, n) cout << v[i] << wsp;
    cout << v[n] << rt;
    return;
}

int get1dcoodinate(int w, int i, int j) { return i * w + j; }

template <typename T>
ostream &operator<<(ostream &os, const vector<T> &v) {
    if (v.size() == 0) return os;
    int n = v.size() - 1;
    rep(i, n) os << v[i] << wsp;
    os << v[n] << rt;
    return os;
}

template <typename T>
istream &operator>>(istream &is, vector<T> &v) {
    if (v.size() == 0) return is;
    int n = v.size();
    rep(i, n) is >> v[i];
    return is;
}

template <typename T>
ostream &operator<<(ostream &os, const vector<vector<T>> &v) {
    if (v.size() == 0) return os;
    int n = v.size();
    rep(i, n) os << v[i];
    return os;
}

template <typename T>
istream &operator>>(istream &is, vector<vector<T>> &v) {
    if (v.size() == 0) return is;
    int n = v.size();
    rep(i, n) is >> v[i];
    return is;
}

template <typename T, typename S>
istream &operator>>(istream &is, vector<pair<T, S>> &v) {
    if (v.size() == 0) return is;
    int n = v.size();
    rep(i, n) is >> v[i].first >> wsp >> v[i].second;
    return is;
}

template <typename T, typename S>
ostream &operator<<(ostream &os, const vector<pair<T, S>> &v) {
    if (v.size() == 0) return os;
    int n = v.size();
    rep(i, n) os << v[i].first << v[i].second << rt;
    return os;
}

void show2dvec(const vector<string> &v) {
    int n = v.size();
    rep(i, n) cout << v[i] << rt;
}

template <typename T>
void show2dvec(const vector<vector<T>> &v) {
    int n = v.size();
    rep(i, n) show1dvec(v[i]);
}

template <typename T>
void range_sort(vector<T> &arr, int l, int r) {
    sort(arr.begin() + l, arr.begin() + r);
}

template <typename T, typename S>
void show1dpair(const vector<pair<T, S>> &v) {
    int n = v.size();
    rep(i, n) cout << v[i].first << wsp << v[i].second << rt;
    return;
}

template <typename T, typename S>
void pairzip(const vector<pair<T, S>> &v, vector<T> &t, vector<T> &s) {
    int n = v.size();
    rep(i, n) {
        t.push_back(v[i].first);
        s.push_back(v[i].second);
    }
    return;
}

template <typename T>
void maxvec(vector<T> &v) {
    T s = v[0];
    int n = v.size();
    rep(i, n - 1) {
        if (s > v[i + 1]) {
            v[i + 1] = s;
        }
        s = v[i + 1];
    }
}

template <typename T, typename S>
bool myfind(T t, S s) {
    return find(t.cbegin(), t.cend(), s) != t.cend();
}

bool check(int y, int x, int h, int w) {
    return 0 <= y && y < h && 0 <= x && x < w;
}

bool iskadomatsu(int a, int b, int c) {
    return (a != b && b != c && c != a) &&
           ((a > b && b < c) || (a < b && b > c));
}

double euc_dist(PII a, PII b) {
    return sqrt(pow(a.first - b.first, 2) + pow(a.second - b.second, 2));
}

// VS split(string s, char c) {
//     VS ret;
//     string part;
//     s += c;
//     rep(i, s.length()) {
//         if (s[i] == c) {
//             if (part != "") ret.emplace_back(part);
//             part = "";
//         } else if (s[i] != c) {
//             part += s[i];
//         }
//     }
//     return ret;
// }

VS split(string s, char c, char d = ' ') {
    VS ret;
    // reverse(allpt(s));
    string part;
    s += c;
    rep(i, s.length()) {
        if (s[i] == c) {
            if (part != "") {
                string t;
                t += c;
                ret.emplace_back(t);
                ret.emplace_back(part);
            }
            part = "";
        } else if (s[i] == d) {
            if (part != "") {
                string t;
                t += d;
                ret.emplace_back(t);
                ret.emplace_back(part);
            }
            part = "";
        } else {
            part += s[i];
        }
    }
    return ret;
}

template <typename T, typename S, typename R>
ll pow_mod(T p, S q, R mod = 1ll) {
    ll ret = 1, r = p;
    while (q) {
        if (q % 2) ret *= r, ret %= mod;
        r = (r * r) % mod, q /= 2;
    }
    return ret % mod;
}

template <typename T, typename S>
ll pow_no_mod(T p, S q) {
    ll ret = 1, r = p;
    while (q) {
        if (q % 2) ret *= r;
        r = (r * r), q /= 2;
    }
    return ret;
}

void make_frac_tables(VL &frac_list, VL &frac_inv_list) {
    rep(i, frac_list.size() - 1) {
        frac_list[i + 1] *= frac_list[i] * (i + 1);
        frac_list[i + 1] %= mod;
        frac_inv_list[i + 1] *= frac_inv_list[i] * pow_mod(i + 1, mod - 2, mod);
        frac_inv_list[i + 1] %= mod;
    }
}

pair<VL, VL> make_frac_tables(int n) {
    VL frac_list(n + 1, 1), frac_inv_list(n + 1, 1);
    rep(i, n) {
        frac_list[i + 1] *= frac_list[i] * (i + 1);
        frac_list[i + 1] %= mod;
        frac_inv_list[i + 1] *= frac_inv_list[i] * pow_mod(i + 1, mod - 2, mod);
        frac_inv_list[i + 1] %= mod;
    }
    return make_pair(frac_list, frac_inv_list);
}

ll comb(int a, int b, const VL &frac_list, const VL &frac_inv_list) {
    if (a < b) return 0;
    if (b < 0) return 0;
    ll ret = frac_list[a];
    ret *= frac_inv_list[b];
    ret %= mod;
    ret *= frac_inv_list[a - b];
    ret %= mod;
    return ret;
}

struct vec2d {
    ll x;
    ll y;
    vec2d(ll _x, ll _y) {
        x = _x;
        y = _y;
    }
    ll dot(vec2d p) { return x * p.x + y * p.y; }
    vec2d diff(vec2d p) { return vec2d(x - p.x, y - p.y); }
};

struct node {
    int parent = -1;
    ll weight = 0;
    int depth = 0;
    int degree = 1;
    int subtree = 1;
    VPII children;
    VPII connect;
    node(int n) {
        parent = -1;
        weight = 0;
        depth = 0;
        degree = 0;
        subtree = 1;
        children;
        connect;
    }
};

struct graph {
    int _n;
    int root = 0;
    vector<node> nodes;
    graph(int n) {
        _n = n;
        rep(i, _n) nodes.emplace_back(node(_n));
    }
    void getconnect0_1() {
        int a, b;
        cin >> a >> b;
        nodes[a].connect.emplace_back(b, 0);
        nodes[b].connect.emplace_back(a, 0);
    }
    void getconnect0_2() {
        int a, b, c;
        cin >> a >> b >> c;
        nodes[a].connect.emplace_back(b, c);
        nodes[b].connect.emplace_back(a, c);
    }
    void getconnect1_1() {
        int a, b;
        cin >> a >> b;
        a--, b--;
        nodes[a].connect.emplace_back(b, 0);
        nodes[b].connect.emplace_back(a, 0);
    }
    void getconnect1_2() {
        int a, b, c;
        cin >> a >> b >> c;
        a--, b--;
        nodes[a].connect.emplace_back(b, c);
        nodes[b].connect.emplace_back(a, c);
    }
    void showparent() {
        rep(i, _n - 1) cout << nodes[i].parent << wsp;
        cout << nodes[_n - 1].parent << rt;
    }
    void showweight() {
        rep(i, _n - 1) cout << nodes[i].weight << wsp;
        cout << nodes[_n - 1].weight << rt;
    }
    void showsubtree() {
        rep(i, _n - 1) cout << nodes[i].subtree << wsp;
        cout << nodes[_n - 1].subtree << rt;
    }
    void showdepth() {
        rep(i, _n - 1) cout << nodes[i].depth << wsp;
        cout << nodes[_n - 1].depth << rt;
    }
};

struct point {
    int x;
    int y;
    point() {
        x = 0;
        y = 0;
    }
    point(int _x, int _y) {
        x = _x;
        y = _y;
    }
    void pointinput() {
        int _x, _y;
        cin >> _x >> _y;
        x = _x;
        y = _y;
    }
    void pointinv() { swap(x, y); }
};

double pointseuc(point a, point b) {
    ll ax = a.x, bx = b.x, ay = a.y, by = b.y;
    return sqrt(pow(ax - bx, 2) + pow(ay - by, 2));
}

ll pointseucsquare(point a, point b) {
    ll ax = a.x, bx = b.x, ay = a.y, by = b.y;
    return (ax - bx) * (ax - bx) + (ay - by) * (ay - by);
}

int pointsmanhattan(point a, point b) {
    return abs(a.x - b.x) + abs(a.y - b.y);
}

double dist_segment_point(TL3 segment, point p) {
    double a = get<0>(segment);
    double b = get<1>(segment);
    double c = get<2>(segment);
    return abs(a * p.x + b * p.y - c) / (a * a + b * b + c * c);
}

TL3 segment_parameter(point p, point q) {
    ll a, b, c;
    a = q.y - p.y;
    b = p.x - q.x;
    c = a * p.x + b * p.y;
    TL3 ret = (TL3){a, b, c};
    // cout << a << b << c << rt;
    return ret;
}

int cross_check(TL3 segment, point p) {
    ll a = get<0>(segment);
    ll b = get<1>(segment);
    ll c = get<2>(segment);

    auto f = a * p.x + b * p.y - c;
    int ret;
    if (f > 0) ret = 1;
    if (f == 0) ret = 0;
    if (f < 0) ret = -1;
    return ret;
}

void shave(vector<int> &v, int n) {
    if (n <= 1) return;
    vector<bool> w(n + 1, true);
    int x;
    w[0] = w[1] = false;
    rep2(i, 2, n + 1) {
        if (w[i]) {
            x = i * 2;
            while (x <= n) {
                w[x] = false;
                x += i;
            }
        }
    }
    rep(i, n + 1) if (w[i]) v.emplace_back(i);
}

template <typename T>
void coordinate_compress(vector<T> &x, map<T, int> &zip, int &xs) {
    sort(x.begin(), x.end());
    x.erase(unique(x.begin(), x.end()), x.end());
    xs = x.size();
    for (int i = 0; i < xs; i++) {
        zip[x[i]] = i;
    }
}

// ll getpalindrome(int l, int r, const string &s, VL &memo) {
//     if (r - l <= 1) return 1;
//     if (memo[l] != -1) return memo[l];
//     ll ret{1};
//     int n = (r - l) / 2;
//     string sl, sr;
//     rep(i, n) {
//         sl += s[l + i];
//         sr += s[r - 1 - i];
//         string rsr(i + 1, '0');
//         reverse_copy(allpt_c(sr), rsr.begin());
//         // cout << sl << wsp << sr << wsp << rsr << rt;
//         if (sl == rsr) {
//             ret += getpalindrome(l + i + 1, r - i - 1, s, memo);
//             ret %= mod;
//         }
//     }
//     memo[l] = ret;
//     return ret;
// }

void getpalindrome(int l, int r, int n, const string &s, VVB &memo) {
    if (r - l <= 1 || s[l] == s[r - 1]) {
        memo[l][r] = true;
        if (l > 0 && r < n) {
            getpalindrome(l - 1, r + 1, n, s, memo);
        }
    }
    return;
}

// void djcstra(graph graphs, int s, int t) {
//     const int n = graphs._n;
//     VL shortest(n, inf);
//     shortest[s] = 0;
//     priority_queue<pair<ll, int>> pq;
//     pq.push(make_pair(0, s));
//     while (!pq.empty()) {
//         auto [t, v] = pq.top();
//         pq.pop();
//         t = -t;
//         if (shortest[v] != t) continue;
//         for (auto [u, c] : graphs.nodes[v].connect) {
//             if (t + c < shortest[u]) {
//                 shortest[u] = t + c;
//                 pq.push(make_pair(-(t + c), u));
//             }
//         }
//     }
// }

// https://mametter.hatenablog.com/entry/20180130/p1#fn-c89519d1　を参考
// indused_sort saffix_arrayを求めるとき、lmsの辞書順ソートに用いる

VI indused_sort(const VI &s, int n, int charwidth, const VI &chartype,
                VI lms_seeds, VPII bin_range) {
    // reverse(allpt(lms_seeds));
    VI suffix_array(n, -1);
    suffix_array[0] = n - 1;
    for (auto itr = lms_seeds.crbegin(); itr != lms_seeds.crend(); itr++) {
        suffix_array[bin_range[s[*itr]].second] = *itr;
        bin_range[s[*itr]].second--;
    }

    // cout << suffix_array;

    rep(i, n) {
        auto si = suffix_array[i];
        if (si && chartype[si - 1] == 1) {
            suffix_array[bin_range[s[si - 1]].first] = si - 1;
            bin_range[s[si - 1]].first++;
        }
        if (chartype[si] == 3) {
            suffix_array[i] = -1;
            bin_range[s[si]].second++;
        }
        // cout << suffix_array;
    }

    // cout << suffix_array;

    repr(i, n) {
        if (i == 0) {
            suffix_array[i] = n - 1;
            continue;
        }
        auto si = suffix_array[i];
        if (si && chartype[si - 1] >= 2) {
            suffix_array[bin_range[s[si - 1]].second] = si - 1;
            bin_range[s[si - 1]].second--;
        }
        // cout << suffix_array;
    }
    return suffix_array;
}

VI sa_is(const VI &s, int charwidth) {
    int l{1}, r = 0, c = 0;
    int n = s.size(), last_lms = n;
    VI chartype(n, 2), word(charwidth, 0), lms_length(n, -1);
    VI suffix_array, lms_seeds;
    VPII bin_range(charwidth);
    if (n == 1) {
        return (VI){0};
    }
    repr(i, n - 1) {
        word[s[i]]++;
        if (i != n - 1) {
            if (s[i] > s[i + 1])
                chartype[i] = 1;
            else if (s[i] == s[i + 1])
                chartype[i] = chartype[i + 1];
        }
        if (chartype[i + 1] == 2 && chartype[i] == 1) {
            chartype[i + 1] = 3;
            lms_length[i + 1] = last_lms - i;
            last_lms = i + 1;
        }
    }
    lms_length[n - 1] = 1;

    rep(i, n) if (chartype[i] == 3) {
        lms_seeds.emplace_back(i);
        c++;
    }

    // cout << s << chartype << lms_length;

    rep(i, charwidth) {
        r += word[i];
        bin_range[i] = (PII){l, r};
        l = r + 1;
    }

    suffix_array =
        indused_sort(s, n, charwidth, chartype, lms_seeds, bin_range);

    VI lms_index, new_lms_number(n, -1), new_s;
    rep(i, n) if (chartype[suffix_array[i]] == 3) {
        lms_index.emplace_back(suffix_array[i]);
    }

    int x = 0, m = lms_index.size();
    new_lms_number[lms_index[0]] = x;
    rep(i, m - 1) {
        bool isdiffernt{false};
        int left_index = lms_index[i], right_index = lms_index[i + 1];
        if (lms_length[left_index] != lms_length[right_index])
            isdiffernt = true;
        else {
            rep(i, lms_length[left_index]) {
                if (s[left_index + i] != s[right_index + i]) {
                    isdiffernt = true;
                    break;
                }
            }
        }

        if (isdiffernt) ++x;
        new_lms_number[lms_index[i + 1]] = x;
    }

    rep(i, n) if (new_lms_number[i] >= 0) new_s.emplace_back(new_lms_number[i]);
    // cout << "lms_index: " << lms_index << "new_s: " << new_s;

    new_s = sa_is(new_s, x + 1);

    // cout << "lms_index: " << lms_index << "new_s: " << new_s;

    // cout << "new_s: " << new_s;
    // cout << "new_s.size(): " << new_s.size() << rt;
    // cout << "lms_seeds.size(): " << lms_seeds.size() << rt;

    VI new_lms_seeds(new_s.size());
    rep(i, new_s.size()) { new_lms_seeds[i] = lms_seeds[new_s[i]]; }
    lms_seeds = new_lms_seeds;
    // cout << lms_seeds;

    suffix_array =
        indused_sort(s, n, charwidth, chartype, lms_seeds, bin_range);

    // cout << suffix_array << lms_seeds;
    return suffix_array;
}

// #define DEBUG

int main() {
    cin.tie(0);
    ios::sync_with_stdio(false);
    // リアクティブ問題のときはコメントアウト

#ifdef DEBUG
    cout << "DEBUG MODE" << endl;
    // ifstream in("input.txt");                             // for debug
    // cin.rdbuf(in.rdbuf());                                // for debug
    chrono::system_clock::time_point timestart, timeend;  // for debug
    timestart = std::chrono::system_clock::now();         // for debug

#endif

    string input, t;
    VI s;
    cin >> input;

    for (auto c : input) s.emplace_back(c);
    int charwidth = 256;  // アルファベットなら27以上、階乗ならn + 1以上
    s.emplace_back(0);
    auto sa = sa_is(s, charwidth);

    input += '$';
    int n = input.length();
    // rep2(i, 1, n) cout << i << wsp << sa[i] << wsp
    //                    << input.substr(sa[i], n - sa[i]) << wsp
    //                    << (input.substr(sa[i], n - sa[i]) >=
    //                        input.substr(sa[i - 1], n - sa[i - 1]))
    //                    << rt;

    int ok, ng, mid, l, r, q;
    ll ans{0};
    cin >> q;
    rep(_, q) {
        cin >> t;
        ng = 0, ok = n;
        // cout << t << rt;
        while (ok - ng > 1) {
            mid = (ok + ng) / 2;
            // cout << input.substr(sa[mid], n - sa[mid]) << rt;
            if (input.substr(sa[mid], n - sa[mid]) < t) {
                ng = mid;
            } else {
                ok = mid;
            }
            // cout << (VI){ok, ng};
        }

        l = ok;
        --ok, ng = n;
        while (ng - ok > 1) {
            mid = (ok + ng) / 2;
            if (t.length() > n - sa[mid]) {
                ng = mid;
                continue;
            }
            // cout << input.substr(sa[mid], t.length()) << rt;
            if (input.substr(sa[mid], t.length()) == t) {
                ok = mid;
            } else {
                ng = mid;
            }
            // cout << (VI){ok, ng};
        }
        r = ok + 1;
        ans += r - l;
    }

    cout << ans << rt;

    // int error = 0;
    // rep2(i, 1, input.size()) {
    //     error += (input.substr(sa[i], input.length() - sa[i]) <
    //               input.substr(sa[i - 1], input.length() - sa[i - 1]));
    //     if (error) cout << i << rt;
    // }
    // cout << error << rt;

#ifdef DEBUG
    timeend = chrono::system_clock::now();
    auto elapsed =
        chrono::duration_cast<chrono::milliseconds>(timeend - timestart)
            .count();
    cout << "Time is " << elapsed << "ms" << std::endl;
#endif

    return 0;
}