# | Line 15 | Line 15 | |
---|---|---|
15 | il_azih - Azimuth (0 to 2*PI) for hemisphere | |
16 | } | |
17 | ||
18 | + | norm_rad(r) : if( r, r, r+2*PI ); |
19 | + | |
20 | il_alt = Dz; | |
21 | il_azi = norm_rad(Atan2(Dy, Dx)); | |
22 | ||
23 | il_alth = sq(-Dx*A7-Dy*A8-Dz*A9); | |
24 | il_azih = norm_rad(Atan2(-Dx*A4-Dy*A5-Dz*A6, -Dx*A1-Dy*A2-Dz*A3)); | |
23 | – | |
24 | – | norm_rad(r) = if( r, r, r+2*PI ); |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |