--- ray/src/cv/lampcolor.c	1991/10/24 12:17:38	1.8
+++ ray/src/cv/lampcolor.c	1991/12/19 15:06:15	2.2
@@ -15,7 +15,9 @@ static char SCCSid[] = "$SunId$ LBL";
 #define PI	3.14159265358979323846
 
 extern char	*gets(), *strcpy();
+#ifndef atof
 extern double	atof();
+#endif
 extern float	*matchlamp();
 
 				/* lamp parameters */
@@ -207,11 +209,11 @@ again:
 
 getpolygon()			/* get projected area for a polygon */
 {
-	static double	area = 1.0;
+	static double	parea = 1.0;
 
-	getd("Polygon area", &area,
+	getd("Polygon area", &parea,
 		"Enter the total radiating area of the polygon.");
-	area = unit2meter*unit2meter * area;
+	area = unit2meter*unit2meter * parea;
 	return(1);
 }