ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/radiance/ray/src/gen/rev.cal
Revision: 1.1
Committed: Thu Aug 22 08:49:42 1991 UTC (32 years, 7 months ago) by greg
Branch: MAIN
Log Message:
Initial revision

File Contents

# User Rev Content
1 greg 1.1 { SCCSid "$SunId$ LBL" }
2    
3     {
4     Phong normal interpolation for surfaces of revolution about z.
5    
6     11/7/88
7    
8     (A1,A2) = (Mz,Bz)
9     (A3,A4) = (Mr,Br)
10     }
11    
12     rev_dx = rev_dr * Px/rev_rad;
13     rev_dy = rev_dr * Py/rev_rad;
14     rev_dz = Pz*A1 + A2;
15    
16     rev_dr = rev_rad*A3 + A4;
17     rev_rad = sqrt(Px*Px + Py*Py);