// includes #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include // macros #define ll long long int #define pb emplace_back #define mk make_pair #define pq priority_queue #define FOR(i, a, b) for(int i=(a);i<(b);++i) #define rep(i, n) FOR(i, 0, n) #define rrep(i, n) for(int i=((int)(n)-1);i>=0;i--) #define all(x) (x).begin(),(x).end() #define sz(x) ((int)(x).size()) #define UNIQUE(v) v.erase(unique(v.begin(), v.end()), v.end()) using namespace std; // types typedef pair P; typedef pair Pl; typedef pair Pll; typedef pair Pd; // constants const int inf = 1e9; const ll linf = 1LL << 50; const double EPS = 1e-10; const int mod = 1e9 + 7; // solve template bool chmax(T &a, const T &b){if(a < b){a = b; return 1;} return 0;} template bool chmin(T &a, const T &b){if(a > b){a = b; return 1;} return 0;} vector child[200001]; vector eu; int cs[200001]; template struct BIT_{ int n; vector bit; BIT_(int n_){ n = n_; bit = vector(n+1, 0); } void add(int a, T w){ for(int x = a; x < n; x |= (x + 1)){ bit[x] += w; } } T sum(int a){ T res = 0; for(int x = a; x >= 0; x = (x & (x + 1)) - 1){ res += bit[x]; } return res; } }; typedef struct BIT_ BITI; typedef struct BIT_ BITL; int dfs(int i){ int res = 0; eu.pb(i); for(auto c: child[i]){ res += dfs(c); } cs[i] = res; return res + 1; } int main(int argc, char const* argv[]) { ios_base::sync_with_stdio(false); cin.tie(0); int n; cin >> n; rep(i, n - 1){ int x; cin >> x; child[x].pb(i+1); } dfs(0); vector tr(n, 0); rep(i, n)tr[eu[i]] = i; BITI b(n); ll res = 0; for(int i = n - 1; i >= 0; i--){ res += b.sum(tr[i]+cs[i]); res -= b.sum(tr[i]); b.add(tr[i], 1); } cout << res << endl; return 0; }