// what is matter? never mind. 
//#pragma GCC optimize("Ofast")
//#pragma GCC optimize("unroll-loops")
//#pragma GCC target("sse,sse2,sse3,sse4,popcnt,abm,mmx,avx,avx2")
#include<bits/stdc++.h>
#define For(i,a,b) for(int i=(a);i<=(b);++i)
#define Rep(i,a,b) for(int i=(a);i>=(b);--i)
#define ll long long
//#define ull unsigned long long
//#define int long long
#define SZ(x) ((int)((x).size()))
#define ALL(x) (x).begin(),(x).end()
using namespace std;
inline int read()
{
	char c=getchar();int x=0;bool f=0;
	for(;!isdigit(c);c=getchar())f^=!(c^45);
	for(;isdigit(c);c=getchar())x=(x<<1)+(x<<3)+(c^48);
	return f?-x:x;
}

#define mod 998244353
struct modint{
	unsigned int x;
	modint(int o=0){x=o;}
	modint &operator = (int o){return x=o,*this;}
	modint &operator +=(modint o){return x=x+o.x>=mod?x+o.x-mod:x+o.x,*this;}
	modint &operator -=(modint o){return x=x<o.x?x-o.x+mod:x-o.x,*this;}
	modint &operator *=(modint o){return x=1ll*x*o.x%mod,*this;}
	modint &operator ^=(int b){
		modint a=*this,c=1;
		for(;b;b>>=1,a*=a)if(b&1)c*=a;
		return x=c.x,*this;
	}
	modint &operator /=(modint o){return *this *=o^=mod-2;}
	friend modint operator +(modint a,modint b){return a+=b;}
	friend modint operator -(modint a,modint b){return a-=b;}
	friend modint operator *(modint a,modint b){return a*=b;}
	friend modint operator /(modint a,modint b){return a/=b;}
	friend modint operator ^(modint a,int b){return a^=b;}
	friend bool operator ==(modint a,modint b){return a.x==b.x;}
	friend bool operator !=(modint a,modint b){return a.x!=b.x;}
	bool operator ! () {return !x;}
	modint operator - () {return x?mod-x:0;}
	bool operator <(const modint&b)const{return x<b.x;}
};
inline modint qpow(modint x,int y){return x^y;}

vector<modint> fac,ifac,iv;
inline void initC(int n)
{
	if(iv.empty())fac=ifac=iv=vector<modint>(2,1);
	int m=iv.size(); ++n;
	if(m>=n)return;
	iv.resize(n),fac.resize(n),ifac.resize(n);
	For(i,m,n-1){
		iv[i]=iv[mod%i]*(mod-mod/i);
		fac[i]=fac[i-1]*i,ifac[i]=ifac[i-1]*iv[i];
	}
}
inline modint C(int n,int m){
	if(m<0||n<m)return 0;
	return initC(n),fac[n]*ifac[m]*ifac[n-m];
}
inline modint sign(int n){return (n&1)?(mod-1):(1);}

#define fi first
#define se second
#define pb push_back
#define mkp make_pair
typedef pair<int,int>pii;
typedef vector<int>vi;

#define maxn 1000005
#define inf 0x3f3f3f3f

int n,a[maxn],cnt[maxn][9];
int pw[233];
deque<int>q[10005];

int now[maxn];
vi qwq[10050];
int get(vi o){
	int sta=0;
	For(j,1,8) sta=sta*3+(o[j-1]%3);
	return sta;
}
vector<int>qq;

void chk(){
	int sta=0;
	For(j,1,8) sta=sta*3+(now[j]%3);
	vi os;
	For(j,1,8) os.pb(now[j]);
	qwq[sta]=os;
	qq.pb(sta);
}

void dfs(int u){
	if(u==7){
		chk();
		return;
	}
	For(i,0,2){
		For(j,0,2)now[u+j]+=i;
		dfs(u+1);
		For(j,0,2)now[u+j]-=i;
	}
}
void prew(){
	dfs(1);
}
int lst[maxn];
ll res[maxn];
int sb[6666][6666];
int nxt[maxn],buc[maxn],ps[maxn];


int cc[maxn];

void work()
{
	n=read();
	For(i,1,n)a[i]=read();
	For(i,1,n){
		For(j,1,8)cnt[i][j]=cnt[i-1][j];
		cnt[i][a[i]]++;
	}
	For(i,0,pw[8]-1) buc[i]=n+1;
	Rep(i,n,0){
		int S=0;
		For(j,1,8) S=S*3+cnt[i][j]%3;
	//	cout<<"???? "<<i<<' '<<S<<endl;
		ps[i]=S;
		nxt[i]=buc[S],buc[S]=i;
	}
	ll sum=0;
	
	for(auto ss:qq){
		For(i,1,n){
		//	cout<<"i: "<<i<<" "<<ps[i]<<"\n";
			int t=sb[ps[i]][ss];
		//	cout<<"t "<<t<<" "<<buc[t]<<" "<<now[t]<<" "<<cc[t]<<endl;
			if(buc[t]==n+1) continue;
			if(now[t]==inf) now[t]=buc[t],cc[t]=0;
			while(1){
				if(now[t]>=i) break;
		//		cout<<"chk "<<i<<" "<<now[t]<<"\n";
				bool ok=1;
				For(k,1,8)
					if(cnt[i][k]-cnt[now[t]][k]<qwq[ss][k-1]){
						ok=0;
						break;
					}
		//		cout<<"QWQ "<<ok<<"\n";
				if(!ok) break;
				now[t]=nxt[now[t]],++cc[t];
		//		cout<<"NOW "<<now[t]<<' '<<cc[t]<<"\n";
			}
			sum+=cc[t];
		//	cout<<"add "<<cc[t]<<"\n";
		}
		For(i,0,n){
			int s=ps[i];
			now[s]=inf,cc[s]=0;
		}
	}
	cout<<sum<<"\n";
}

signed main()
{
	pw[0]=1;
	For(i,1,8) pw[i]=pw[i-1]*3;
	//cout<<"PW "<<pw[8]<<endl;
	prew();
	For(i,0,pw[8]-1) for(int j:qq) {
		int s=0;
		For(k,0,7){
			int t=(i/pw[7-k]%3)-(j/pw[7-k]%3)+3;
			s=s*3+(t%3);
		}
		sb[i][j]=s;
	}
	
	For(i,0,pw[8]-1) now[i]=inf,cc[i]=0;
//	cout<<pw[8]<<endl;
//	exit(0);
	int T=read();
	while(T--)work();
	return 0;
}
/*

*/