Changeset 17036 for trunk/psModules/src/astrom
- Timestamp:
- Mar 18, 2008, 8:38:14 AM (18 years ago)
- Location:
- trunk/psModules/src/astrom
- Files:
-
- 3 edited
-
Makefile.am (modified) (2 diffs)
-
pmAstrometryObjects.c (modified) (5 diffs)
-
pmAstrometryWCS.c (modified) (6 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/psModules/src/astrom/Makefile.am
r15562 r17036 8 8 pmAstrometryDistortion.c \ 9 9 pmAstrometryUtils.c \ 10 pmAstrometryTable.c \ 10 pmAstrometryModel.c \ 11 pmAstrometryRefstars.c \ 11 12 pmAstrometryWCS.c 12 13 … … 16 17 pmAstrometryDistortion.h \ 17 18 pmAstrometryUtils.h \ 18 pmAstrometryTable.h \ 19 pmAstrometryModel.h \ 20 pmAstrometryRefstars.h \ 19 21 pmAstrometryWCS.h 20 22 -
trunk/psModules/src/astrom/pmAstrometryObjects.c
r16069 r17036 8 8 * @author EAM, IfA 9 9 * 10 * @version $Revision: 1.3 7$ $Name: not supported by cvs2svn $11 * @date $Date: 2008-0 1-15 02:49:45$10 * @version $Revision: 1.38 $ $Name: not supported by cvs2svn $ 11 * @date $Date: 2008-03-18 18:38:14 $ 12 12 * 13 13 * Copyright 2004-2005 Maui High Performance Computing Center, University of Hawaii … … 32 32 #include "pmFPA.h" 33 33 #include "pmAstrometryObjects.h" 34 35 # define DEG_RAD 57.29577951308232236 # define RAD_DEG 0.01745329251994337 34 38 35 #define PM_ASTROMETRYOBJECTS_DEBUG 1 … … 726 723 double delScale = psMetadataLookupF32 (&status, config, "PSASTRO.GRID.DEL.SCALE"); 727 724 728 double minAngle = RAD_DEG*psMetadataLookupF32 (&status, config, "PSASTRO.GRID.MIN.ANGLE");729 double maxAngle = RAD_DEG*psMetadataLookupF32 (&status, config, "PSASTRO.GRID.MAX.ANGLE");730 double delAngle = RAD_DEG*psMetadataLookupF32 (&status, config, "PSASTRO.GRID.DEL.ANGLE");725 double minAngle = PS_RAD_DEG*psMetadataLookupF32 (&status, config, "PSASTRO.GRID.MIN.ANGLE"); 726 double maxAngle = PS_RAD_DEG*psMetadataLookupF32 (&status, config, "PSASTRO.GRID.MAX.ANGLE"); 727 double delAngle = PS_RAD_DEG*psMetadataLookupF32 (&status, config, "PSASTRO.GRID.DEL.ANGLE"); 731 728 double minSigma = psMetadataLookupF32 (&status, config, "PSASTRO.GRID.MIN.SIGMA"); 732 729 … … 762 759 *minStat = *newStat; 763 760 psLogMsg ("psModule.astrom", 4, "grid test - offset: %7.2f,%7.2f @ %6.1f deg x %7.3f (%4d pts, %5.1f sig, %5.1f var, %6.3f log metric) *", 764 minStat->offset.x, minStat->offset.y, DEG_RAD*minStat->angle, minStat->scale, minStat->nMatch, minStat->nSigma, minStat->minVar, log10(minStat->minMetric));761 minStat->offset.x, minStat->offset.y, PS_DEG_RAD*minStat->angle, minStat->scale, minStat->nMatch, minStat->nSigma, minStat->minVar, log10(minStat->minMetric)); 765 762 } else { 766 763 psLogMsg ("psModule.astrom", 4, "grid test - offset: %7.2f,%7.2f @ %6.1f deg x %7.3f (%4d pts, %5.1f sig, %5.1f var, %6.3f log metric)", 767 newStat->offset.x, newStat->offset.y, DEG_RAD*newStat->angle, newStat->scale, newStat->nMatch, newStat->nSigma, newStat->minVar, log10(newStat->minMetric));764 newStat->offset.x, newStat->offset.y, PS_DEG_RAD*newStat->angle, newStat->scale, newStat->nMatch, newStat->nSigma, newStat->minVar, log10(newStat->minMetric)); 768 765 769 766 } … … 773 770 } 774 771 psLogMsg ("psModule.astrom.grid.match", 4, "grid best - offset: %7.2f,%7.2f @ %6.1f deg x %7.3f (%4d pts, %5.1f sig, %5.1f var, %6.3f log metric)", 775 minStat->offset.x, minStat->offset.y, DEG_RAD*minStat->angle, minStat->scale, minStat->nMatch, minStat->nSigma, minStat->minVar, log10(minStat->minMetric));772 minStat->offset.x, minStat->offset.y, PS_DEG_RAD*minStat->angle, minStat->scale, minStat->nMatch, minStat->nSigma, minStat->minVar, log10(minStat->minMetric)); 776 773 777 774 // I need to decide if a solution is likely to be a good solution or just a mis-match -
trunk/psModules/src/astrom/pmAstrometryWCS.c
r16068 r17036 7 7 * @author EAM, IfA 8 8 * 9 * @version $Revision: 1.2 6$ $Name: not supported by cvs2svn $10 * @date $Date: 2008-0 1-15 02:48:58$9 * @version $Revision: 1.27 $ $Name: not supported by cvs2svn $ 10 * @date $Date: 2008-03-18 18:38:14 $ 11 11 * 12 12 * Copyright 2006 Institute for Astronomy, University of Hawaii … … 339 339 psFree (type); 340 340 341 psMetadataAddF64 (header, PS_LIST_TAIL, "CRVAL1", PS_META_REPLACE, "", wcs->toSky->R*P M_DEG_RAD);342 psMetadataAddF64 (header, PS_LIST_TAIL, "CRVAL2", PS_META_REPLACE, "", wcs->toSky->D*P M_DEG_RAD);341 psMetadataAddF64 (header, PS_LIST_TAIL, "CRVAL1", PS_META_REPLACE, "", wcs->toSky->R*PS_DEG_RAD); 342 psMetadataAddF64 (header, PS_LIST_TAIL, "CRVAL2", PS_META_REPLACE, "", wcs->toSky->D*PS_DEG_RAD); 343 343 344 344 psMetadataAddF64 (header, PS_LIST_TAIL, "CRPIX1", PS_META_REPLACE, "", wcs->crpix1); … … 604 604 // convert projection from FPA to SKY into wcs projection (degrees to radians) 605 605 wcs->toSky = psProjectionAlloc (fpa->toSky->R, fpa->toSky->D, PM_RAD_DEG, PM_RAD_DEG, fpa->toSky->type); 606 wcs->crval1 = fpa->toSky->R*P M_DEG_RAD;607 wcs->crval2 = fpa->toSky->D*P M_DEG_RAD;606 wcs->crval1 = fpa->toSky->R*PS_DEG_RAD; 607 wcs->crval2 = fpa->toSky->D*PS_DEG_RAD; 608 608 609 609 // given transformation, solve for coordinates which yields output coordinates of 0,0 … … 620 620 621 621 // pdelt1,2 has units of degrees/micron 622 double pdelt1 = fpa->toSky->Xs * P M_DEG_RAD;623 double pdelt2 = fpa->toSky->Ys * P M_DEG_RAD;622 double pdelt1 = fpa->toSky->Xs * PS_DEG_RAD; 623 double pdelt2 = fpa->toSky->Ys * PS_DEG_RAD; 624 624 625 625 // convert wcs->trans to a matrix with units of degrees/pixel … … 696 696 // convert projection from TPA to SKY into wcs projection (degrees to radians) 697 697 wcs->toSky = psProjectionAlloc (fpa->toSky->R, fpa->toSky->D, PM_RAD_DEG, PM_RAD_DEG, PS_PROJ_DIS); 698 wcs->crval1 = fpa->toSky->R*P M_DEG_RAD;699 wcs->crval2 = fpa->toSky->D*P M_DEG_RAD;698 wcs->crval1 = fpa->toSky->R*PS_DEG_RAD; 699 wcs->crval2 = fpa->toSky->D*PS_DEG_RAD; 700 700 701 701 // given transformation, solve for coordinates which yields output coordinates of 0,0 … … 712 712 713 713 // pdelt1,2 has units of degrees/micron 714 double pdelt1 = fpa->toSky->Xs * P M_DEG_RAD;715 double pdelt2 = fpa->toSky->Ys * P M_DEG_RAD;714 double pdelt1 = fpa->toSky->Xs * PS_DEG_RAD; 715 double pdelt2 = fpa->toSky->Ys * PS_DEG_RAD; 716 716 717 717 // convert wcs->trans to units of degree/micron
Note:
See TracChangeset
for help on using the changeset viewer.
