| # | Line 1 | Line 1 | |
|---|---|---|
| 1 | < | { SCCSid "$SunId$ LBL" } |
| 2 | < | |
| 1 | > | { RCSid: $Id$ } |
| 2 | { | |
| 3 | Phong normal interpolation for surfaces of revolution about z. | |
| 4 | ||
| # | Line 9 | Line 8 | |
| 8 | (A3,A4) = (Mr,Br) | |
| 9 | } | |
| 10 | ||
| 11 | + | rev_dr = rev_rad*A3 + A4; |
| 12 | + | rev_rad = sqrt(Px*Px + Py*Py); |
| 13 | + | |
| 14 | rev_dx = rev_dr * Px/rev_rad; | |
| 15 | rev_dy = rev_dr * Py/rev_rad; | |
| 16 | rev_dz = Pz*A1 + A2; | |
| 15 | – | |
| 16 | – | rev_dr = rev_rad*A3 + A4; |
| 17 | – | rev_rad = sqrt(Px*Px + Py*Py); |
| – | Removed lines |
| + | Added lines |
| < | Changed lines (old) |
| > | Changed lines (new) |