Problem: You're playing a game called Osu! Here's a simplified version of it. There are n clicks in a game. For each click there are two outcomes: correct or bad. Let us denote correct as "O", bad as "X", then the whole play can be encoded as a sequence of n characters "O" and "X".

Using the play sequence you can calculate the score for the play as follows: for every maximal consecutive "O"s block, add the square of its length (the number of characters "O") to the score. For example, if your play can be encoded as "OOXOOOXXOO", then there's three maximal consecutive "O"s block "OO", "OOO", "OO", so your score will be 22 + 32 + 22 = 17. If there are no correct clicks in a play then the score for the play equals to 0.

You know that the probability to click the i-th (1 ≤ i ≤ n) click correctly is pi. In other words, the i-th character in the play sequence has pi probability to be "O", 1 - pi to be "X". You task is to calculate the expected score for your play.

Input

The first line contains an integer n (1 ≤ n ≤ 105) — the number of clicks. The second line contains n space-separated real numbers p1, p2, ..., pn (0 ≤ pi ≤ 1).

There will be at most six digits after the decimal point in the given pi.

Output

Print a single real number — the expected score for your play. Your answer will be considered correct if its absolute or relative error does not exceed 10 - 6.

Examples

Input

3
0.5 0.5 0.5


Output

2.750000000000000


Input

4
0.7 0.2 0.1 0.9


Output

2.489200000000000


Input

5
1 1 1 1 1


Output

25.000000000000000

Note

For the first example. There are 8 possible outcomes. Each has a probability of 0.125.

  * "OOO"  →  32 = 9; 
  * "OOX"  →  22 = 4; 
  * "OXO"  →  12 + 12 = 2; 
  * "OXX"  →  12 = 1; 
  * "XOO"  →  22 = 4; 
  * "XOX"  →  12 = 1; 
  * "XXO"  →  12 = 1; 
  * "XXX"  →  0. 



So the expected score is <image>

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
#pragma GCC optimize(3)
using uint = unsigned int;
using ll = long long;
using ull = unsigned long long;
using db = double;
using ld = long double;
using pii = pair<int, int>;
using pll = pair<ll, ll>;
using pdd = pair<double, double>;
pii operator+(pii a, pii b) { return {a.first + b.first, a.second + b.second}; }
pll operator+(pll a, pll b) { return {a.first + b.first, a.second + b.second}; }
namespace IO {
char buf[1 << 25], *p1 = buf, *p2 = buf, obuf[1 << 25], *O = obuf;
inline ll read() {
  ll x = 0;
  bool sign = 0;
  char s =
      (p1 == p2 && (p2 = (p1 = buf) + fread(buf, 1, 1 << 22, stdin), p1 == p2)
           ? EOF
           : *p1++);
  while (!isdigit(s))
    sign |= s == '-',
        s = (p1 == p2 &&
                     (p2 = (p1 = buf) + fread(buf, 1, 1 << 22, stdin), p1 == p2)
                 ? EOF
                 : *p1++);
  while (isdigit(s))
    x = (x << 1) + (x << 3) + (s - '0'),
    s = (p1 == p2 && (p2 = (p1 = buf) + fread(buf, 1, 1 << 22, stdin), p1 == p2)
             ? EOF
             : *p1++);
  return sign ? -x : x;
}
inline void print(ll x) {
  if (x > 9) print(x / 10);
  (*O++ = x % 10 + '0');
}
inline void print(string s) {
  for (int it : s) (*O++ = it);
  (*O++ = '\n');
};
}  // namespace IO
const int mod = 1e9 + 7;
const long double Pi = acos(-1);
namespace math {
const int MAXN = 2e6 + 5;
ll ksm(ll a, ll b) {
  ll s = 1, m = a;
  while (b) {
    if (b & 1) s = s * m % mod;
    m = m * m % mod, b >>= 1;
  }
  return s;
}
ll inv(ll x) { return ksm(x, mod - 2); }
ll fc[MAXN], ifc[MAXN];
void init(int lim) {
  assert(lim < MAXN);
  fc[0] = 1;
  for (int i = 1; i <= lim; i++) fc[i] = fc[i - 1] * i % mod;
  ifc[lim] = inv(fc[lim]);
  for (int i = lim - 1; i >= 0; i--) ifc[i] = ifc[i + 1] * (i + 1) % mod;
}
ll bin(ll n, ll m) { return fc[n] * ifc[m] % mod * ifc[n - m] % mod; }
}  // namespace math
mt19937 rd(chrono::steady_clock::now().time_since_epoch().count());
using namespace IO;
using namespace math;
const int N = 1e5 + 5;
ld ans, p, f;
int n;
int main() {
  cin >> n;
  for (int i = 1; i <= n; i++)
    cin >> p, ans += (2 * f + 1) * p, f = (f + 1) * p;
  printf("%.10LF\n", ans);
  return fwrite(obuf, O - obuf, 1, stdout), 0;
}