#define _USE_MATH_DEFINES #include using namespace std; #define FOR(i,m,n) for(int i=(m);i<(n);++i) #define REP(i,n) FOR(i,0,n) #define ALL(v) (v).begin(),(v).end() using ll = long long; constexpr int INF = 0x3f3f3f3f; constexpr long long LINF = 0x3f3f3f3f3f3f3f3fLL; constexpr double EPS = 1e-8; constexpr int MOD = 998244353; // constexpr int MOD = 1000000007; constexpr int DY4[]{1, 0, -1, 0}, DX4[]{0, -1, 0, 1}; constexpr int DY8[]{1, 1, 0, -1, -1, -1, 0, 1}; constexpr int DX8[]{0, -1, -1, -1, 0, 1, 1, 1}; template inline bool chmax(T& a, U b) { return a < b ? (a = b, true) : false; } template inline bool chmin(T& a, U b) { return a > b ? (a = b, true) : false; } struct IOSetup { IOSetup() { std::cin.tie(nullptr); std::ios_base::sync_with_stdio(false); std::cout << fixed << setprecision(20); } } iosetup; template struct MInt { unsigned int v; MInt() : v(0) {} MInt(const long long x) : v(x >= 0 ? x % M : x % M + M) {} static constexpr int get_mod() { return M; } static void set_mod(const int divisor) { assert(divisor == M); } static void init(const int x = 10000000) { inv(x, true); fact(x); fact_inv(x); } static MInt inv(const int n, const bool init = false) { // assert(0 <= n && n < M && std::__gcd(n, M) == 1); static std::vector inverse{0, 1}; const int prev = inverse.size(); if (n < prev) { return inverse[n]; } else if (init) { // "n!" and "M" must be disjoint. inverse.resize(n + 1); for (int i = prev; i <= n; ++i) { inverse[i] = -inverse[M % i] * (M / i); } return inverse[n]; } int u = 1, v = 0; for (unsigned int a = n, b = M; b;) { const unsigned int q = a / b; std::swap(a -= q * b, b); std::swap(u -= q * v, v); } return u; } static MInt fact(const int n) { static std::vector factorial{1}; const int prev = factorial.size(); if (n >= prev) { factorial.resize(n + 1); for (int i = prev; i <= n; ++i) { factorial[i] = factorial[i - 1] * i; } } return factorial[n]; } static MInt fact_inv(const int n) { static std::vector f_inv{1}; const int prev = f_inv.size(); if (n >= prev) { f_inv.resize(n + 1); f_inv[n] = inv(fact(n).v); for (int i = n; i > prev; --i) { f_inv[i - 1] = f_inv[i] * i; } } return f_inv[n]; } static MInt nCk(const int n, const int k) { if (n < 0 || n < k || k < 0) return 0; return fact(n) * (n - k < k ? fact_inv(k) * fact_inv(n - k) : fact_inv(n - k) * fact_inv(k)); } static MInt nPk(const int n, const int k) { return n < 0 || n < k || k < 0 ? 0 : fact(n) * fact_inv(n - k); } static MInt nHk(const int n, const int k) { return n < 0 || k < 0 ? 0 : (k == 0 ? 1 : nCk(n + k - 1, k)); } static MInt large_nCk(long long n, const int k) { if (n < 0 || n < k || k < 0) return 0; inv(k, true); MInt res = 1; for (int i = 1; i <= k; ++i) { res *= inv(i) * n--; } return res; } MInt pow(long long exponent) const { MInt res = 1, tmp = *this; for (; exponent > 0; exponent >>= 1) { if (exponent & 1) res *= tmp; tmp *= tmp; } return res; } MInt& operator+=(const MInt& x) { if (static_cast(v += x.v) >= M) v -= M; return *this; } MInt& operator-=(const MInt& x) { if (static_cast(v += M - x.v) >= M) v -= M; return *this; } MInt& operator*=(const MInt& x) { v = static_cast(v) * x.v % M; return *this; } MInt& operator/=(const MInt& x) { return *this *= inv(x.v); } bool operator==(const MInt& x) const { return v == x.v; } bool operator!=(const MInt& x) const { return v != x.v; } bool operator<(const MInt& x) const { return v < x.v; } bool operator<=(const MInt& x) const { return v <= x.v; } bool operator>(const MInt& x) const { return v > x.v; } bool operator>=(const MInt& x) const { return v >= x.v; } MInt& operator++() { if (static_cast(++v) == M) v = 0; return *this; } MInt operator++(int) { const MInt res = *this; ++*this; return res; } MInt& operator--() { v = (v == 0 ? M - 1 : v - 1); return *this; } MInt operator--(int) { const MInt res = *this; --*this; return res; } MInt operator+() const { return *this; } MInt operator-() const { return MInt(v ? M - v : 0); } MInt operator+(const MInt& x) const { return MInt(*this) += x; } MInt operator-(const MInt& x) const { return MInt(*this) -= x; } MInt operator*(const MInt& x) const { return MInt(*this) *= x; } MInt operator/(const MInt& x) const { return MInt(*this) /= x; } friend std::ostream& operator<<(std::ostream& os, const MInt& x) { return os << x.v; } friend std::istream& operator>>(std::istream& is, MInt& x) { long long v; is >> v; x = MInt(v); return is; } }; using ModInt = MInt; template std::vector z_algorithm(const T &s) { const int n = s.size(); std::vector res(n, 0); for (int i = 1, j = 0; i < n; ++i) { if (i + res[i - j] < j + res[j]) { res[i] = res[i - j]; } else { res[i] = std::max(j + res[j] - i, 0); while (i + res[i] < n && s[i + res[i]] == s[res[i]]) ++res[i]; j = i; } } res[0] = n; return res; } int main() { int n; string t; cin >> n >> t; const int l = t.length(); vector s(n); vector j(n), k(n); REP(i, n) { cin >> s[i]; if (s[i] == "~") cin >> j[i] >> k[i], --j[i], --k[i]; } vector frnt(n), bck(n); vector> match_frnt(n), match_bck(n); REP(i, n) { if (s[i] == "~") { frnt[i] = frnt[j[i]] + frnt[k[i]]; bck[i] = bck[j[i]] + bck[k[i]]; // s[i] = s[j[i]] + s[k[i]]; } else { frnt[i] = bck[i] = s[i]; } if (frnt[i].length() > l) frnt[i].resize(l); if (bck[i].length() > l) bck[i] = bck[i].substr(bck[i].length() - l); } REP(i, n) { const vector z_frnt = z_algorithm(frnt[i] + '$' + t); const int frnt_len = frnt[i].length(); FOR(j, max(l - frnt_len, 1), l) { if (z_frnt[frnt_len + 1 + j] == l - j) match_frnt[i].emplace(l - j); } // cout << i << ':'; // for (const int e : match_frnt[i]) cout << ' ' << e; // cout << '\n'; } reverse(ALL(t)); REP(i, n) { reverse(ALL(bck[i])); const vector z_bck = z_algorithm(bck[i] + '$' + t); const int bck_len = bck[i].length(); FOR(j, max(l - bck_len, 1), l) { if (z_bck[bck_len + 1 + j] == l - j) match_bck[i].emplace(l - j); } } reverse(ALL(t)); // REP(i, n) cout << frnt[i] << ' ' << bck[i] << '\n'; vector dp(n, 0); REP(i, n) { if (s[i] == "~") { dp[i] = dp[j[i]] + dp[k[i]]; for (const int f : match_bck[j[i]]) { if (match_frnt[k[i]].count(l - f)) ++dp[i]; } } else { const vector z = z_algorithm(t + '$' + s[i]); // REP(j, z.size()) cout << z[j] << " \n"[j + 1 == z.size()]; FOR(j, l + 1, z.size()) { if (z[j] == l) ++dp[i]; } } } // REP(i, n) cout << dp[i] << " \n"[i + 1 == n]; cout << dp[n - 1] << '\n'; return 0; }