--- ray/src/rt/rtrace.c	1991/05/01 11:16:58	1.13
+++ ray/src/rt/rtrace.c	1991/06/19 16:36:48	1.15
@@ -30,6 +30,10 @@ static char SCCSid[] = "$SunId$ LBL";
 
 #include  "otypes.h"
 
+int  dimlist[MAXDIM];			/* sampling dimensions */
+int  ndims = 0;				/* number of sampling dimensions */
+int  samplendx = 0;			/* index for this sample */
+
 int  imm_irrad = 0;			/* compute immediate irradiance? */
 
 int  inform = 'a';			/* input format */
@@ -42,6 +46,7 @@ int  vresolu = 0;			/* vertical resolution */
 double  dstrsrc = 0.0;			/* square source distribution */
 double  shadthresh = .05;		/* shadow threshold */
 double  shadcert = .5;			/* shadow certainty */
+int  directrelay = 0;			/* number of source relays */
 
 int  maxdepth = 6;			/* maximum recursion depth */
 double  minweight = 4e-3;		/* minimum ray weight */
@@ -106,6 +111,7 @@ char  *fname;
 			fflush(stdout);
 			continue;
 		}
+		samplendx++;
 							/* compute and print */
 		if (imm_irrad)
 			irrad(orig, direc);