| 1 |
< |
/* Copyright (c) 1986 Regents of the University of California */ |
| 1 |
> |
/* Copyright (c) 1990 Regents of the University of California */ |
| 2 |
|
|
| 3 |
|
#ifndef lint |
| 4 |
|
static char SCCSid[] = "$SunId$ LBL"; |
| 86 |
|
r->rop[i] = r->rorg[i] + r->rdir[i]*r->rot; |
| 87 |
|
VCOPY(r->ron, co->ad); |
| 88 |
|
r->rod = -rdx[2]; |
| 89 |
< |
r->rofs = 1.0; setident4(r->rofx); |
| 90 |
< |
r->robs = 1.0; setident4(r->robx); |
| 89 |
> |
r->rox = NULL; |
| 90 |
|
return(1); /* good */ |
| 91 |
|
} |
| 92 |
|
/* roots for cone, cup, cyl., tube */ |
| 130 |
|
r->ron[i] = (co->al*r->ron[i] - c*co->ad[i]) |
| 131 |
|
/co->sl; |
| 132 |
|
r->rod = -DOT(r->rdir, r->ron); |
| 133 |
< |
r->rofs = 1.0; setident4(r->rofx); |
| 135 |
< |
r->robs = 1.0; setident4(r->robx); |
| 133 |
> |
r->rox = NULL; |
| 134 |
|
return(1); /* good */ |
| 135 |
|
} |
| 136 |
|
return(0); |