#pragma GCC optimize("Ofast")
#pragma GCC target("avx2")

char*mmap();
#define RD(v) int v=0;{int c;while(c=*r++-48,c>=0)v=v*10+c;}

int a[101];

main(){
	char*r=mmap(0l,512l*1024,1,2,0,0l);
	RD(n);
	for(int i=0;i<n;++i){
		RD(x);
		++a[x];
	}

	int b=0;
	long z=0;
	for(int i=1;i<100;++i){
		int d=b+a[i];
		z+=(long)a[i]*b*(n-d);
		b=d;
	}
	printf("%d",(int)(z%1000000007));
}