11 |
|
*/ |
12 |
|
|
13 |
|
#include <stdio.h> |
14 |
+ |
#include <math.h> |
15 |
|
#include <ctype.h> |
16 |
|
#include "color.h" |
17 |
|
#include "paths.h" |
40 |
|
/* file types */ |
41 |
|
#define T_RAD ".rad" |
42 |
|
#define T_DST ".dat" |
43 |
< |
#define T_TLT "+.dat" |
43 |
> |
#define T_TLT "%.dat" |
44 |
|
/* shape types */ |
45 |
|
#define RECT 1 |
46 |
|
#define DISK 2 |
407 |
|
} |
408 |
|
if (lampcolor == NULL) { |
409 |
|
fprintf(stderr, "%s: warning - no lamp type\n", inpname); |
410 |
+ |
fputs("# Unknown lamp type (used default)\n", outfp); |
411 |
|
lampcolor = defcolor; |
412 |
< |
} |
412 |
> |
} else if (lamptype == NULL) |
413 |
> |
fprintf(outfp,"# CIE(x,y) = (%f,%f)\n# Depreciation = %.1f%%\n", |
414 |
> |
lampcolor[3], lampcolor[4], 100.*lampcolor[5]); |
415 |
|
if (feof(inpfp)) { |
416 |
|
fprintf(stderr, "%s: not in IES format\n", inpname); |
417 |
|
goto readerr; |