#include <iostream>
#include <cmath>
#include <cstdio>
#include <algorithm>
#define MAXN 0x7fffffff
#define ll long long
using namespace std;
ll a[50000][2],b,c,d,l,s,t[50000][2],w[50000][2];
ll n;
int i,j,k;
void guibing(ll p,ll q)
{
    if (p>=q) return;
    guibing(p,(p+q)/2);
    guibing((p+q)/2+1,q);
    k=p;
    i=p;
    j=(p+q)/2+1;
    while(k<=q) 
    {
    	if(a[i][0]<a[j][0]&&i<=(p+q)/2&&j<=q)
    	{
    		t[k][0]=a[i][0];
    		t[k][1]=a[i][1];
    		w[a[i][1]][1]+=q-j+1;
    		k++;
    		i++;
    	}
    		else if(a[i][0]>=a[j][0]&&i<=(p+q)/2&&j<=q)
    		{
    			t[k][0]=a[j][0];
    			t[k][1]=a[j][1];
    			w[a[j][1]][0]+=i-p;
    			k++;
    			j++;
    		}
    		else if (i>(p+q)/2)
    		{
	    		t[k][0]=a[j][0];
	    		t[k][1]=a[j][1];
	    		w[a[j][1]][0]+=i-p;
	    		k++;
	    		j++;
    		}	
    		else if(j>q)
    		{ 
    			t[k][0]=a[i][0];
    			t[k][1]=a[i][1];
    			k++;
    			i++;
    		}
    	}
   	for(i=p;i<=q;i++) 
   	{
   		a[i][0]=t[i][0];
   		a[i][1]=t[i][1];
   	}
}
int main()
{
    freopen("three.in","r",stdin);
    freopen("three.out","w",stdout);
    cin>>n;
    for(i=0;i<n;i++) 
    {
    	scanf("%d",&a[i][0]);
    	a[i][1]=i+1;
    }
    guibing(0,n-1);
    for (i=0;i<n;i++)s+=w[i][0]*w[i][1];
	cout<<s<<endl;
    return 0;
}