#include <stdio.h>

int xmax[30], ymax[30], xmin[30], ymin[30];
int x[30], y[30];
int found, pairn, pairs, i, j, nslides;
int outarray[30];

int inside(int slide, int number){
  return ((xmax[slide] > x[number]) && (xmin[slide]<x[number])&& (ymax[slide]>y[number]) && (ymin[slide] < y[number]));
}

int searchpair(){
  int didsomething = 0;
  for (i=0; i<nslides; i++) {
    found = 0;
    for (j=0; j<nslides; j++) {
      if (inside(i,j)) {
	pairn=j; pairs=i;
	found++;
      }
    }
    if (found == 1) {
      outarray[pairs] = pairn;
      xmax[pairs]=xmin[pairs]=ymax[pairs]=ymin[pairs]=-32000;
      x[pairn]=y[pairn]=-32001;
      didsomething = 1;
    }
  }
  for (j=0; j<nslides; j++) {
    found = 0;
    for (i=0; i<nslides; i++) {
      if (inside(i,j)) {
	pairn=j;
	pairs=i;
	found++;
      }
    }
    if (found == 1) {
      outarray[pairs] = pairn;
      xmax[pairs]=xmin[pairs]=ymax[pairs]=ymin[pairs]=-32000;
      x[pairn]=y[pairn]=-32001;
      didsomething = 1;
    }
  }
  return (didsomething);
}

int main(){
  FILE *file;
  int   count = 1;
  
  file = fopen("slides.in", "r");
  fscanf(file, "%d", &nslides);

  while (nslides > 0){
    printf("Heap %d\n", count++);
    for (i=0 ; i < nslides ; i++)
      outarray[i] = -1;
    for (i=0 ; i < nslides; i++)
      fscanf(file, "%d%d%d%d", &xmin[i], &xmax[i], &ymin[i], &ymax[i]);
    for (i=0 ; i < nslides; i++)
      fscanf(file, "%d%d", &x[i], &y[i]);
    if (searchpair()){
      while (searchpair());
      for (i=0; i < nslides; i++)
	if (outarray[i] != -1)
	  printf("(%c,%d) ", (char)(i+65), outarray[i]+1);
    }
    else
      printf("none");
    printf("\n\n");
    fscanf(file, "%d", &nslides);
  }
  exit(0);
}