Problem: When Sasha was studying in the seventh grade, he started listening to music a lot. In order to evaluate which songs he likes more, he introduced the notion of the song's prettiness. The title of the song is a word consisting of uppercase Latin letters. The prettiness of the song is the prettiness of its title.

Let's define the simple prettiness of a word as the ratio of the number of vowels in the word to the number of all letters in the word.

Let's define the prettiness of a word as the sum of simple prettiness of all the substrings of the word.

More formally, let's define the function vowel(c) which is equal to 1, if c is a vowel, and to 0 otherwise. Let si be the i-th character of string s, and si..j be the substring of word s, staring at the i-th character and ending at the j-th character (sisi + 1... sj, i ≤ j).

Then the simple prettiness of s is defined by the formula:

<image>

The prettiness of s equals 

<image>

Find the prettiness of the given song title.

We assume that the vowels are I, E, A, O, U, Y.

Input

The input contains a single string s (1 ≤ |s| ≤ 5·105) — the title of the song.

Output

Print the prettiness of the song with the absolute or relative error of at most 10 - 6.

Examples

Input

IEAIAIO


Output

28.0000000


Input

BYOB


Output

5.8333333


Input

YISVOWEL


Output

17.0500000

Note

In the first sample all letters are vowels. The simple prettiness of each substring is 1. The word of length 7 has 28 substrings. So, the prettiness of the song equals to 28.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
void up(vector<long long int> &bit, int j, int x, int n) {
  for (; j <= n; j += j & (-j)) bit[j] += x;
}
long long int que(vector<long long int> &bit, int j) {
  long long int x = 0;
  for (; j > 0; j -= (j) & (-j)) x += bit[j];
  return x;
}
int main() {
  int n, m, l, i;
  string str;
  cin >> str;
  n = str.size();
  vector<int> v(n + 1, 0);
  vector<long long int> fro(n + 1, 0), rev(n + 1, 0);
  for (i = 0; i < n; i++) {
    if (str[i] == 'A' || str[i] == 'E' || str[i] == 'I' || str[i] == 'O' ||
        str[i] == 'U' || str[i] == 'Y')
      v[i + 1] = 1;
  }
  for (i = 1; i <= n; i++)
    if (v[i]) up(fro, i, i, n), up(rev, i, n + 1 - i, n);
  for (i = 1; i <= n; i++) v[i] += v[i - 1];
  double ans = 0, d = 0;
  long long int x;
  cout << setprecision(12) << fixed;
  for (l = 1; l <= n; l++) {
    if (l <= n + 1 - l)
      m = l;
    else
      m = n + 1 - l;
    x = m, x *= (v[n + 1 - m] - v[m - 1]);
    x += (que(fro, m - 1) + que(rev, n) - que(rev, n + 1 - m));
    d = x, d /= l, ans += d;
  }
  cout << ans << endl;
}