Problem: Mister B has a house in the middle of a giant plain field, which attracted aliens life. For convenience, aliens specified the Cartesian coordinate system on the field in such a way that Mister B's house has coordinates (0, 0). After that they sent three beacons to the field, but something went wrong. One beacon was completely destroyed, while the other two landed in positions with coordinates (m, 0) and (0, n), respectively, but shut down.

Mister B was interested in this devices, so he decided to take them home. He came to the first beacon, placed at (m, 0), lifted it up and carried the beacon home choosing the shortest path. After that he came to the other beacon, placed at (0, n), and also carried it home choosing the shortest path. When first beacon was lifted up, the navigation system of the beacons was activated.

Partially destroyed navigation system started to work in following way.

At time moments when both survived beacons are at points with integer coordinates the system tries to find a location for the third beacon. It succeeds if and only if there is a point with integer coordinates such that the area of the triangle formed by the two survived beacons and this point is equal to s. In this case the system sends a packet of information with beacon positions to aliens, otherwise it doesn't.

Compute how many packets of information system sent while Mister B was moving the beacons.

Input

The first line contains one integer t (1 ≤ t ≤ 1000) — the number of test cases. The next 3·t lines describe t test cases. 

Every test case is described in three lines as follows. Note that each parameter is given as a product of three factors.

The first line of a test case contains three space-separated integers: n1, n2, n3 (1 ≤ ni ≤ 106) such that n = n1·n2·n3.

The second line contains three space-separated integers: m1, m2, m3 (1 ≤ mi ≤ 106) such that m = m1·m2·m3.

The third line contains three space-separated integers: s1, s2, s3 (1 ≤ si ≤ 106) such that s = s1·s2·s3.

Note that for hacks only tests with t = 1 allowed.

Output

Print t integers one per line — the answers for each test.

Example

Input

3
2 1 1
2 1 1
1 1 3
1 5 1
2 2 1
1 1 2
10 6 18
2 103 2
13 1 13


Output

4
7
171

Note

First test case contains the following beacon positions: (2, 0) and (0, 2), s = 3. The following packets could be sent: ((2, 0), (0, 2), ( - 1, 0)), ((1, 0), (0, 2), (4, 0)), ((0, 0), (0, 2), (3, 1)), ((0, 0), (0, 1), ( - 6, 0)), where (b1, b2, p) has next description: b1 — first beacon position, b2 — second beacon position, p — some generated point.

Second test case contains the following beacon initial positions: (4, 0) and (0, 5), s = 2. The following packets could be sent: ((4, 0), (0, 5), (0, 4)), ((3, 0), (0, 5), (2, 3)), ((2, 0), (0, 5), (2, 2)), ((1, 0), (0, 5), (1, 4)), ((0, 0), (0, 4), (0, - 1)), ((0, 0), (0, 2), (2, 0)), ((0, 0), (0, 1), (4, 0)).

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
const int N = 1e6 + 5;
int prime[N], num;
int vst[N], d[N];
inline void Pre(int n) {
  for (int i = 2; i <= n; i++) {
    if (!vst[i]) prime[++num] = i, d[i] = i;
    for (int j = 1; j <= num && (long long)i * prime[j] <= n; j++) {
      vst[i * prime[j]] = 1;
      d[i * prime[j]] = prime[j];
      if (i % prime[j] == 0) break;
    }
  }
}
int X[3][3];
long long ans = 0;
namespace Work1 {
long long n, S, m;
int _c[N];
int p[N], c[N], b[N], pnt;
int a[N];
inline void dfs(int t, long long D) {
  if (t == pnt + 1) {
    int x = 0, y = 0;
    for (int i = 1; i <= pnt; i++)
      if (a[i])
        if (a[i] - 1 == b[i])
          x++;
        else
          y++;
    if (y == 0)
      if (x & 1)
        ans -= m / D;
      else
        ans += m / D;
    return;
  }
  for (int i = 0; i <= min(c[t], b[t] + 1); i++)
    a[t] = i, dfs(t + 1, D), D *= p[t];
}
vector<int> pp;
int vst[N], clk;
inline void Solve() {
  S = (long long)X[2][0] * X[2][1] * X[2][2];
  S <<= 1;
  m = (long long)X[1][0] * X[1][1] * X[1][2];
  pp.clear();
  ++clk;
  for (int i = 0; i < 3; i++) {
    int x = X[0][i];
    while (x > 1) {
      if (vst[d[x]] != clk) pp.push_back(d[x]), vst[d[x]] = clk;
      _c[d[x]]++, x /= d[x];
    }
  }
  pnt = 0;
  for (int i : pp) p[++pnt] = i, c[pnt] = _c[i];
  for (int i = 1; i <= pnt; i++) {
    b[i] = 0;
    while (S % p[i] == 0) b[i]++, S /= p[i];
  }
  dfs(1, 1);
  for (int i = 0; i < 3; i++) {
    int x = X[0][i];
    while (x > 1) _c[d[x]]--, x /= d[x];
  }
}
}  // namespace Work1
namespace Work2 {
long long n, S;
int c[N];
int p[N], q[N], pnt;
inline void dfs(int t, long long d) {
  if (d > n) return;
  if (t == pnt + 1) {
    ans++;
    return;
  }
  for (int i = 0; i <= q[t]; i++) dfs(t + 1, d), d *= p[t];
}
vector<int> pp;
int vst[N], clk;
inline void Solve() {
  n = (long long)X[0][0] * X[0][1] * X[0][2];
  c[2]++;
  pp.clear();
  ++clk;
  vst[2] = clk;
  pp.push_back(2);
  for (int i = 0; i < 3; i++) {
    int x = X[2][i];
    while (x > 1) {
      if (vst[d[x]] != clk) pp.push_back(d[x]), vst[d[x]] = clk;
      c[d[x]]++, x /= d[x];
    }
  }
  pnt = 0;
  for (int i : pp) p[++pnt] = i, q[pnt] = c[i];
  dfs(1, 1);
  c[2]--;
  for (int i = 0; i < 3; i++) {
    int x = X[2][i];
    while (x > 1) c[d[x]]--, x /= d[x];
  }
}
}  // namespace Work2
int main() {
  int T;
  Pre(1e6);
  scanf("%d", &(T));
  while (T--) {
    for (int i = 0; i < 3; i++)
      for (int j = 0; j < 3; j++) scanf("%d", &(X[i][j]));
    ans = 0;
    Work1::Solve();
    long long tmp = ans;
    Work2::Solve();
    printf("%I64d\n", ans);
  }
  return 0;
}