ll N,a,d[101],x;{rd(N);rep(i,N){rd(a);++d[a];}rep(i,101)rep(j,i)x+=d[i]*d[j]*d[0..j-1];wt(x%=1d9+7);}