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

Comparing ray/src/gen/illum.cal (file contents):
Revision 2.2 by greg, Mon Aug 10 15:55:12 1992 UTC vs.
Revision 2.3 by greg, Mon Aug 10 16:01:51 1992 UTC

# Line 22 | Line 22 | norm_rad(r) : if( r, r, r+2*PI );
22   il_alt = Dz;
23   il_azi = norm_rad(atan2(Dy, Dx));
24  
25 < s_val(v, vN, vS) = noneg(if( il_alt-A7,
25 > s_val(v, vN, vS) = if( il_alt-A7,
26                          linterp((il_alt-A7)/(1-A7), v, vN),
27                          if ( -il_alt-A7,
28                                  linterp((-il_alt-A7)/(1-A7), v, vS),
29                                  v ),
30 <                        v ));
30 >                        v );
31                                          { sphere values }
32   s_red(r,g,b) = s_val(r, A1, A4);
33   s_grn(r,g,b) = s_val(g, A2, A5);
# Line 39 | Line 39 | il_alth = sq(-Dx*arg(11)-Dy*arg(12)-Dz*arg(13));
39   il_azih = norm_rad(atan2(-Dx*arg(8)-Dy*arg(9)-Dz*arg(10),
40                          -Dx*arg(5)-Dy*arg(6)-Dz*arg(7)));
41  
42 < h_val(v, vN) = noneg(if( il_alth-A4, linterp((il_alth-A4)/(1-A4), v, vN), v ));
42 > h_val(v, vN) = if( il_alth-A4, linterp((il_alth-A4)/(1-A4), v, vN), v );
43                                          { hemisphere values }
44   h_red(r,g,b) = h_val(r, A1);
45   h_grn(r,g,b) = h_val(g, A2);

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines