#include <iostream>
#include <string>
#include <vector>
#include <algorithm>
using i64 = long long;
using u64 = unsigned long long;
#define rep(i,n) for(int i=0; i<int(n); i++)
const i64 INF = 1001001001001001001;
template<typename A> void chmin(A& l, const A& r){ if(r < l) l = r; }
template<typename A> void chmax(A& l, const A& r){ if(l < r) l = r; }
#include <atcoder/modint>
#include <atcoder/fenwicktree>
using Modint = atcoder::static_modint<998244353>;
using namespace std;

void testcase(){
    i64 N; cin >> N;
    vector<i64> A(N); rep(i,N) cin >> A[i];
    vector<int> I(N); rep(i,N) I[i] = i;
    sort(I.begin(), I.end(), [&](int l, int r){ return A[l] < A[r]; });
    vector<int> O(N); rep(i,N) O[I[i]] = i;
    atcoder::fenwick_tree<i64> CL(N);
    atcoder::fenwick_tree<i64> CR(N);
    atcoder::fenwick_tree<i64> SL(N);
    atcoder::fenwick_tree<i64> SR(N);
    rep(i,N){
        i64 p = O[i];
        i64 a = A[i];
        CR.add(p, 1);
        SR.add(p, a);
    }
    i64 dsum = 0;
    i64 ans = 0;
    rep(i,N-1){
        i64 p = O[i];
        i64 a = A[i];
        CR.add(p, -1);
        SR.add(p, -a);
        dsum += a * CR.sum(0,p) - SR.sum(0,p);
        dsum += SR.sum(p+1,N) - a * CR.sum(p+1,N);
        dsum -= a * CL.sum(0,p) - SL.sum(0,p);
        dsum -= SL.sum(p+1,N) - a * CL.sum(p+1,N);
        CL.add(p, 1);
        SL.add(p, a);
        ans += dsum;
    }
    ans *= 2;
    cout << ans << endl;
}

int main(){
    ios::sync_with_stdio(false); cin.tie(nullptr);
    testcase();
    return 0;
}