90 |
|
|
91 |
|
static RAY thisray; /* for our convenience */ |
92 |
|
|
93 |
< |
static void oputo(), oputd(), oputv(), oputl(), oputL(), |
93 |
> |
static void oputo(), oputd(), oputv(), oputl(), oputL(), oputc(), |
94 |
|
oputp(), oputn(), oputN(), oputs(), oputw(), oputm(); |
95 |
|
|
96 |
|
static void ourtrace(), tabin(); |
234 |
|
*table++ = oputl; |
235 |
|
castonly = 0; |
236 |
|
break; |
237 |
+ |
case 'c': /* local coordinates */ |
238 |
+ |
*table++ = oputc; |
239 |
+ |
break; |
240 |
|
case 'L': /* single ray length */ |
241 |
|
*table++ = oputL; |
242 |
|
break; |
432 |
|
|
433 |
|
static void |
434 |
|
oputo(r) /* print origin */ |
435 |
< |
register RAY *r; |
435 |
> |
RAY *r; |
436 |
|
{ |
437 |
|
(*putreal)(r->rorg[0]); |
438 |
|
(*putreal)(r->rorg[1]); |
442 |
|
|
443 |
|
static void |
444 |
|
oputd(r) /* print direction */ |
445 |
< |
register RAY *r; |
445 |
> |
RAY *r; |
446 |
|
{ |
447 |
|
(*putreal)(r->rdir[0]); |
448 |
|
(*putreal)(r->rdir[1]); |
452 |
|
|
453 |
|
static void |
454 |
|
oputv(r) /* print value */ |
455 |
< |
register RAY *r; |
455 |
> |
RAY *r; |
456 |
|
{ |
457 |
|
COLR cout; |
458 |
|
|
471 |
|
|
472 |
|
static void |
473 |
|
oputl(r) /* print effective distance */ |
474 |
< |
register RAY *r; |
474 |
> |
RAY *r; |
475 |
|
{ |
476 |
|
(*putreal)(r->rt); |
477 |
|
} |
479 |
|
|
480 |
|
static void |
481 |
|
oputL(r) /* print single ray length */ |
482 |
< |
register RAY *r; |
482 |
> |
RAY *r; |
483 |
|
{ |
484 |
|
(*putreal)(r->rot); |
485 |
|
} |
486 |
|
|
487 |
|
|
488 |
|
static void |
489 |
+ |
oputc(r) /* print local coordinates */ |
490 |
+ |
RAY *r; |
491 |
+ |
{ |
492 |
+ |
(*putreal)(r->uv[0]); |
493 |
+ |
(*putreal)(r->uv[1]); |
494 |
+ |
} |
495 |
+ |
|
496 |
+ |
|
497 |
+ |
static void |
498 |
|
oputp(r) /* print point */ |
499 |
< |
register RAY *r; |
499 |
> |
RAY *r; |
500 |
|
{ |
501 |
|
if (r->rot < FHUGE) { |
502 |
|
(*putreal)(r->rop[0]); |
512 |
|
|
513 |
|
static void |
514 |
|
oputN(r) /* print unperturbed normal */ |
515 |
< |
register RAY *r; |
515 |
> |
RAY *r; |
516 |
|
{ |
517 |
|
if (r->rot < FHUGE) { |
518 |
|
(*putreal)(r->ron[0]); |
547 |
|
|
548 |
|
static void |
549 |
|
oputs(r) /* print name */ |
550 |
< |
register RAY *r; |
550 |
> |
RAY *r; |
551 |
|
{ |
552 |
|
if (r->ro != NULL) |
553 |
|
fputs(r->ro->oname, stdout); |
559 |
|
|
560 |
|
static void |
561 |
|
oputw(r) /* print weight */ |
562 |
< |
register RAY *r; |
562 |
> |
RAY *r; |
563 |
|
{ |
564 |
|
(*putreal)(r->rweight); |
565 |
|
} |
567 |
|
|
568 |
|
static void |
569 |
|
oputm(r) /* print modifier */ |
570 |
< |
register RAY *r; |
570 |
> |
RAY *r; |
571 |
|
{ |
572 |
|
if (r->ro != NULL) |
573 |
|
if (r->ro->omod != OVOID) |