--- ray/src/cv/arch2rad.c	1990/12/17 14:43:08	1.3
+++ ray/src/cv/arch2rad.c	1991/02/14 13:18:30	1.5
@@ -487,10 +487,10 @@ FILE	*fp;
 	}
 						/* put out faces */
 	sprintf(buf, "op%d", ++nopens);
-	putface(openmod, buf, "ref", &newp, 3, 7, 4, 0, fp);
-	putface(openmod, buf, "opp", &newp, 5, 6, 2, 1, fp);
-	putface(openmod, buf, "end1", &newp, 2, 6, 7, 3, fp);
-	putface(openmod, buf, "end2", &newp, 4, 5, 1, 0, fp);
+	putface(openmod, buf, "ref", &newp, 4, 5, 1, 0, fp);
+	putface(openmod, buf, "opp", &newp, 2, 6, 7, 3, fp);
+	putface(openmod, buf, "end1", &newp, 5, 6, 2, 1, fp);
+	putface(openmod, buf, "end2", &newp, 3, 7, 4, 0, fp);
 	putface(openmod, buf, "bot", &newp, 1, 2, 3, 0, fp);
 	putface(openmod, buf, "top", &newp, 7, 6, 5, 4, fp);
 }
@@ -505,7 +505,7 @@ register RULEHD	*rp;
 	ID	tmpid;
 	
 	if (rp->qflg & FL(Q_LAY)) {		/* check layer */
-		tmpid.name = NULL;
+		tmpid.name = fhead.layer[bp->layer];
 		tmpid.number = bp->layer;
 		if (!matchid(&tmpid, &idm(rp)[Q_LAY]))
 			return(0);
@@ -542,12 +542,12 @@ FILE	*fp;
 		return;
 	bn = blkname(bp);
 	if (ff & 1<<F_REF)
-		putface(m, bn, "ref", &bp->p, 3, 7, 4, 0, fp);
+		putface(m, bn, "ref", &bp->p, 4, 5, 1, 0, fp);
 	if (ff & 1<<F_OPP)
-		putface(m, bn, "opp", &bp->p, 5, 6, 2, 1, fp);
+		putface(m, bn, "opp", &bp->p, 2, 6, 7, 3, fp);
 	if (ff & 1<<F_END) {
-		putface(m, bn, "end1", &bp->p, 2, 6, 7, 3, fp);
-		putface(m, bn, "end2", &bp->p, 4, 5, 1, 0, fp);
+		putface(m, bn, "end1", &bp->p, 5, 6, 2, 1, fp);
+		putface(m, bn, "end2", &bp->p, 3, 7, 4, 0, fp);
 	}
 	if (ff & 1<<F_BOT)
 		putface(m, bn, "bot", &bp->p, 1, 2, 3, 0, fp);
@@ -563,20 +563,22 @@ register BLOCK	*bp;
 	static char	nambuf[32];
 	static int	blkcnt = 0;
 	register char	*nam;
-	register int	i;
+	register int	i, j;
 
+	sprintf(nambuf, "l%d.", bp->layer);
+	i = strlen(nambuf);
 	nam = bp->refid.name;
-	if (nam == NULL)
-		nam = fhead.layer[bp->layer];
 	if (nam == NULL) {
-		sprintf(nambuf, "l%d.", bp->layer);
-		i = strlen(nambuf);
-	} else {
-		for (i = 0; i < 12 && nam[i]; i++) {
-			if (nam[i] == ' ' || nam[i] == '\t')
-				nambuf[i] = '_';
+		nam = fhead.layer[bp->layer];
+		if (nam != NULL)
+			i = 0;
+	}
+	if (nam != NULL) {
+		for (j = 0; j < 12 && nam[j]; j++) {
+			if (nam[j] == ' ' || nam[j] == '\t')
+				nambuf[i++] = '_';
 			else
-				nambuf[i] = nam[i];
+				nambuf[i++] = nam[j];
 		}
 		nambuf[i++] = '.';
 	}