Problem: Barney lives in country USC (United States of Charzeh). USC has n cities numbered from 1 through n and n - 1 roads between them. Cities and roads of USC form a rooted tree (Barney's not sure why it is rooted). Root of the tree is the city number 1. Thus if one will start his journey from city 1, he can visit any city he wants by following roads.

<image>

Some girl has stolen Barney's heart, and Barney wants to find her. He starts looking for in the root of the tree and (since he is Barney Stinson not a random guy), he uses a random DFS to search in the cities. A pseudo code of this algorithm is as follows:
    
    
      
    let starting_time be an array of length n  
    current_time = 0  
    dfs(v):  
    	current_time = current_time + 1  
    	starting_time[v] = current_time  
    	shuffle children[v] randomly (each permutation with equal possibility)  
    	// children[v] is vector of children cities of city v  
    	for u in children[v]:  
    		dfs(u)  
    

As told before, Barney will start his journey in the root of the tree (equivalent to call dfs(1)).

Now Barney needs to pack a backpack and so he wants to know more about his upcoming journey: for every city i, Barney wants to know the expected value of starting_time[i]. He's a friend of Jon Snow and knows nothing, that's why he asked for your help.

Input

The first line of input contains a single integer n (1 ≤ n ≤ 105) — the number of cities in USC.

The second line contains n - 1 integers p2, p3, ..., pn (1 ≤ pi < i), where pi is the number of the parent city of city number i in the tree, meaning there is a road between cities numbered pi and i in USC.

Output

In the first and only line of output print n numbers, where i-th number is the expected value of starting_time[i].

Your answer for each city will be considered correct if its absolute or relative error does not exceed 10 - 6.

Examples

Input

7
1 2 1 1 4 4


Output

1.0 4.0 5.0 3.5 4.5 5.0 5.0 


Input

12
1 1 2 2 4 4 3 3 1 10 8


Output

1.0 5.0 5.5 6.5 7.5 8.0 8.0 7.0 7.5 6.5 7.5 8.0 

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
struct Timer {
  chrono::time_point<chrono::high_resolution_clock> start, end;
  chrono::duration<float> dur;
  Timer() { start = chrono::high_resolution_clock::now(); }
  ~Timer() {
    end = chrono::high_resolution_clock::now();
    dur = end - start;
    cout << "\nTime Elapsed : " << dur.count() << " s\n";
  }
};
long long int sum() { return 0; }
template <typename T, typename... Args>
T sum(T a, Args... args) {
  return a + sum(args...);
}
template <int D, typename T>
struct Vec : public vector<Vec<D - 1, T>> {
  static_assert(D >= 1, "Vector dimension must be greater than zero!");
  template <typename... Args>
  Vec(int n = 0, Args... args)
      : vector<Vec<D - 1, T>>(n, Vec<D - 1, T>(args...)) {}
};
template <typename T>
struct Vec<1, T> : public vector<T> {
  Vec(int n = 0, T val = T()) : vector<T>(n, val) {}
};
template <typename T>
class SieveEuler {
 public:
  vector<T> primes;
  vector<T> lp;
  inline SieveEuler(int MAX = 1000000) {
    lp.resize(MAX + 1, 0);
    for (long long int i = 2; i <= MAX; i++) {
      if (lp[i] == 0) {
        lp[i] = i;
        primes.push_back(i);
      }
      for (int j = 0;
           j < primes.size() && i * primes[j] <= MAX && primes[j] <= lp[i];
           ++j) {
        if (primes[j] == lp[i]) {
          lp[i * primes[j]] = primes[j];
        } else {
          lp[i * primes[j]] = primes[j];
        }
      }
    }
  }
};
long long int EulerPhi(long long int n) {
  long long int result = n;
  for (long long int i = 2; i * i <= n; i++) {
    if (n % i == 0) {
      while (n % i == 0) n /= i;
      result -= result / i;
    }
  }
  if (n > 1) result -= result / n;
  return result;
}
template <typename T>
vector<vector<T>> matmul(const vector<vector<T>>& a,
                         const vector<vector<T>>& b) {
  int n = a.size(), m = b[0].size(), k = b.size();
  vector<vector<T>> c(n, vector<T>(m));
  for (int i = 0; i < n; i++) {
    for (int j = 0; j < m; j++) {
      for (int l = 0; l < k; l++) c[i][j] += (a[i][k] * b[k][j]);
    }
  }
  return c;
}
template <typename T>
bool isPrime(T n) {
  if (n <= 1)
    return false;
  else if (n == 2 || n == 3)
    return true;
  else if (n % 2 == 0 || n % 3 == 0)
    return false;
  T x = 5;
  T p = 2;
  while (x * x <= n) {
    if (n % x == 0) return true;
    x += p;
    p = 6 - p;
  }
  return true;
}
template <typename T>
class Graph {
 public:
  struct edge {
    int from, to;
    T cost;
  };
  vector<edge> edgeList;
  vector<vector<int>> adj;
  vector<int> sz;
  vector<long double> ans;
  int n;
  Graph(int _n) : n(_n) {
    adj.resize(n + 1);
    sz.resize(n + 1);
    ans.resize(n + 1);
  }
  void dfs(int u, int p) {
    sz[u] = 1;
    for (auto v : adj[u]) {
      if (v != p) {
        dfs(v, u);
        sz[u] += sz[v];
      }
    }
  }
  long long int binpow(long long int x, long long int n,
                       long long int mod = 1000000007) {
    long long int ans = 1;
    x = x % mod;
    while (n >= 1) {
      if (n & 1) ans = (ans * x) % mod;
      x = (x * x) % mod;
      n >>= 1;
    }
    return ans;
  }
  void dfs2(int u, int p) {
    for (auto v : adj[u]) {
      if (v != p) {
        ans[v] = ans[u] + ((long double)sz[u] - sz[v] - 1) / 2LL + 1;
        dfs2(v, u);
      }
    }
  }
  void add(int u, int v) {
    adj[u].push_back(v);
    adj[v].push_back(u);
  }
  void solve() {
    dfs(1, -1);
    ans[1] = 1;
    dfs2(1, -1);
    cout << fixed << setprecision(9);
    for (int i = 1; i <= n; i++) cout << ans[i] << " \n"[i == n];
  }
};
int main() {
  ios_base::sync_with_stdio(false);
  cin.tie(NULL);
  cout.tie(NULL);
  int testCases = 1;
  while (testCases--) {
    int n;
    cin >> n;
    Graph<int> g(n);
    for (int i = 2; i <= n; i++) {
      int p;
      cin >> p;
      g.add(i, p);
    }
    g.solve();
  }
}