| 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; |
