#include <cstdio>
#include <algorithm>
using namespace std;
const int N = 50000 + 10;
int n, a[N];
int l[N], g[N];
unsigned long long s;
int main() {
    freopen("queueb.in", "r", stdin);
    freopen("queueb.out", "w", stdout);
    scanf("%d", &n);
    for(int i=1; i<=n; i++)
        scanf("%d", a+i);
    /*for(int i=1; i<=n-2; i++)
        for(int j=i+1; j<n; j++)
            for(int k=j+1; k<=n; k++)
                if(a[i] < a[j] && a[j] > a[k])
                    s++;*/
    for(int j=2; j<=n; j++)
        for(int i=1; i<j; i++)
            if(a[i] < a[j])
                l[j]++;
    for(int j=1; j<n; j++)
        for(int k=j+1; k<=n; k++)
            if(a[j] > a[k])
                g[j]++;
    for(int i=1; i<=n; i++)
        s += l[i] * g[i];
    printf("%lld\n", s);
    return 0;
}