IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Changeset 8127


Ignore:
Timestamp:
Aug 4, 2006, 2:16:31 AM (20 years ago)
Author:
eugene
Message:

rationalize RA output values to 0-360

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/Ohana/src/libdvo/src/coordops.c

    r7080 r8127  
    106106    *ra  = DEG_RAD*alpha + coords[0].crval1;
    107107    *dec = DEG_RAD*delta;
     108
     109    /* rationalize ra range 0 - 360.0 */
     110    while (*ra < 0.0)   *ra += 360.0;
     111    while (*ra > 360.0) *ra -= 360.0;
     112
    108113    return (TRUE);
    109114  }
     
    134139      *dec = delta + coords[0].crval2;
    135140    }
     141
     142    /* rationalize ra range 0 - 360.0 */
     143    while (*ra < 0.0)   *ra += 360.0;
     144    while (*ra > 360.0) *ra -= 360.0;
     145
    136146    return (TRUE);
    137147  }
Note: See TracChangeset for help on using the changeset viewer.