IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Ignore:
Timestamp:
Oct 2, 2008, 8:08:31 AM (18 years ago)
Author:
eugene
Message:

replace poor code with ohana_normalize_angle

Location:
trunk/Ohana/src/libdvo/src
Files:
3 edited

Legend:

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

    r17419 r19823  
    134134    *dec = DEG_RAD*delta;
    135135
    136     /* rationalize ra range 0 - 360.0 */
    137     while (*ra < 0.0)   *ra += 360.0;
    138     while (*ra > 360.0) *ra -= 360.0;
     136    *ra = ohana_normalize_angle (*ra);
    139137
    140138    return (TRUE);
     
    168166    *dec = delta + coords[0].crval2;
    169167
    170     /* rationalize ra range 0 - 360.0 */
    171     while (*ra < 0.0)   *ra += 360.0;
    172     while (*ra > 360.0) *ra -= 360.0;
     168    *ra = ohana_normalize_angle (*ra);
    173169
    174170    return (TRUE);
  • trunk/Ohana/src/libdvo/src/skydb.c

    r5241 r19823  
    9999  SkyRegion *list, *new, *sub;
    100100
    101   while (c1.r > 360.0) c1.r -= 360.0;
    102   while (c1.r <   0.0) c1.r += 360.0;
    103   while (c2.r > 360.0) c2.r -= 360.0;
    104   while (c2.r <   0.0) c2.r += 360.0;
     101  c1.r = ohana_normalize_angle (c1.r);
     102  c2.r = ohana_normalize_angle (c2.r);
    105103
    106104  /* check on c1.r > c2.r : cross boundary */
  • trunk/Ohana/src/libdvo/src/skyregion_ops.c

    r14401 r19823  
    206206  SkyList *list, *extra;
    207207
    208   /* rationalize Rmin, Rmax */
    209   while (Rmin <   0.0) Rmin += 360;
    210   while (Rmin > 360.0) Rmin -= 360;
    211   while (Rmax <   0.0) Rmax += 360;
    212   while (Rmax > 360.0) Rmax -= 360;
     208  Rmin = ohana_normalize_angle (Rmin);
     209  Rmax = ohana_normalize_angle (Rmax);
    213210
    214211  /* handle 0,360 boundary requests */
Note: See TracChangeset for help on using the changeset viewer.