IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Ignore:
Timestamp:
May 11, 2005, 12:02:16 PM (21 years ago)
Author:
desonia
Message:

changed PS_PI* to M_PI*.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/psLib/src/astro/psTime.c

    r3712 r3884  
    1010 *  @author Ross Harman, MHPCC
    1111 *
    12  *  @version $Revision: 1.59 $ $Name: not supported by cvs2svn $
    13  *  @date $Date: 2005-04-19 02:13:53 $
     12 *  @version $Revision: 1.60 $ $Name: not supported by cvs2svn $
     13 *  @date $Date: 2005-05-11 22:02:15 $
    1414 *
    1515 *  Copyright 2004-2005 Maui High Performance Computing Center, University of Hawaii
     
    4343
    4444/** Two times pi with double precision accuracy */
    45 #define TWOPI (2.0*PS_PI)
     45#define TWOPI (2.0*M_PI)
    4646
    4747/** Conversion from radians to degrees */
    48 #define R2DEG = (180.0/PS_PI)
     48#define R2DEG = (180.0/M_PI)
    4949
    5050                /** Maximum length of time string */
     
    563563
    564564        t = 2000.0 + (mjd - 51544.03)/365.2422;
    565         dut2ut1 = 0.022*sin(TWOPI*t) - 0.012*cos(TWOPI*t) - 0.006*sin(4.0*PS_PI*t) + 0.007*cos(4.0*PS_PI*t);
     565        dut2ut1 = 0.022*sin(TWOPI*t) - 0.012*cos(TWOPI*t) - 0.006*sin(4.0*M_PI*t) + 0.007*cos(4.0*M_PI*t);
    566566        result = dut->data.F64[0] + dut->data.F64[1]*(mjd - dut->data.F64[2]) - dut2ut1;
    567567
     
    692692    }
    693693
    694     // Create output sphere and convert arcsec to radians (i.e. x/60/60*PS_PI/180)
     694    // Create output sphere and convert arcsec to radians (i.e. x/60/60*M_PI/180)
    695695    output = psAlloc(sizeof(psSphere));
    696     output->r = x * PS_PI / 648000.0;
    697     output->d = y * PS_PI / 648000.0;
     696    output->r = x * M_PI / 648000.0;
     697    output->d = y * M_PI / 648000.0;
    698698
    699699    return output;
Note: See TracChangeset for help on using the changeset viewer.