--- ray/src/cv/ies2rad.c	1993/06/04 14:40:25	2.8
+++ ray/src/cv/ies2rad.c	1993/12/16 10:01:30	2.10
@@ -40,7 +40,7 @@ static char SCCSid[] = "$SunId$ LBL";
 					/* file types */
 #define T_RAD		".rad"
 #define T_DST		".dat"
-#define T_TLT		"+.dat"
+#define T_TLT		"%.dat"
 					/* shape types */
 #define RECT		1
 #define DISK		2
@@ -407,8 +407,11 @@ char	*inpname, *outname;
 	}
 	if (lampcolor == NULL) {
 		fprintf(stderr, "%s: warning - no lamp type\n", inpname);
+		fputs("# Unknown lamp type (used default)\n", outfp);
 		lampcolor = defcolor;
-	}
+	} else if (lamptype == NULL)
+		fprintf(outfp,"# CIE(x,y) = (%f,%f)\n# Depreciation = %.1f%%\n",
+				lampcolor[3], lampcolor[4], 100.*lampcolor[5]);
 	if (feof(inpfp)) {
 		fprintf(stderr, "%s: not in IES format\n", inpname);
 		goto readerr;