package main

import (
	"bufio"
	"fmt"
	"os"
	"strconv"
)

var sc = bufio.NewScanner(os.Stdin)
var rdr = bufio.NewReaderSize(os.Stdin, 1000000)

func main() {
	sc.Split(bufio.ScanWords)
	n := nextInt()
	bamboos := make([]int, 0, n)
	m := make(map[int]int64)
	c, mod := int64(0), int64(1e9+7)

	for i := 0; i < n; i++ {
		m[nextInt()]++
	}

	for k := range m {
		bamboos = append(bamboos, k)
	}

	f := func(a []int) {
		if isKD(a) {
			c += 1 * m[a[0]] * m[a[1]] * m[a[2]]
		}
	}
	comb(bamboos, 3, f)
	fmt.Println(c % mod)
}

func isKD(a []int) bool {
	if a[0] == a[1] || a[1] == a[2] || a[0] == a[2] {
		return false
	}
	return true
}

func nextLine() string {
	sc.Scan()
	return sc.Text()
}

func nextInt() int {
	i, _ := strconv.Atoi(nextLine())
	return i
}

func comb(a []int, r int, fn func([]int)) {
	if r > len(a) || r < 1 {
		return
	}

	var f func([]int, int, int)
	f = func(ret []int, last, c int) {
		if c == 0 {
			fn(ret)
			return
		}

		c--
		for i, v := range a[last : len(a)-c] {
			ret[r-c-1] = v
			f(ret, i+last+1, c)
		}
	}

	ret := make([]int, r)
	f(ret, 0, r)
}