| 109 |
|
for (nfiles = 0; nfiles < MAXINP; nfiles++) { |
| 110 |
|
setcolor(input[nfiles].coef, 1.0, 1.0, 1.0); |
| 111 |
|
setcolor(input[nfiles].expos, 1.0, 1.0, 1.0); |
| 112 |
< |
copystruct(&input[nfiles].vw, &stdview); |
| 112 |
> |
input[nfiles].vw = stdview; |
| 113 |
|
input[nfiles].pa = 1.0; |
| 114 |
|
} |
| 115 |
|
nfiles = 0; |
| 312 |
|
|
| 313 |
|
init() /* perform final setup */ |
| 314 |
|
{ |
| 315 |
< |
double l_colin(), l_expos(), l_pixaspect(), l_ray(), l_psize(); |
| 315 |
> |
double l_colin(char *), l_expos(char *), l_pixaspect(char *), |
| 316 |
> |
l_ray(char *), l_psize(char *); |
| 317 |
|
register int i; |
| 318 |
|
/* define constants */ |
| 319 |
|
varset("PI", ':', PI); |
| 447 |
|
|
| 448 |
|
|
| 449 |
|
double |
| 450 |
< |
l_pixaspect() /* return pixel aspect ratio */ |
| 450 |
> |
l_pixaspect(char *nm) /* return pixel aspect ratio */ |
| 451 |
|
{ |
| 452 |
|
register int fn; |
| 453 |
|
|
| 519 |
|
static unsigned long ltick[MAXINP]; |
| 520 |
|
static FVECT lorg[MAXINP], ldir[MAXINP]; |
| 521 |
|
static double ldist[MAXINP]; |
| 522 |
< |
FLOAT loc[2]; |
| 522 |
> |
RREAL loc[2]; |
| 523 |
|
int fn; |
| 524 |
|
register int i; |
| 525 |
|
|
| 552 |
|
|
| 553 |
|
|
| 554 |
|
double |
| 555 |
< |
l_psize() /* compute pixel size in steradians */ |
| 555 |
> |
l_psize(char *nm) /* compute pixel size in steradians */ |
| 556 |
|
{ |
| 557 |
|
static unsigned long ltick[MAXINP]; |
| 558 |
|
static double psize[MAXINP]; |
| 559 |
|
FVECT dir0, org, dirx, diry; |
| 560 |
< |
FLOAT locx[2], locy[2]; |
| 560 |
> |
RREAL locx[2], locy[2]; |
| 561 |
|
double d; |
| 562 |
|
int fn; |
| 563 |
|
register int i; |