// MagicDark
#include <bits/stdc++.h>
#define debug cerr << "[" << __LINE__ << "] "
#define SZ(x) (int) x.size() - 1
#define all(x) x.begin(), x.end()
#define ms(x, y) memset(x, y, sizeof x)
#define F(i, x, y) for (int i = (x); i <= (y); i++)
#define DF(i, x, y) for (int i = (x); i >= (y); i--)
using namespace std;
typedef long long ll;
typedef unsigned long long ull;
template <typename T> inline void chkmax(T &x, T y) {x = max(x, y);}
template <typename T> inline void chkmin(T &x, T y) {x = min(x, y);}
template <typename T> inline void read(T &x) {
	x = 0; int f = 1; char c = getchar();
	for (; !isdigit(c); c = getchar()) if (c == '-') f = -f;
	for (; isdigit(c); c = getchar()) x = (x << 1) + (x << 3) + (c ^ 48);
	x *= f;
}
const int N = 1e6 + 10;
int n, a[N];
void zhk() {
	read(n);
	int cnt0 = 0, cnt1 = 0, cnt2 = 0;
	// mp[a[i]]++;
	// unmap <int, int> mp;
	F(i, 1, n) {
		read(a[i]), a[i]--;
		if (!a[i]) cnt0++;
		else if (a[i] > 1) cnt2++;
			else cnt1++;
	}
	ll ans = (ll) cnt0 * (cnt0 - 1) / 2 + (ll) cnt0 * (cnt1 + cnt2) + (ll) cnt1 * cnt2;
	cout << ans << '\n';
}
signed main() {
	int _ = 1;
	cin >> _;
	while (_--) zhk();
	return 0;
}
/* why?
*/