Changeset 1779 for branches/mergetest/external/atnf/pks/pks_maths.cc
- Timestamp:
- 07/29/10 19:13:46 (14 years ago)
- Location:
- branches/mergetest
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/mergetest
- Property svn:mergeinfo changed
-
branches/mergetest/external/atnf/pks/pks_maths.cc
r1720 r1779 321 321 322 322 // Azimuth and elevation (rad). 323 az = atan2(-cos(dec)*sin(ha), 324 sin(dec)*cos(lat) - cos(dec)*sin(lat)*cos(ha)); 323 az = atan2(cos(dec)*sin(ha), 324 cos(dec)*sin(lat)*cos(ha) - sin(dec)*cos(lat)); 325 if (az < 0.0) az += C::_2pi; 325 326 el = asin(sin(dec)*sin(lat) + cos(dec)*cos(lat)*cos(ha)); 326 327 327 if (az < 0.0) az += C::_2pi;328 328 } 329 329
Note: See TracChangeset
for help on using the changeset viewer.