IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Ignore:
Timestamp:
Oct 24, 2005, 2:38:00 PM (21 years ago)
Author:
drobbin
Message:

Fixed psSphereOps except for Galactic transformation at the pole.

File:
1 edited

Legend:

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

    r5437 r5444  
    88 *  @author Dave Robbins, MHPCC
    99 *
    10  *  @version $Revision: 1.7 $ $Name: not supported by cvs2svn $
    11  *  @date $Date: 2005-10-21 02:14:02 $
     10 *  @version $Revision: 1.8 $ $Name: not supported by cvs2svn $
     11 *  @date $Date: 2005-10-25 00:38:00 $
    1212 *
    1313 *  Copyright 2004-2005 Maui High Performance Computing Center, University of Hawaii
     
    135135                                 0.0);
    136136
     137    /*    psSphereRot *test = psSphereRotICRSToGalactic();
     138        if (fabs(coord->d-DEG_TO_RAD(27.1283)) < 0.0001 && transform->q0 == test->q0 &&
     139            transform->q1 == test->q1 && transform->q2 == test->q2 && transform->q3 == test->q3){
     140            printf("\ncoordquat = %lf,%lf,%lf,%lf\n", coordQuat->q0, coordQuat->q1, coordQuat->q2,
     141             coordQuat->q3);
     142    //        coordQuat->q1 += -1.0;
     143            test->q3 = - test->q3;
     144            *(psSphereRot**)&transform = test;
     145        }
     146        psFree(test);
     147    */
    137148    // Inserted by PAP
    138149    psSphereRot *conjugate = psSphereRotConjugate(NULL, transform);
Note: See TracChangeset for help on using the changeset viewer.