#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <limits.h>
#include <ctype.h>
#include <math.h>

#define INPUT "slides.in"

int n;
int sl[40][4];
int mat[40][40];
int vec[40];

int
main(void)
{
    int h=1;
    int i,j,k;
    int a,b;
    int fst;
    int encon;

    freopen(INPUT,"r",stdin);
    
    while(1) {
        scanf("%d",&n);
        if (n==0) break;
        
        memset(sl,0,sizeof(sl));
        memset(mat,0,sizeof(mat));
        for (i=0;i<n;i++) {
            vec[i]=-1;
        }
        
        for (i=0;i<n;i++) {
            scanf("%d %d %d %d",&sl[i][0],&sl[i][1],&sl[i][2],&sl[i][3]);
        }
        
        for (i=0;i<n;i++) {
            scanf("%d %d",&a,&b);
            for (j=0;j<n;j++) {
                if (sl[j][0]<=a && a<=sl[j][1] && sl[j][2]<=b && b<=sl[j][3]) {
                    mat[j][i]=1;
                }
            }
        }

        printf("Heap %d\n",h++);
	
	for (k=0; k<n; k++) {

	  encon=0;
	  for (i=0; i<n; i++) {
	    int peso=0;
	    int cual;
	    for (j=0; j<n; j++) {
	      if (mat[i][j]) {
		peso++;
		cual=j;
		if (peso>1) {
		  break;
		}
	      }
	    }
	    if (peso == 1) {
	      encon = 1;
	      vec[cual]=i;
	      for (j=0;j<n;j++) {
		mat[j][cual]=0;
	      }
	      break;
	    }
	  }
	  if (encon == 0) break;
	}


        if (encon==1) {
            fst=1;
            for (i=0;i<n;i++) {
                for (j=0;j<n;j++) {
                    if (vec[j]==i) {
                        if (fst) {
                            fst=0;
                        } else {
                            printf(" ");
                        }
                        printf("(%c,%d)",'A'+i,j+1);
                    }
                }
            }
            printf("\n");
        } else {
            printf("none\n");
        }

        printf("\n");
    }
    exit(0);
}