Changeset 5014 for trunk/Ohana/src/relphot
- Timestamp:
- Sep 12, 2005, 3:04:48 PM (21 years ago)
- Location:
- trunk/Ohana/src/relphot/src
- Files:
-
- 6 edited
-
ConfigInit.c (modified) (1 diff)
-
ImageOps.c (modified) (9 diffs)
-
MosaicOps.c (modified) (8 diffs)
-
find_images.c (modified) (1 diff)
-
gcatalog.c (modified) (2 diffs)
-
wcatalog.c (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
trunk/Ohana/src/relphot/src/ConfigInit.c
r4865 r5014 22 22 GetConfig (config, "IMAGE_SCATTER", "%lf", 0, &IMAGE_SCATTER); 23 23 GetConfig (config, "IMAGE_OFFSET", "%lf", 0, &IMAGE_OFFSET); 24 25 IMAGE_SCATTER *= 1000;26 IMAGE_OFFSET *= 1000;27 24 28 25 GetConfig (config, "STAR_CHISQ", "%lf", 0, &STAR_CHISQ); -
trunk/Ohana/src/relphot/src/ImageOps.c
r4865 r5014 145 145 146 146 if (image[i].code & IMAGE_BAD) return (NO_MAG); 147 value = 0.001*image[i].Mcal;147 value = image[i].Mcal_PS; 148 148 return (value); 149 149 } … … 217 217 218 218 liststats (list, dlist, N, &stats); 219 image[i].Mcal = 1000.0*stats.mean;220 image[i].dMcal = 1000.0*stats.sigma;219 image[i].Mcal_PS = stats.mean; 220 image[i].dMcal_PS = stats.sigma; 221 221 image[i].Xm = 100.0*log10(stats.chisq); 222 222 } … … 249 249 for (i = N = 0; i < Nimage; i++) { 250 250 if (image[i].code & IMAGE_BAD) continue; 251 mlist[N] = fabs (image[i].Mcal );252 slist[N] = image[i].dMcal ;251 mlist[N] = fabs (image[i].Mcal_PS); 252 slist[N] = image[i].dMcal_PS; 253 253 dlist[N] = 1; 254 254 N++; … … 260 260 liststats (slist, dlist, N, &stats); 261 261 MaxScatter = MAX (IMAGE_SCATTER, 2*stats.median); 262 fprintf (stderr, "Mrel: %f, dMrel: %f, Max Scatter: %f, Max Offset: %f\n", 0.001*MedOffset, 0.001*stats.median, 0.001*MaxScatter, 0.001*MaxOffset);262 fprintf (stderr, "Mrel: %f, dMrel: %f, Max Scatter: %f, Max Offset: %f\n", MedOffset, stats.median, MaxScatter, MaxOffset); 263 263 264 264 Nmark = 0; … … 266 266 mark = FALSE; 267 267 image[i].code &= ~ID_IMAGE_POOR; 268 mark = (image[i].dMcal > MaxScatter) || (fabs(image[i].Mcal- MedOffset) > MaxOffset);268 mark = (image[i].dMcal_PS > MaxScatter) || (fabs(image[i].Mcal_PS - MedOffset) > MaxOffset); 269 269 if (mark) { 270 270 Nmark ++; … … 296 296 /**** dMcal vs airmass ****/ 297 297 for (i = 0; i < Nimage; i++) { 298 Mlist[i] = 0.001*image[i].Mcal;299 dlist[i] = 0.001*image[i].dMcal;300 xlist[i] = 0.001*image[i].secz;298 Mlist[i] = image[i].Mcal_PS; 299 dlist[i] = image[i].dMcal_PS; 300 xlist[i] = image[i].secz_PS; 301 301 } 302 302 … … 316 316 bzero (Mlist, NBIN*sizeof(double)); 317 317 for (i = 0; i < Nimage; i++) { 318 bin = 0.001*image[i].dMcal/ 0.0025;318 bin = image[i].dMcal_PS / 0.0025; 319 319 bin = MAX (0, MIN (NBIN - 1, bin)); 320 320 Mlist[bin] += 1.0; … … 413 413 if (image[i].code & IMAGE_BAD) continue; 414 414 415 list[n] = 0.001*image[i].Mcal;415 list[n] = image[i].Mcal_PS; 416 416 dlist[n] = 1; 417 417 n++; … … 441 441 if (image[i].code & IMAGE_BAD) continue; 442 442 443 list[n] = 0.001*image[i].dMcal;443 list[n] = image[i].dMcal_PS; 444 444 dlist[n] = 1; 445 445 n++; -
trunk/Ohana/src/relphot/src/MosaicOps.c
r4865 r5014 69 69 mosaic[Nmosaic].Xm = 0.0; 70 70 mosaic[Nmosaic].code = image[i].code; 71 mosaic[Nmosaic].secz = image[i].secz ;71 mosaic[Nmosaic].secz = image[i].secz_PS; 72 72 73 73 /* add image to mosaic image list */ … … 134 134 Dmin = MIN (Dmin, D); 135 135 Dmax = MAX (Dmax, D); 136 Mcal += 0.001*image[m].Mcal;137 dMcal += 0.001*image[m].dMcal;136 Mcal += image[m].Mcal_PS; 137 dMcal += image[m].dMcal_PS; 138 138 Xm += image[m].Xm; 139 139 /* we are using mosaic.Mcal, not image.Mcal. reset image.Mcal */ 140 image[m].Mcal = 0.0;141 image[m].dMcal = image[m].Xm = NO_MAG;140 image[m].Mcal_PS = 0.0; 141 image[m].dMcal_PS = image[m].Xm = NO_MAG; 142 142 } 143 143 dS /= Nimlist[i]; … … 179 179 for (j = 0; j < Nimlist[i]; j++) { 180 180 im = imlist[i][j]; 181 image[im].Mcal = 1000.0*mosaic[i].Mcal;182 image[im].dMcal = 1000.0*mosaic[i].dMcal;181 image[im].Mcal_PS = mosaic[i].Mcal; 182 image[im].dMcal_PS = mosaic[i].dMcal; 183 183 image[im].Xm = mosaic[i].Xm; 184 184 image[im].code |= (mosaic[i].code & ID_IMAGE_FEW); … … 405 405 for (i = 0; i < Nmosaic; i++) { 406 406 if (mosaic[i].code & IMAGE_BAD) continue; 407 list[n] = 0.001*mosaic[i].Mcal;407 list[n] = mosaic[i].Mcal; 408 408 dlist[n] = 1; 409 409 n++; … … 432 432 433 433 if (mosaic[i].code & IMAGE_BAD) continue; 434 list[n] = 0.001*mosaic[i].dMcal;434 list[n] = mosaic[i].dMcal; 435 435 dlist[n] = 1; 436 436 n++; … … 538 538 liststats (slist, dlist, N, &stats); 539 539 MaxScatter = MAX (IMAGE_SCATTER, 2*stats.median); 540 fprintf (stderr, "Mrel: %f, dMrel: %f, Max Scatter: %f, Max Offset: %f\n", 0.001*MedOffset, 0.001*stats.median, 0.001*MaxScatter, 0.001*MaxOffset);540 fprintf (stderr, "Mrel: %f, dMrel: %f, Max Scatter: %f, Max Offset: %f\n", MedOffset, stats.median, MaxScatter, MaxOffset); 541 541 542 542 Nmark = 0; … … 618 618 619 619 for (i = 0; i < Nmosaic; i++) { 620 Mlist[i] = 0.001*mosaic[i].Mcal;621 dlist[i] = 0.001*mosaic[i].dMcal;622 xlist[i] = 0.001*mosaic[i].secz;620 Mlist[i] = mosaic[i].Mcal; 621 dlist[i] = mosaic[i].dMcal; 622 xlist[i] = mosaic[i].secz; 623 623 } 624 624 … … 640 640 bzero (Mlist, NBIN*sizeof(double)); 641 641 for (i = 0; i < Nmosaic; i++) { 642 bin = 0.001*mosaic[i].dMcal / 0.0025;642 bin = mosaic[i].dMcal / 0.0025; 643 643 bin = MAX (0, MIN (NBIN - 1, bin)); 644 644 Mlist[bin] += 1.0; -
trunk/Ohana/src/relphot/src/find_images.c
r4864 r5014 104 104 if (RESET) { 105 105 assignMcal (&image[nimage], (double *) NULL, -1); 106 image[nimage].dMcal = NO_MAG;106 image[nimage].dMcal_PS = NO_MAG; 107 107 image[nimage].code &= ~ID_IMAGE_POOR; 108 108 } -
trunk/Ohana/src/relphot/src/gcatalog.c
r4828 r5014 5 5 char mode; 6 6 7 /* no autodetect for CATMODE yet */8 strcpy (catalog[0].catmode, CATMODE);9 10 7 if (FINAL) { 11 8 mode = LOAD_AVES | LOAD_MEAS | LOAD_MISS | LOAD_SECF; … … 13 10 mode = LOAD_AVES | LOAD_MEAS | LOAD_SECF; 14 11 } 12 13 /* CATMODE and CATFORMAT determined from catalog */ 15 14 16 15 if (!load_catalog (catalog, mode, VERBOSE)) { -
trunk/Ohana/src/relphot/src/wcatalog.c
r4828 r5014 3 3 void wcatalog (Catalog *catalog) { 4 4 5 /* set catalog format (elixir, loneos, etc) */ 6 if (!strcmp (CATFORMAT, "INTERNAL")) { 7 sprintf (catalog[0].average_format, "DVO_AVERAGE"); 8 sprintf (catalog[0].measure_format, "DVO_MEASURE"); 9 } else { 10 sprintf (catalog[0].average_format, "DVO_AVERAGE_%s", CATFORMAT); 11 sprintf (catalog[0].measure_format, "DVO_MEASURE_%s", CATFORMAT); 12 } 5 /* CATMODE and CATFORMAT determined from catalog */ 13 6 14 7 if (!save_catalog (catalog, VERBOSE)) {
Note:
See TracChangeset
for help on using the changeset viewer.
