Changeset 5350
- Timestamp:
- Oct 17, 2005, 8:07:54 AM (21 years ago)
- Location:
- trunk/psphot/src
- Files:
-
- 7 edited
-
pmObjects_EAM.c (modified) (3 diffs)
-
psMinimize.c (modified) (2 diffs)
-
psModulesUtils.c (modified) (2 diffs)
-
psPolynomials.c (modified) (9 diffs)
-
psphotArguments.c (modified) (2 diffs)
-
psphotOutput.c (modified) (6 diffs)
-
psphotSetup.c (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/psphot/src/pmObjects_EAM.c
r5134 r5350 6 6 * @author EAM, IfA: significant modifications. 7 7 * 8 * @version $Revision: 1. 8$ $Name: not supported by cvs2svn $9 * @date $Date: 2005- 09-26 19:49:41$8 * @version $Revision: 1.9 $ $Name: not supported by cvs2svn $ 9 * @date $Date: 2005-10-17 18:07:54 $ 10 10 * 11 11 * Copyright 2004 Maui High Performance Computing Center, University of Hawaii … … 999 999 int Ncr = 0; 1000 1000 int Nsatstar = 0; 1001 psRegion allArray = {0, 0, 0, 0}; 1001 1002 1002 1003 psVector *starsn = psVectorAlloc (sources->n, PS_TYPE_F32); … … 1030 1031 1031 1032 // XXX EAM : can we use the value of SATURATE if mask is NULL? 1032 int Nsatpix = psImageCountPixelMask (tmpSrc->mask, PSPHOT_MASK_SATURATED);1033 int Nsatpix = psImageCountPixelMask (tmpSrc->mask, allArray, PSPHOT_MASK_SATURATED); 1033 1034 1034 1035 // saturated star (size consistent with PSF or larger) -
trunk/psphot/src/psMinimize.c
r5049 r5350 4 4 // XXX EAM : this file contains my alternate implementations of psMinimizeLMChi2 5 5 // XXX EAM this implementation of MinLM includes limits on params & dparams 6 7 psBool p_psMinLM_GuessABP( 8 psImage *Alpha, 9 psVector *Beta, 10 psVector *Params, 11 const psImage *alpha, 12 const psVector *beta, 13 const psVector *params, 14 const psVector *paramMask, 15 const psVector *beta_lim, 16 const psVector *params_min, 17 const psVector *params_max, 18 psF64 lambda); 6 19 7 20 psBool psMinimizeLMChi2_EAM(psMinimization *min, … … 275 288 276 289 p_psMinLM_SetABX (alpha, beta, params, paramMask, x, y, dy, func); 277 p_psMinLM_GuessABP (Alpha, delta, Params, alpha, beta, params, paramMask, 0.0);290 p_psMinLM_GuessABP (Alpha, delta, Params, alpha, beta, params, paramMask, NULL, NULL, NULL, 0.0); 278 291 279 292 psFree (alpha); -
trunk/psphot/src/psModulesUtils.c
r5125 r5350 23 23 24 24 // I'm either expecting a string, with the name "HD:keyword"... 25 if (item->type == PS_ META_STR) {25 if (item->type == PS_DATA_STRING) { 26 26 source = item->data.V; 27 27 if (!strncasecmp (source, "HD:", 3)) { … … 38 38 39 39 // ... or a value (F32?) 40 if (item->type == PS_ META_F32) {40 if (item->type == PS_DATA_F32) { 41 41 value = item->data.F32; 42 42 // psFree (item); -
trunk/psphot/src/psPolynomials.c
r5134 r5350 12 12 void Polynomial1DDump_EAM (psPolynomial1D *poly) { 13 13 14 for (int i = 0; i < poly-> COOL_1D_n+ 1; i++) {14 for (int i = 0; i < poly->nX + 1; i++) { 15 15 fprintf (stderr, "x^%d : %g +/- %g\n", i, poly->coeff[i], poly->coeffErr[i]); 16 16 } … … 39 39 newPoly = (psPolynomial1D* ) psAlloc(sizeof(psPolynomial1D)); 40 40 newPoly->type = type; 41 newPoly-> COOL_1D_n= nOrder;41 newPoly->nX = nOrder; 42 42 newPoly->coeff = (psF64 *)psAlloc(nTerm * sizeof(psF64)); 43 43 newPoly->coeffErr = (psF64 *)psAlloc(nTerm * sizeof(psF64)); … … 58 58 psF64 xSum = 1.0; 59 59 60 for (loop_x = 0; loop_x < myPoly-> COOL_1D_n+ 1; loop_x++) {60 for (loop_x = 0; loop_x < myPoly->nX + 1; loop_x++) { 61 61 if (myPoly->mask[loop_x] == 0) { 62 62 polySum += xSum * myPoly->coeff[loop_x]; … … 141 141 # endif 142 142 143 nTerm = myPoly-> COOL_1D_n+ 1;143 nTerm = myPoly->nX + 1; 144 144 A = psImageAlloc(nTerm, nTerm, PS_TYPE_F64); 145 145 B = psVectorAlloc(nTerm, PS_TYPE_F64); … … 223 223 224 224 if (poly == NULL) return; 225 for (int i = 0; i < poly-> COOL_2D_nX + 1; i++) {225 for (int i = 0; i < poly->nX + 1; i++) { 226 226 psFree (poly->coeff[i]); 227 227 psFree (poly->coeffErr[i]); … … 251 251 newPoly = (psPolynomial2D* ) psAlloc(sizeof(psPolynomial2D)); 252 252 newPoly->type = type; 253 newPoly-> COOL_2D_nX = nXorder;254 newPoly-> COOL_2D_nY = nYorder;253 newPoly->nX = nXorder; 254 newPoly->nY = nYorder; 255 255 256 256 newPoly->coeff = (psF64 **)psAlloc(nXterm * sizeof(psF64 *)); … … 278 278 void Polynomial2DDump_EAM (psPolynomial2D *poly) { 279 279 280 for (int i = 0; i < poly-> COOL_2D_nX + 1; i++) {281 for (int j = 0; j < poly-> COOL_2D_nY + 1; j++) {280 for (int i = 0; i < poly->nX + 1; i++) { 281 for (int j = 0; j < poly->nY + 1; j++) { 282 282 fprintf (stderr, "x^%d y^%d : %g +/- %g\n", i, j, poly->coeff[i][j], poly->coeffErr[i][j]); 283 283 } … … 298 298 299 299 // XXX EAM : nX is order, not nTerms 300 for (loop_x = 0; loop_x < myPoly-> COOL_2D_nX + 1; loop_x++) {300 for (loop_x = 0; loop_x < myPoly->nX + 1; loop_x++) { 301 301 ySum = xSum; 302 302 // XXX EAM : nX is order, not nTerms 303 for (loop_y = 0; loop_y < myPoly-> COOL_2D_nY + 1; loop_y++) {303 for (loop_y = 0; loop_y < myPoly->nY + 1; loop_y++) { 304 304 if (myPoly->mask[loop_x][loop_y] == 0) { 305 305 polySum += ySum * myPoly->coeff[loop_x][loop_y]; … … 425 425 psS32 nTerm, nXterm, nYterm; 426 426 427 nXterm = myPoly-> COOL_2D_nX + 1;428 nYterm = myPoly-> COOL_2D_nY + 1;427 nXterm = myPoly->nX + 1; 428 nYterm = myPoly->nY + 1; 429 429 nTerm = nXterm * nYterm; 430 430 -
trunk/psphot/src/psphotArguments.c
r5123 r5350 6 6 7 7 int N, Nfail; 8 int mode = PS_ META_STR| PS_META_REPLACE;8 int mode = PS_DATA_STRING | PS_META_REPLACE; 9 9 10 10 // basic pslib options … … 50 50 // load config information 51 51 psMetadata *config = psMetadataAlloc (); 52 psMetadataAdd (config, PS_LIST_HEAD, "PSF_MODEL", PS_ META_MULTI, "folder for psf model entries", NULL);52 psMetadataAdd (config, PS_LIST_HEAD, "PSF_MODEL", PS_DATA_METADATA_MULTI, "folder for psf model entries", NULL); 53 53 config = psMetadataConfigParse (config, &Nfail, argv[3], FALSE); 54 54 -
trunk/psphot/src/psphotOutput.c
r5128 r5350 186 186 187 187 // write necessary information to output header 188 psMetadataAdd (imdata->header, PS_LIST_TAIL, "NSTARS", PS_ META_S32 | PS_META_REPLACE, "NUMBER OF STARS", sources->n);189 psMetadataAdd (imdata->header, PS_LIST_TAIL, "ZERO_PT", PS_ META_F32 | PS_META_REPLACE, "zero point", ZERO_POINT);190 psMetadataAdd (imdata->header, PS_LIST_TAIL, "APMIFIT", PS_ META_F32 | PS_META_REPLACE, "aperture residual", psf->ApResid);191 psMetadataAdd (imdata->header, PS_LIST_TAIL, "dAPMIFIT", PS_ META_F32 | PS_META_REPLACE, "ap residual scatter", psf->dApResid);192 psMetadataAdd (imdata->header, PS_LIST_TAIL, "SKYBIAS", PS_ META_F32 | PS_META_REPLACE, "aperture sky bias", psf->skyBias);193 psMetadataAdd (imdata->header, PS_LIST_TAIL, "PHOTCODE", PS_ META_STR| PS_META_REPLACE, "photometry code", PHOTCODE);194 psMetadataAdd (imdata->header, PS_LIST_TAIL, "FWHM_X", PS_ META_F32 | PS_META_REPLACE, "PSF FWHM X", 0.0);195 psMetadataAdd (imdata->header, PS_LIST_TAIL, "FWHM_Y", PS_ META_F32 | PS_META_REPLACE, "PSF FWHM Y", 0.0);196 psMetadataAdd (imdata->header, PS_LIST_TAIL, "ANGLE", PS_ META_F32 | PS_META_REPLACE, "PSF ANGLE", 0.0);197 psMetadataAdd (imdata->header, PS_LIST_TAIL, "FSATUR", PS_ META_F32 | PS_META_REPLACE, "SATURATION MAG", 0.0);198 psMetadataAdd (imdata->header, PS_LIST_TAIL, "FLIMIT", PS_ META_F32 | PS_META_REPLACE, "COMPLETENESS MAG", 0.0);188 psMetadataAdd (imdata->header, PS_LIST_TAIL, "NSTARS", PS_DATA_S32 | PS_META_REPLACE, "NUMBER OF STARS", sources->n); 189 psMetadataAdd (imdata->header, PS_LIST_TAIL, "ZERO_PT", PS_DATA_F32 | PS_META_REPLACE, "zero point", ZERO_POINT); 190 psMetadataAdd (imdata->header, PS_LIST_TAIL, "APMIFIT", PS_DATA_F32 | PS_META_REPLACE, "aperture residual", psf->ApResid); 191 psMetadataAdd (imdata->header, PS_LIST_TAIL, "dAPMIFIT", PS_DATA_F32 | PS_META_REPLACE, "ap residual scatter", psf->dApResid); 192 psMetadataAdd (imdata->header, PS_LIST_TAIL, "SKYBIAS", PS_DATA_F32 | PS_META_REPLACE, "aperture sky bias", psf->skyBias); 193 psMetadataAdd (imdata->header, PS_LIST_TAIL, "PHOTCODE", PS_DATA_STRING | PS_META_REPLACE, "photometry code", PHOTCODE); 194 psMetadataAdd (imdata->header, PS_LIST_TAIL, "FWHM_X", PS_DATA_F32 | PS_META_REPLACE, "PSF FWHM X", 0.0); 195 psMetadataAdd (imdata->header, PS_LIST_TAIL, "FWHM_Y", PS_DATA_F32 | PS_META_REPLACE, "PSF FWHM Y", 0.0); 196 psMetadataAdd (imdata->header, PS_LIST_TAIL, "ANGLE", PS_DATA_F32 | PS_META_REPLACE, "PSF ANGLE", 0.0); 197 psMetadataAdd (imdata->header, PS_LIST_TAIL, "FSATUR", PS_DATA_F32 | PS_META_REPLACE, "SATURATION MAG", 0.0); 198 psMetadataAdd (imdata->header, PS_LIST_TAIL, "FLIMIT", PS_DATA_F32 | PS_META_REPLACE, "COMPLETENESS MAG", 0.0); 199 199 200 200 // create file, write-out header … … 205 205 mdi = psMetadataLookup (imdata->header, "NAXIS"); 206 206 mdi->data.S32 = 0; 207 mdi->type = PS_ META_S32;208 209 // psMetadataAdd (imdata->header, PS_LIST_HEAD, "NAXIS", PS_ META_S32 | PS_META_REPLACE, "", 0);207 mdi->type = PS_DATA_S32; 208 209 // psMetadataAdd (imdata->header, PS_LIST_HEAD, "NAXIS", PS_DATA_S32 | PS_META_REPLACE, "", 0); 210 210 psFitsWriteHeader (imdata->header, fits); 211 211 psFree (fits); … … 275 275 276 276 // write necessary information to output header 277 psMetadataAdd (imdata->header, PS_LIST_TAIL, "NSTARS", PS_ META_S32 | PS_META_REPLACE, "NUMBER OF STARS", sources->n);278 psMetadataAdd (imdata->header, PS_LIST_TAIL, "ZERO_PT", PS_ META_F32 | PS_META_REPLACE, "zero point", ZERO_POINT);279 psMetadataAdd (imdata->header, PS_LIST_TAIL, "APMIFIT", PS_ META_F32 | PS_META_REPLACE, "aperture residual", psf->ApResid);280 psMetadataAdd (imdata->header, PS_LIST_TAIL, "dAPMIFIT", PS_ META_F32 | PS_META_REPLACE, "ap residual scatter", psf->dApResid);281 psMetadataAdd (imdata->header, PS_LIST_TAIL, "SKYBIAS", PS_ META_F32 | PS_META_REPLACE, "aperture sky bias", psf->skyBias);282 psMetadataAdd (imdata->header, PS_LIST_TAIL, "PHOTCODE", PS_ META_STR| PS_META_REPLACE, "photometry code", PHOTCODE);283 psMetadataAdd (imdata->header, PS_LIST_TAIL, "FWHM_X", PS_ META_F32 | PS_META_REPLACE, "PSF FWHM X", 0.0);284 psMetadataAdd (imdata->header, PS_LIST_TAIL, "FWHM_Y", PS_ META_F32 | PS_META_REPLACE, "PSF FWHM Y", 0.0);285 psMetadataAdd (imdata->header, PS_LIST_TAIL, "ANGLE", PS_ META_F32 | PS_META_REPLACE, "PSF ANGLE", 0.0);286 psMetadataAdd (imdata->header, PS_LIST_TAIL, "FSATUR", PS_ META_F32 | PS_META_REPLACE, "SATURATION MAG", 0.0);287 psMetadataAdd (imdata->header, PS_LIST_TAIL, "FLIMIT", PS_ META_F32 | PS_META_REPLACE, "COMPLETENESS MAG", 0.0);277 psMetadataAdd (imdata->header, PS_LIST_TAIL, "NSTARS", PS_DATA_S32 | PS_META_REPLACE, "NUMBER OF STARS", sources->n); 278 psMetadataAdd (imdata->header, PS_LIST_TAIL, "ZERO_PT", PS_DATA_F32 | PS_META_REPLACE, "zero point", ZERO_POINT); 279 psMetadataAdd (imdata->header, PS_LIST_TAIL, "APMIFIT", PS_DATA_F32 | PS_META_REPLACE, "aperture residual", psf->ApResid); 280 psMetadataAdd (imdata->header, PS_LIST_TAIL, "dAPMIFIT", PS_DATA_F32 | PS_META_REPLACE, "ap residual scatter", psf->dApResid); 281 psMetadataAdd (imdata->header, PS_LIST_TAIL, "SKYBIAS", PS_DATA_F32 | PS_META_REPLACE, "aperture sky bias", psf->skyBias); 282 psMetadataAdd (imdata->header, PS_LIST_TAIL, "PHOTCODE", PS_DATA_STRING | PS_META_REPLACE, "photometry code", PHOTCODE); 283 psMetadataAdd (imdata->header, PS_LIST_TAIL, "FWHM_X", PS_DATA_F32 | PS_META_REPLACE, "PSF FWHM X", 0.0); 284 psMetadataAdd (imdata->header, PS_LIST_TAIL, "FWHM_Y", PS_DATA_F32 | PS_META_REPLACE, "PSF FWHM Y", 0.0); 285 psMetadataAdd (imdata->header, PS_LIST_TAIL, "ANGLE", PS_DATA_F32 | PS_META_REPLACE, "PSF ANGLE", 0.0); 286 psMetadataAdd (imdata->header, PS_LIST_TAIL, "FSATUR", PS_DATA_F32 | PS_META_REPLACE, "SATURATION MAG", 0.0); 287 psMetadataAdd (imdata->header, PS_LIST_TAIL, "FLIMIT", PS_DATA_F32 | PS_META_REPLACE, "COMPLETENESS MAG", 0.0); 288 288 289 289 // set NAXIS to 0 … … 291 291 mdi = psMetadataLookup (imdata->header, "NAXIS"); 292 292 mdi->data.S32 = 0; 293 mdi->type = PS_ META_S32;293 mdi->type = PS_DATA_S32; 294 294 295 295 table = psArrayAlloc (sources->n); … … 310 310 311 311 row = psMetadataAlloc (); 312 psMetadataAdd (row, PS_LIST_HEAD, "X_PIX", PS_ META_F32, "", PAR[2]);313 psMetadataAdd (row, PS_LIST_HEAD, "Y_PIX", PS_ META_F32, "", PAR[3]);314 psMetadataAdd (row, PS_LIST_HEAD, "MAG_RAW", PS_ META_F32, "", source->fitMag + ZERO_POINT);315 psMetadataAdd (row, PS_LIST_HEAD, "MAG_ERR", PS_ META_F32, "", (int)(1000*dmag));316 psMetadataAdd (row, PS_LIST_HEAD, "MAG_GAL", PS_ META_F32, "", type);317 psMetadataAdd (row, PS_LIST_HEAD, "MAG_AP", PS_ META_F32, "", lsky);318 psMetadataAdd (row, PS_LIST_HEAD, "LOG_SKY", PS_ META_F32, "", 32.0); // should be 'Mgal'319 psMetadataAdd (row, PS_LIST_HEAD, "FWHM_X", PS_ META_F32, "", source->apMag + ZERO_POINT);320 psMetadataAdd (row, PS_LIST_HEAD, "FWHM_Y", PS_ META_F32, "", PAR[4]); // should be 'FHWM x'321 psMetadataAdd (row, PS_LIST_HEAD, "THETA", PS_ META_F32, "", PAR[5]); // should be 'FHWM y'312 psMetadataAdd (row, PS_LIST_HEAD, "X_PIX", PS_DATA_F32, "", PAR[2]); 313 psMetadataAdd (row, PS_LIST_HEAD, "Y_PIX", PS_DATA_F32, "", PAR[3]); 314 psMetadataAdd (row, PS_LIST_HEAD, "MAG_RAW", PS_DATA_F32, "", source->fitMag + ZERO_POINT); 315 psMetadataAdd (row, PS_LIST_HEAD, "MAG_ERR", PS_DATA_F32, "", (int)(1000*dmag)); 316 psMetadataAdd (row, PS_LIST_HEAD, "MAG_GAL", PS_DATA_F32, "", type); 317 psMetadataAdd (row, PS_LIST_HEAD, "MAG_AP", PS_DATA_F32, "", lsky); 318 psMetadataAdd (row, PS_LIST_HEAD, "LOG_SKY", PS_DATA_F32, "", 32.0); // should be 'Mgal' 319 psMetadataAdd (row, PS_LIST_HEAD, "FWHM_X", PS_DATA_F32, "", source->apMag + ZERO_POINT); 320 psMetadataAdd (row, PS_LIST_HEAD, "FWHM_Y", PS_DATA_F32, "", PAR[4]); // should be 'FHWM x' 321 psMetadataAdd (row, PS_LIST_HEAD, "THETA", PS_DATA_F32, "", PAR[5]); // should be 'FHWM y' 322 322 psMetadataAdd (row, PS_LIST_HEAD, "DOPHOT", PS_TYPE_S8, "", 0); // should be theta 323 // psMetadataAdd (header, PS_LIST_HEAD, "DUMMY", PS_ META_STR, "", NULL);323 // psMetadataAdd (header, PS_LIST_HEAD, "DUMMY", PS_DATA_STRING, "", NULL); 324 324 325 325 psArrayAdd (table, 100, row); … … 334 334 335 335 theader = psMetadataAlloc (); 336 psMetadataAdd (theader, PS_LIST_HEAD, "EXTNAME", PS_ META_STR, "extension name", "SMPFILE");336 psMetadataAdd (theader, PS_LIST_HEAD, "EXTNAME", PS_DATA_STRING, "extension name", "SMPFILE"); 337 337 338 338 unlink (filename); -
trunk/psphot/src/psphotSetup.c
r5134 r5350 21 21 // XXX EAM - shouldn't this be part of the basic FITS concept? 22 22 header = psMetadataAlloc (); 23 psMetadataAdd (header, PS_LIST_HEAD, "COMMENT", PS_ META_MULTI, "folder for comment", NULL);24 psMetadataAdd (header, PS_LIST_HEAD, "HISTORY", PS_ META_MULTI, "folder for history", NULL);23 psMetadataAdd (header, PS_LIST_HEAD, "COMMENT", PS_DATA_METADATA_MULTI, "folder for comment", NULL); 24 psMetadataAdd (header, PS_LIST_HEAD, "HISTORY", PS_DATA_METADATA_MULTI, "folder for history", NULL); 25 25 26 26 // read header and image data from INPUT … … 38 38 float RDNOISE = pmConfigLookupF32 (&status, config, header, "RDNOISE"); 39 39 float GAIN = pmConfigLookupF32 (&status, config, header, "GAIN"); 40 psMetadataAdd (config, PS_LIST_TAIL, "RDNOISE", PS_ META_F32 | PS_META_REPLACE, "read noise value used", RDNOISE);41 psMetadataAdd (config, PS_LIST_TAIL, "GAIN", PS_ META_F32 | PS_META_REPLACE, "gain value used", GAIN);40 psMetadataAdd (config, PS_LIST_TAIL, "RDNOISE", PS_DATA_F32 | PS_META_REPLACE, "read noise value used", RDNOISE); 41 psMetadataAdd (config, PS_LIST_TAIL, "GAIN", PS_DATA_F32 | PS_META_REPLACE, "gain value used", GAIN); 42 42 43 43 // load the weight image if it is supplied, otherwise build from input
Note:
See TracChangeset
for help on using the changeset viewer.
