#include <bits/stdc++.h>
using namespace std;
const long long int M = (1ll << 32) - 1;
const long long int N = 1e5 + 1;
long long int power(long long int x, long long int y, long long int M = ::M) {
  long long int ans = 1;
  while (y) {
    if (y & 1) ans = (ans * x);
    y >>= 1LL;
    x = (x * x);
  }
  return ans;
}
long long int add(long long int a, long long int b) {
  return ((a % M + b % M) % M);
}
long long int sub(long long int a, long long int b) {
  return ((a % M - b % M + M) % M);
}
long long int mul(long long int a, long long int b) {
  return (((a % M) * (b % M)) % M);
}
long long int divi(long long int a, long long int b) {
  return (mul(a, power(b, M - 2)) % M);
}
inline void solve() {
  int arr[26];
  for (int i = 0; i < 26; i++) {
    cin >> arr[i];
  }
  string s;
  cin >> s;
  int n = (int)s.size();
  map<long long int, long long int> dp[26];
  map<long long int, set<int>> sumdp;
  long long int ans = 0;
  long long int sum = 0;
  for (int i = 0; i < n - 1; i++) {
    sum += arr[s[i] - 'a'];
    ans += dp[s[i + 1] - 'a'][sum];
    dp[s[i] - 'a'][sum]++;
  }
  for (int i = 0; i < 26; i++) {
    for (int j = 0; j < n - 1; j++) {
      if (s[j] - 'a' == i && s[j] == s[j + 1]) ans++;
    }
  }
  cout << ans;
}
int main() {
  ios_base::sync_with_stdio(false);
  cin.tie(NULL);
  ;
  int t;
  t = 1;
  while (t--) {
    solve();
  }
}
