Problem: A new type of mobile robot has been developed for environmental earth observation. It moves around on the ground, acquiring and recording various sorts of observational data using high precision sensors. Robots of this type have short range wireless communication devices and can exchange observational data with ones nearby. They also have large capacity memory units, on which they record data observed by themselves and those received from others.

Figure 1 illustrates the current positions of three robots A, B, and C and the geographic coverage of their wireless devices. Each circle represents the wireless coverage of a robot, with its center representing the position of the robot. In this figure, two robots A and B are in the positions where A can transmit data to B, and vice versa. In contrast, C cannot communicate with A or B, since it is too remote from them. Still, however, once B moves towards C as in Figure 2, B and C can start communicating with each other. In this manner, B can relay observational data from A to C. Figure 3 shows another example, in which data propagate among several robots instantaneously.

<image>
---
Figure 1: The initial configuration of three robots
<image>
---
Figure 2: Mobile relaying
<image>
---
Figure 3: Instantaneous relaying among multiple robots

As you may notice from these examples, if a team of robots move properly, observational data quickly spread over a large number of them. Your mission is to write a program that simulates how information spreads among robots. Suppose that, regardless of data size, the time necessary for communication is negligible.



Input

The input consists of multiple datasets, each in the following format.

> N T R
>  nickname and travel route of the first robot
>  nickname and travel route of the second robot
>  ...
>  nickname and travel route of the N-th robot
>

The first line contains three integers N, T, and R that are the number of robots, the length of the simulation period, and the maximum distance wireless signals can reach, respectively, and satisfy that 1 <=N <= 100, 1 <= T <= 1000, and 1 <= R <= 10.

The nickname and travel route of each robot are given in the following format.

> nickname
>  t0 x0 y0
>  t1 vx1 vy1
>  t2 vx2 vy2
>  ...
>  tk vxk vyk
>

Nickname is a character string of length between one and eight that only contains lowercase letters. No two robots in a dataset may have the same nickname. Each of the lines following nickname contains three integers, satisfying the following conditions.

> 0 = t0 < t1 < ... < tk = T
>  -10 <= vx1, vy1, ..., vxk, vyk<= 10
>

A robot moves around on a two dimensional plane. (x0, y0) is the location of the robot at time 0. From time ti-1 to ti (0 < i <= k), the velocities in the x and y directions are vxi and vyi, respectively. Therefore, the travel route of a robot is piecewise linear. Note that it may self-overlap or self-intersect.

You may assume that each dataset satisfies the following conditions.

* The distance between any two robots at time 0 is not exactly R.
* The x- and y-coordinates of each robot are always between -500 and 500, inclusive.
* Once any robot approaches within R + 10-6 of any other, the distance between them will become smaller than R - 10-6 while maintaining the velocities.
* Once any robot moves away up to R - 10-6 of any other, the distance between them will become larger than R + 10-6 while maintaining the velocities.
* If any pair of robots mutually enter the wireless area of the opposite ones at time t and any pair, which may share one or two members with the aforementioned pair, mutually leave the wireless area of the opposite ones at time t', the difference between t and t' is no smaller than 10-6 time unit, that is, |t - t' | >= 10-6.


A dataset may include two or more robots that share the same location at the same time. However, you should still consider that they can move with the designated velocities.

The end of the input is indicated by a line containing three zeros.

Output

For each dataset in the input, your program should print the nickname of each robot that have got until time T the observational data originally acquired by the first robot at time 0. Each nickname should be written in a separate line in dictionary order without any superfluous characters such as leading or trailing spaces.

Example

Input

3 5 10
red
0 0 0
5 0 0
green
0 5 5
5 6 1
blue
0 40 5
5 0 0
3 10 5
atom
0 47 32
5 -10 -7
10 1 0
pluto
0 0 0
7 0 0
10 3 3
gesicht
0 25 7
5 -7 -2
10 -1 10
4 100 7
impulse
0 -500 0
100 10 1
freedom
0 -491 0
100 9 2
destiny
0 -472 0
100 7 4
strike
0 -482 0
100 8 3
0 0 0


Output

blue
green
red
atom
gesicht
pluto
freedom
impulse
strike

Solution (in CPP):

Solution:
#include <stdio.h>
#include <string.h>
#include <algorithm>
#include <iostream>
#include <math.h>
#include <complex>
#include <vector>
#include <assert.h>
#include <queue>
#include <string>

using namespace std;
typedef long long ll;
typedef complex<double> Point;
static const double EPS = 1e-9;
static const double PI = acos(-1.0);

struct Line : public vector<Point> {
  Line(Point a, Point b) { push_back(a), push_back(b); }
};
struct Circle {
  Point p;
  double r;
  Circle() {;}
  Circle(Point p, double r) : p(p), r(r) {;}
};

#define REP(i, n) for (int i = 0; i < (int)(n); i++)
#define FOR(i, s, n) for (int i = (s); i < (int)(n); i++)
#define FOREQ(i, s, n) for (int i = (s); i <= (int)(n); i++)
#define DEC(i, s) for (int i = (s); i >= 0; i--)

#define SIZE(v) (int)((v).size())
#define MEMSET(v, h) memset((v), h, sizeof(v))
#define FIND(m, w) ((m).find(w) != (m).end())

inline double cross(const Point &a, const Point &b) {
  return imag(conj(a) * b);
}
inline double dot(const Point &a, const Point &b) {
  return real(conj(a) * b);
}
int ccw(Point a, Point b, Point c) {
  b -= a; c -= a;
  if (cross(b, c) > 0) { return 1; }
  if (cross(b, c) < 0) { return -1; }
  if (dot(b, c) < 0) { return 2; }
  if (norm(b) < norm(c)) { return -2; }
  return 0;
}
inline bool intersectLP(const Line &l, const Point &p) {
  return abs(cross(l[1] - p, l[0] - p)) < EPS;
}
inline bool intersectSP(const Line &s, const Point &p) {
  return abs(s[0] - p) + abs(s[1] - p) - abs(s[0] - s[1]) < EPS;
}
inline bool intersectCP(const Circle &c, const Point &p) {
  return abs(c.p - p) - c.r < EPS;
}
inline Point projection(const Line &l, const Point &p) {
  double t = dot(p - l[0], l[0] - l[1]) / norm(l[0] - l[1]);
  return l[0] + t * (l[0] - l[1]);
}
inline double distanceLP(const Line &l, const Point &p) {
  return abs(p - projection(l, p));
}
inline double distanceSP(const Line &s, const Point &p) {
  const Point r = projection(s, p);
  if (intersectSP(s, r)) { return abs(r - p); }
  return min(abs(s[0] - p), abs(s[1] - p));
}
//include inside
inline bool intersectSC(const Line &s, const Circle &c) {
  return distanceSP(s, c.p) <= c.r;
}
Point crosspointSC(const Line &s, const Circle &c) {
  assert(intersectSC(s, c));
  assert(!intersectCP(c, s[0]));
  double d = distanceLP(s, c.p);
  Point vect = (s[1] - s[0]);
  vect /= abs(vect);
  Point center1 = c.p + vect * Point(0, 1) * d;
  Point center2 = c.p - vect * Point(0, 1) * d;
  //cout << d << endl;
  //cout << vect << endl;
  //cout << center1 << " " << center2 << endl;
  if (intersectLP(s, center1)) {
    return center1 - vect * sqrt(c.r*c.r - d*d);
  }
  return center2 - vect * sqrt(c.r*c.r - d*d);
}

struct Node {
  double t;
  int robot;
  Node(double t, int robot) :t(t), robot(robot) {;}
  bool operator<(const Node &rhs) const { return t > rhs.t; }
};

int N, T, R;
char name[110][30];
Point inipos[110];
vector<Point> velocity[110];
vector<double> starttime[110];
bool havedata[110];
double gettime[110];

double senddata(int frobot, int trobot, double start) {
  Point pos = inipos[frobot] - inipos[trobot];
  Circle circle = Circle(Point(0, 0), R);
  Point v;
  int findex = 0;
  int tindex = 0;
  double ptime = 0;
  while (true) {
    double ntime = min(starttime[frobot][findex], starttime[trobot][tindex]);
    ntime = min(ntime, start);
    v = velocity[frobot][findex] - velocity[trobot][tindex];
    pos += v * (ntime - ptime);
    ptime = ntime;
    if (ntime == start) { break; }
    if (starttime[frobot][findex] < starttime[trobot][tindex]) {
      findex++;
    } else {
      tindex++;
    }
  }
  if (intersectCP(circle, pos)) { return start; }
  while (findex != (int)starttime[frobot].size() - 1 || tindex != (int)starttime[trobot].size() - 1) {
    if (ptime > gettime[trobot]) { break; }
    if (abs(pos) > R + (T - ptime) * 20 + 1) { break; }
    double ntime = min(starttime[frobot][findex], starttime[trobot][tindex]);
    v = velocity[frobot][findex] - velocity[trobot][tindex];
    Point npos = pos + v * (ntime - ptime);
    //cout << ntime << " " << ptime << " " << pos << " " << npos << endl;
    if (intersectSC(Line(pos, npos), circle)) {
      //cout << endl;
      Point intersect = crosspointSC(Line(pos, npos), circle);
      if (abs(v) == 0) { return ptime; }
      //cout << intersect << endl;
      //cout << ptime + abs(intersect - pos) / abs(v);
      double ret = ptime + abs(intersect - pos) / abs(v);
      assert(ptime - EPS < ret && ret < ntime + EPS);
      return ret;
    }
    pos = npos;
    ptime = ntime;
    if (starttime[frobot][findex] < starttime[trobot][tindex]) {
      findex++;
    } else {
      tindex++;
    }
  }
  //cout << endl;
  return T + 1;
}

int main() {
  while (scanf("%d %d %d", &N, &T, &R), N|T|R) {
    MEMSET(havedata, false);
    REP(i, N) {
      velocity[i].clear();
      starttime[i].clear();
      gettime[i] = T + EPS;
      scanf("%s", name[i]);
      double t, x, y;
      scanf("%lf %lf %lf", &t, &x, &y);
      inipos[i] = Point(x, y);
      velocity[i].push_back(Point(0, 0));
      starttime[i].push_back(0);
      while (true) {
        scanf("%lf %lf %lf", &t, &x, &y);
        velocity[i].push_back(Point(x, y));
        starttime[i].push_back(t);
        if (t == T) { break; }
      }
      velocity[i].push_back(Point(0, 0));
      starttime[i].push_back(T + 1);
    }
    priority_queue<Node> que;
    que.push(Node(0.0, 0));
    while (!que.empty()) {
      double t = que.top().t;
      int robot = que.top().robot;
      que.pop();
      if (havedata[robot]) { continue; }
      havedata[robot] = true;
      gettime[robot] = t;
      //cout << robot << " " << t << endl;
      REP(i, N) {
        if (havedata[i]) { continue; }
        double sendtime = senddata(robot, i, t);
        if (sendtime < gettime[i]) {
          gettime[i] = sendtime;
          que.push(Node(sendtime, i));
        }
      }
    }
    vector<string> ans;
    REP(i, N) {
      if (havedata[i]) { ans.push_back(name[i]); }
    }
    sort(ans.begin(), ans.end());
    REP(i, ans.size()) {
      printf("%s\n", ans[i].c_str());
    }
  }
}