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