/*
有点逆天了这题
cnt^3 显然拆成3个有序序列计数
设fijk表示三个序列，第一个结尾i，第二个j，第三个k
考虑转移相当于要求所有的 fi'j'k'，mp[a[i']][i]=1
前缀和维护，具体的，每次dp，先把当前的fi{jk} 求一个二维前缀和，然后看着累加到前缀和s上。
sij的含义：首先ai=aj，然后表示的是所有颜色能转移到aj的东西的前缀和
666
*/
#include <bits/stdc++.h>
using namespace std;
const int N = 205, mod = 1e9 + 7;
int T, n;
int a[N];
char mp[N][N];
void add(int &x, int y) {
    x = x + y;
    if (x >= mod) x -= mod;
    return;
}
int f[N][N], sum[N][N], ret;
int qr(int x, int y) {
    if (x < 0 || y < 0) return 0;
    return f[x][y];
}
void solve() {
    scanf("%d", &n), ret = 0;
    for (int i = 1; i <= n; ++i) scanf("%d", a + i);
    for (int i = 1; i <= n; ++i) scanf("%s", mp[i] + 1);
    for (int i = 0; i <= n; ++i) for (int j = 0; j <= n; ++j) f[i][j] = sum[i][j] = 0;
    for (int i = 1; i <= n; ++i) {
        for (int j = 1; j <= n; ++j) {
            for (int k = 1; k <= n; ++k) {
                add(f[j][k], f[j - 1][k]), add(f[j][k], f[j][k - 1]), add(f[j][k], mod - f[j - 1][k - 1]);
            }
        }
        for (int j = 1; j <= n; ++j) {
            for (int k = 1; k <= n; ++k)
            if (mp[a[i - 1]][a[j]] == '1') add(sum[j][k], f[j - 1][k - 1]);
        }
        for (int j = 1; j <= n; ++j) {
            for (int k = 1; k <= n; ++k) {
                if (a[i] != a[j] || a[i] != a[k]) f[j][k] = 0;
                else f[j][k] = sum[j][k] + 1;
                add(ret, f[j][k]);
            }
        }
    }
    printf("%lld\n", ret);
    return;
}
int main() {
    scanf("%d", &T);
    while (T--) {
        solve();
    }
    return 0;
}