#include <cstdio>

 #include <cstring>

 #include <cstdlib>

 #include <iostream>

 #include <algorithm>

 const int MAXN=;

 #define int long long

 int n;

 int* ed;

 int a[MAXN];

 int d[MAXN];

 long long c[MAXN];

 long long l[MAXN];

 int Pos(int);

 int LowBit(int);

 long long Query(long long*,int);

 void Add(long long*,int,long long);

 signed main(){

     int ans=;

     scanf("%lld",&n);

     for(int i=;i<=n;i++){

         scanf("%lld",a+i);

         d[i]=a[i];

     }

     std::sort(d+,d++n);

     ed=std::unique(d+,d++n);

     for(int i=;i<=n;i++){

         int k=Pos(a[i]);

         ans+=Query(c,k);

         Add(c,k,Query(l,k));

         Add(l,k,);

     }

     printf("%lld\n",ans);

     return ;

 }

 inline int Pos(int x){

     return std::lower_bound(d+,ed,x)-d;

 }

 inline void Add(long long* c,int x,long long d){

     while(x<=n){

         c[x]+=d;

         x+=LowBit(x);

     }

 }

 inline long long Query(long long* c,int x){

     long long ans=;

     while(x>){

         ans+=c[x];

         x-=LowBit(x);

     }

     return ans;

 }

 inline int LowBit(int x){

     return x&-x;

 }