#include<bits/stdc++.h>
using namespace std;

typedef long long ll;
const ll p = 998244353;
const ll inv2 = 499122177;

int n;
int c[2100],t[2100];
ll f[2100],a[4100];
bitset<4010> e[4100],vis;

void clear(int n)
{
    memset(t, 0, sizeof(t));
    for(int i=1; i<=n*2; i++) e[i].reset();
}
ll qpow(ll a, ll b, ll p)
{
    ll ans=1;
    for(; b; b>>=1,(a*=a)%=p)
    if(b&1) (ans*=a)%=p;
    return ans;
}
ll solve()
{
    int x=0,y=0;

    for(int i=1; i<=n*2; i++) if(vis[i]) x=i;
    if(!x) return 1;
    for(int i=1; i<=n*2; i++) if(e[x][i]&&vis[i]) y=i;
    if(!y)
    {
        vis[x]=0;
        return (a[x]+1)*solve()%p;
    }

    vis[x]=vis[y]=0;
    bitset<4010> b[4];
    for(int i=0; i<2; i++)
    for(int j=0; j<2; j++)
    b[i*2+j]=(i ? ~e[x] : e[x])&(j ? ~e[y] : e[y])&vis;

    for(int i=0; i<3; i++)
    for(int k=1; k<=2*n; k++)
    if(b[i][k])
    for(int j=0; j<3; j++)
    if(i!=j)
    e[k]^=b[j];

    int fg=(a[x]==-1)*2+(a[y]==-1);
    for(int i=0; i<3; i++)
    if(i==fg||fg==3)
    for(int k=1; k<=n*2; k++)
    if(b[i][k])
    a[k]*=-1;

    return 2*(fg==3 ? p-1 : 1)*solve()%p;
}
void work()
{
    ll ans1=1,ans2;
    cin>>n; clear(n);
    for(int i=1; i<=n; i++)
    scanf("%d", &c[i]), ++t[c[i]];

    for(int i=1; i<=n; i++)
    {
        e[i][c[i]+n]=e[c[i]+n][i]=1;
        vis[i]=vis[i+n]=1;
        a[i]=a[i+n]=1;
    }
    for(int i=1; i<=n; i++)
    for(int j=i+1; j<=n; j++)
    if(c[i]>c[j])
    e[i][j]=e[j][i]=1;

    for(int i=1; i<=n; i++) ans1=ans1*f[t[i]]%p;
    ans2=solve()*qpow(inv2, n, p)%p;
    cout<<(ans1+ans2)*inv2%p<<"\n";
}
int main()
{
    int t;
    cin>>t;
    f[0]=f[1]=1;
    for(int i=2; i<=2000; i++) f[i]=(f[i-1]+(i-1)*f[i-2])%p;
    while(t-->0) work();
    return 0;
}