--- ray/src/rt/srcsamp.c	1991/10/23 08:50:06	1.5
+++ ray/src/rt/srcsamp.c	1991/10/23 13:43:52	1.6
@@ -216,7 +216,7 @@ flatpart(si, r)				/* partition a flat source */
 register SRCINDEX  *si;
 register RAY  *r;
 {
-	register double  *vp;
+	register FLOAT  *vp;
 	FVECT  v;
 	double  du2, dv2;
 	int  pi;
@@ -300,7 +300,7 @@ scylform(sn, dir)		/* compute cosine for cylinder's pr
 int  sn;
 register FVECT  dir;		/* assume normalized */
 {
-	register double  *dv;
+	register FLOAT  *dv;
 	double  d;
 
 	dv = source[sn].ss[SU];