- Timestamp:
- Nov 25, 2008, 4:51:39 PM (18 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/eam_branch_20081124/Ohana/src/opihi/cmd.astro/precess.c
r7917 r20839 91 91 92 92 for (i = 0; i < xvec[0].Nelements; i++) { 93 A = xvec[0].elements [i];94 D = yvec[0].elements [i];93 A = xvec[0].elements.Flt[i]; 94 D = yvec[0].elements.Flt[i]; 95 95 SD = cos(RAD_DEG*A + zeta)*sin(theta)*cos(RAD_DEG*D) + cos(theta)*sin(RAD_DEG*D); 96 96 CD = sqrt (1 - SD*SD); … … 104 104 RA += 360; 105 105 106 xvec[0].elements [i] = RA;107 yvec[0].elements [i] = DEC;106 xvec[0].elements.Flt[i] = RA; 107 yvec[0].elements.Flt[i] = DEC; 108 108 } 109 109
Note:
See TracChangeset
for help on using the changeset viewer.
