--- ray/src/cv/arch2rad.c	1991/02/14 13:18:30	1.5
+++ ray/src/cv/arch2rad.c	1991/10/14 09:51:16	1.7
@@ -426,18 +426,19 @@ FILE	*fp;
 					/* check for repeats */
 	rept = 0; nrepts = 0;
 	for (i = 0; i < nm; i++) {
-		if (ml[i] == sm) {
+		if (ml[i] == sm || !strcmp(ml[i], VOIDID)) {
 			rept |= 1<<i;
 			nrepts++;
+			continue;
 		}
 		for (j = 0; j < i; j++)
-			if (ml[j] == ml[i]) {
+			if (!(rept & 1<<j) && ml[j] == ml[i]) {
 				rept |= 1<<j;
 				nrepts++;
 			}
 	}
 					/* print antimatter and modlist */
-	fprintf(fp, "\nvoid antimatter %s\n", openmod);
+	fprintf(fp, "\n%s antimatter %s\n", VOIDID, openmod);
 	fprintf(fp, "%d %s", 1+nm-nrepts, sm);
 	for (i = 0; i < nm; i++)
 		if (!(rept & 1<<i))
@@ -463,27 +464,27 @@ FILE	*fp;
 		newp.h[i] = p->h[i];
 	}
 					/* spread reference and opposite */
-	if (p->x[1] > p->x[0]) {
+	if (p->x[2] > p->x[0]) {
 		newp.x[0] -= 2;
-		newp.x[1] += 2;
+		newp.x[1] -= 2;
 		newp.x[2] += 2;
-		newp.x[3] -= 2;
-	} else if (p->x[0] > p->x[1]) {
+		newp.x[3] += 2;
+	} else if (p->x[0] > p->x[2]) {
 		newp.x[0] += 2;
-		newp.x[1] -= 2;
+		newp.x[1] += 2;
 		newp.x[2] -= 2;
-		newp.x[3] += 2;
+		newp.x[3] -= 2;
 	}
-	if (p->y[1] > p->y[0]) {
+	if (p->y[2] > p->y[0]) {
 		newp.y[0] -= 2;
-		newp.y[1] += 2;
+		newp.y[1] -= 2;
 		newp.y[2] += 2;
-		newp.y[3] -= 2;
-	} else if (p->y[0] > p->y[1]) {
+		newp.y[3] += 2;
+	} else if (p->y[0] > p->y[2]) {
 		newp.y[0] += 2;
-		newp.y[1] -= 2;
+		newp.y[1] += 2;
 		newp.y[2] -= 2;
-		newp.y[3] += 2;
+		newp.y[3] -= 2;
 	}
 						/* put out faces */
 	sprintf(buf, "op%d", ++nopens);