ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/radiance/ray/src/cal/cal/reinhart.cal
(Generate patch)

Comparing ray/src/cal/cal/reinhart.cal (file contents):
Revision 1.1 by greg, Wed Jul 1 00:39:34 2009 UTC vs.
Revision 1.4 by greg, Wed Dec 9 21:34:23 2009 UTC

# Line 5 | Line 5
5  
6          Modified from Tregenza.cal
7  
8 +        Need to specify MF constant before loading (usu. power of two)
9 +
10          June 2009       G. Ward
11   }
12   DEGREE : PI/180;
# Line 15 | Line 17 | Atan2(y,x) : posangle(atan2(y,x));
17   alt = Asin(Dz)/DEGREE;
18   azi = Atan2(Dx,Dy)/DEGREE;
19  
18 – MF : 2^2;                       { Multiplication factor }
20   alpha : 90/(MF*7 + .5);         { Separation between rows in degrees }
21                                  { Number of patches per row }
22   tnaz(r) : select(r, 30, 30, 24, 24, 18, 12, 6);
# Line 27 | Line 28 | r_row = floor(alt/alpha);
28  
29   r_inc = 360/rnaz(r_row);
30  
31 < r_azn = if(azi-(360-.5*r_inc), 0, floor((azi+.5*r_inc)/r_inc));
31 > r_azn = if(359.9999-.5*r_inc - azi, floor((azi+.5*r_inc)/r_inc), 0);
32  
33   rbin = if (-alt, 0, raccum(r_row) + r_azn + 1);
34  

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines