Problem: Once upon a time in the galaxy of far, far away...

Darth Wader found out the location of a rebels' base. Now he is going to destroy the base (and the whole planet that the base is located at), using the Death Star.

When the rebels learnt that the Death Star was coming, they decided to use their new secret weapon — space mines. Let's describe a space mine's build.

Each space mine is shaped like a ball (we'll call it the mine body) of a certain radius r with the center in the point O. Several spikes protrude from the center. Each spike can be represented as a segment, connecting the center of the mine with some point P, such that <image> (transporting long-spiked mines is problematic), where |OP| is the length of the segment connecting O and P. It is convenient to describe the point P by a vector p such that P = O + p.

The Death Star is shaped like a ball with the radius of R (R exceeds any mine's radius). It moves at a constant speed along the v vector at the speed equal to |v|. At the moment the rebels noticed the Star of Death, it was located in the point A.

The rebels located n space mines along the Death Star's way. You may regard the mines as being idle. The Death Star does not know about the mines' existence and cannot notice them, which is why it doesn't change the direction of its movement. As soon as the Star of Death touched the mine (its body or one of the spikes), the mine bursts and destroys the Star of Death. A touching is the situation when there is a point in space which belongs both to the mine and to the Death Star. It is considered that Death Star will not be destroyed if it can move infinitely long time without touching the mines.

Help the rebels determine whether they will succeed in destroying the Death Star using space mines or not. If they will succeed, determine the moment of time when it will happen (starting from the moment the Death Star was noticed).

Input

The first input data line contains 7 integers Ax, Ay, Az, vx, vy, vz, R. They are the Death Star's initial position, the direction of its movement, and its radius ( - 10 ≤ vx, vy, vz ≤ 10, |v| > 0, 0 < R ≤ 100).

The second line contains an integer n, which is the number of mines (1 ≤ n ≤ 100). Then follow n data blocks, the i-th of them describes the i-th mine.

The first line of each block contains 5 integers Oix, Oiy, Oiz, ri, mi, which are the coordinates of the mine centre, the radius of its body and the number of spikes (0 < ri < 100, 0 ≤ mi ≤ 10). Then follow mi lines, describing the spikes of the i-th mine, where the j-th of them describes the i-th spike and contains 3 integers pijx, pijy, pijz — the coordinates of the vector where the given spike is directed (<image>).

The coordinates of the mines' centers and the center of the Death Star are integers, their absolute value does not exceed 10000. It is guaranteed that R > ri for any 1 ≤ i ≤ n. For any mines i ≠ j the following inequality if fulfilled: <image>. Initially the Death Star and the mines do not have common points.

Output

If the rebels will succeed in stopping the Death Star using space mines, print the time from the moment the Death Star was noticed to the blast.

If the Death Star will not touch a mine, print "-1" (without quotes).

For the answer the absolute or relative error of 10 - 6 is acceptable.

Examples

Input

0 0 0 1 0 0 5
2
10 8 0 2 2
0 -3 0
2 2 0
20 0 0 4 3
2 4 0
-4 3 0
1 -5 0


Output

10.0000000000

Input

8 8 4 4 4 2 6
1
-2 -2 -1 3 0


Output

-1

Input

30 30 2 1 2 1 20
3
0 0 40 5 1
1 4 4
-10 -40 -5 7 0
100 200 95 8 1
-10 0 0


Output

74.6757620881

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
const long double eps = 1e-9;
inline bool eq(long double a, long double b) { return abs(a - b) < eps; }
inline bool ls(long double a, long double b) { return a <= b - eps; }
inline bool gt(long double a, long double b) { return a >= b + eps; }
inline bool le(long double a, long double b) { return a < b + eps; }
inline bool ge(long double a, long double b) { return a > b - eps; }
inline bool zr(long double lhs) { return fabs(lhs) < eps; }
inline bool nz(long double lhs) { return fabs(lhs) >= eps; }
inline bool ps(long double lhs) { return lhs >= eps; }
inline bool nn(long double lhs) { return lhs >= -eps; }
inline bool ng(long double lhs) { return lhs < -eps; }
inline bool np(long double lhs) { return lhs < eps; }
const long double oo = DBL_MAX;
struct Point {
  long double x, y, z;
  Point(long double a = 0, long double b = 0, long double c = 0)
      : x(a), y(b), z(c) {}
  long double length() const { return sqrt(x * x + y * y + z * z); }
  void reads() { scanf("%Lf%Lf%Lf", &x, &y, &z); }
  void print() { printf("(%Lf, %Lf, %Lf)\n", x, y, z); }
};
const Point operator-(const Point &a, const Point &b) {
  return {a.x - b.x, a.y - b.y, a.z - b.z};
}
long double operator*(const Point &a, const Point &b) {
  return a.x * b.x + a.y * b.y + a.z * b.z;
}
const Point operator+(const Point &a, const Point &b) {
  return {a.x + b.x, a.y + b.y, a.z + b.z};
}
long double dist(Point a, Point b) { return (a - b).length(); }
int n;
const int MAX = 105;
Point A;
Point v;
long double R;
Point dl[MAX];
vector<Point> zh[MAX];
long double r[MAX];
long double ans[MAX];
vector<long double> fun(long double a, long double b, long double c) {
  vector<long double> ans;
  if (zr(a)) {
    if (zr(b)) {
      if (!zr(c))
        return ans;
      else {
        ans.push_back(oo);
        return ans;
      }
    } else {
      ans.push_back(c / b);
      return ans;
    }
  } else {
    long double delta = b * b - 4 * a * c;
    if (ng(delta))
      return ans;
    else {
      if (zr(delta)) {
        ans.push_back(-b / a / 2);
      } else {
        ans.push_back((-b - sqrt(delta)) / a / 2);
        ans.push_back((-b + sqrt(delta)) / a / 2);
      }
      return ans;
    }
  }
}
int main() {
  A.reads(), v.reads(), scanf("%Lf", &R);
  scanf("%d", &n);
  for (int i = 0; i < n; i++) {
    dl[i].reads();
    scanf("%Lf", &r[i]);
    int m;
    scanf("%d", &m);
    for (int j = 0; j < m; j++) {
      Point tmp;
      tmp.reads();
      zh[i].push_back(tmp);
    }
  }
  for (int i = 0; i < n; i++) {
    ans[i] = oo;
    Point t1 = dl[i] - A;
    long double cz = t1 * v / t1.length() / v.length();
    assert(eq(t1 * v / v.length(), cz * t1.length()));
    if (ng(cz)) {
      if (le(dist(A, dl[i]), R + r[i])) ans[i] = min(ans[i], (long double)0.);
    } else {
      long double dd = t1.length() * sqrt(1 - cz * cz);
      if (le(dd, R + r[i])) {
        long double t1 = A.x - dl[i].x, t2 = A.y - dl[i].y, t3 = A.z - dl[i].z;
        long double a = v.x * v.x + v.y * v.y + v.z * v.z,
                    b = 2 * t1 * v.x + 2 * t2 * v.y + 2 * t3 * v.z,
                    c = t1 * t1 + t2 * t2 + t3 * t3 - (R + r[i]) * (R + r[i]);
        vector<long double> hh = fun(a, b, c);
        for (int k = 0; k < hh.size(); k++)
          if (nn(hh[k])) ans[i] = min(ans[i], hh[k]);
      }
    }
    for (int j = 0; j < zh[i].size(); j++) {
      Point z = zh[i][j];
      Point w = z + dl[i];
      long double t1 = A.x - w.x, t2 = A.y - w.y, t3 = A.z - w.z;
      long double a = v.x * v.x + v.y * v.y + v.z * v.z,
                  b = 2 * t1 * v.x + 2 * t2 * v.y + 2 * t3 * v.z,
                  c = t1 * t1 + t2 * t2 + t3 * t3 - R * R;
      vector<long double> as = fun(a, b, c);
      for (int k = 0; k < as.size(); k++) {
        if (nn(as[k])) ans[i] = min(ans[i], as[k]);
      }
    }
  }
  long double zzp = oo;
  for (int i = 0; i < n; i++) zzp = min(zzp, ans[i]);
  if (zzp == oo)
    printf("-1\n");
  else
    printf("%.12Lf\n", zzp);
  return 0;
}