IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Changeset 5513


Ignore:
Timestamp:
Nov 14, 2005, 1:44:35 PM (21 years ago)
Author:
drobbin
Message:

Updated Precession

File:
1 edited

Legend:

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

    r5507 r5513  
    88*  @author Robert Daniel DeSonia, MHPCC
    99*
    10 *  @version $Revision: 1.12 $ $Name: not supported by cvs2svn $
    11 *  @date $Date: 2005-11-12 03:37:34 $
     10*  @version $Revision: 1.13 $ $Name: not supported by cvs2svn $
     11*  @date $Date: 2005-11-14 23:44:35 $
    1212*
    1313*  Copyright 2005 Maui High Performance Computing Center, University of Hawaii
     
    349349    // Check for null parameter
    350350    PS_ASSERT_PTR_NON_NULL(time, NULL);
     351    if (time->type == PS_TIME_UT1) {
     352        psError(PS_ERR_BAD_PARAMETER_VALUE, true,
     353                "Invalid time input.  Time cannot be of type UT1.\n");
     354        return NULL;
     355    }
    351356
    352357    // Convert psTime to MJD
     
    529534            // Date too early for tables. Get default time delta value from metadata, and issue warning.
    530535            psLogMsg(__func__,PS_LOG_WARN,PS_ERRORTEXT_psTime_TIME_PREDATES_TABLES,mjd,"xp");
    531      
     536
    532537            // Lookup value from time metadata loaded from pslib.config
    533538            tableMetadataItem = psMetadataLookup(timeMetadata, "psLib.time.before.xp");
     
    538543            }
    539544            x = tableMetadataItem->data.F64;
    540      
     545
    541546        } else if(status == PS_LOOKUP_PAST_BOTTOM) {
    542547            tableMetadataItem = psMetadataLookup(timeMetadata, "psLib.time.predict.mjd");
     
    547552            }
    548553            mjdPred = tableMetadataItem->data.F64;
    549      
     554
    550555            // Get xp
    551556            tableMetadataItem = psMetadataLookup(timeMetadata, "psLib.time.predict.xp");
     
    556561            xp = (psVector*)tableMetadataItem->data.V;
    557562            PS_ASSERT_PTR_NON_NULL(xp,NULL);
    558      
     563
    559564            // Get yp
    560565            tableMetadataItem = psMetadataLookup(timeMetadata, "psLib.time.predict.yp");
     
    565570            yp = (psVector*)tableMetadataItem->data.V;
    566571            PS_ASSERT_PTR_NON_NULL(yp,NULL);
    567      
     572
    568573            // Calculate "a" and "c" constants
    569574            a = TWOPI*(mjd - mjdPred)/365.25;
    570575            c = TWOPI*(mjd - mjdPred)/435.0;
    571      
     576
    572577            // Calculate x and y polar coordinates
    573578            x = xp->data.F64[0] +
     
    576581                xp->data.F64[3]*cos(c) +
    577582                xp->data.F64[4]*sin(c);
    578      
    579      
    580      
    581      
    582      
     583
     584
     585
     586
     587
    583588        }
    584589    */
Note: See TracChangeset for help on using the changeset viewer.