import sys
input = sys.stdin.readline

N=int(input())
A=list(map(int,input().split()))

compression_dict={a: ind for ind, a in enumerate(sorted(set(A)))}
A=[compression_dict[a] for a in A]

LIST=[[] for i in range(N)]

for i in range(N):
    LIST[A[i]].append(i)

LEN=10**6+1

BIT=[0]*(LEN+1) # 1-indexedなtree. 配列BITの長さはLEN+1にしていることに注意。

def update(v,w): # index vにwを加える
    while v<=LEN:
        BIT[v]+=w
        v+=(v&(-v)) # v&(-v)で、最も下の立っているビット. 自分を含む大きなノードへ. たとえばv=3→v=4

def getvalue(v): # [1,v]の区間の和を求める
    ANS=0
    while v!=0:
        ANS+=BIT[v]
        v-=(v&(-v)) # 自分より小さい自分の和を構成するノードへ. たとえばv=14→v=12へ
    return ANS

def bisect_on_BIT(x): # [1,ind]の和がはじめてx以上になるindexを探す

    if x<=0:
        return 0
    
    ANS=0
    h=1<<(LEN.bit_length()-1) # LEN以下の最小の2ベキ
    while h>0:
        if ANS+h<=LEN and BIT[ANS+h]<x:
            x-=BIT[ANS+h]
            ANS+=h
        h//=2

    return ANS+1 # LENまでの和がx未満のとき, LEN+1を返すことに注意

ANS=0
for i in range(N):
    for x in LIST[i]:
        a=getvalue(x)
        b=getvalue(LEN)
        ANS+=a*(b-a)
        
    for x in LIST[i]:
        update(x+1,1)

BIT=[0]*(LEN+1) # 1-indexedなtree. 配列BITの長さはLEN+1にしていることに注意。

for i in range(N-1,-1,-1):
    for x in LIST[i]:
        a=getvalue(x)
        b=getvalue(LEN)
        ANS+=a*(b-a)
        
    for x in LIST[i]:
        update(x+1,1)

LEFT=[0]*N
RIGHT=[0]*N

for i in range(1,N):
    RIGHT[A[i]]+=1
SUM=0
score=0

for i in range(1,N-1):

    if A[i-1]==A[i]:
        SUM-=LEFT[A[i]]*RIGHT[A[i]]
    else:
        SUM-=LEFT[A[i-1]]*RIGHT[A[i-1]]
        SUM-=LEFT[A[i]]*RIGHT[A[i]]
    
    LEFT[A[i-1]]+=1
    RIGHT[A[i]]-=1
    
    if A[i-1]==A[i]:
        SUM+=LEFT[A[i]]*RIGHT[A[i]]
    else:
        SUM+=LEFT[A[i-1]]*RIGHT[A[i-1]]
        SUM+=LEFT[A[i]]*RIGHT[A[i]]

    S2=0

    score+=SUM-LEFT[A[i]]*RIGHT[A[i]]
    #print(score,SUM,LEFT,RIGHT)

#score2=0
#for i in range(N):
#    for j in range(i+1,N):
#        for k in range(j+1,N):
#            if A[i]==A[k] and A[j]!=A[i]:
#                score2+=1

#print(score2)

print(ANS-score)