IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Ignore:
Timestamp:
Dec 23, 2005, 1:58:45 PM (21 years ago)
Author:
eugene
Message:

fixing output functions

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/psphot/src/psphotApResid.c

    r5828 r5837  
    55    int Npsf;
    66    bool status;
    7     float x, y;
    8     float fitMag, obsMag;
     7    pmModel *model;
     8    pmSource *source;
    99
    1010    // XXX EAM : check that PSF_FIT_RADIUS < SKY_OUTER_RADIUS
     
    2626    // select the NNN brightest, non-saturated sources, or just select PSFSTARs?
    2727    for (int i = 0; (i < sources->n) && (Npsf < 300); i++) {
    28         pmSource *source = sources->data[i];
    29         pmModel  *model  = source->modelPSF;
     28        source = sources->data[i];
    3029
    31         if (model == NULL) continue;
    3230        if (source->type != PM_SOURCE_STAR) continue;
    3331        if (source->mode &  PM_SOURCE_SATSTAR) continue;
     
    3634        if (source->mode &  PM_SOURCE_POOR) continue;
    3735
    38         // set shape for this model based on PSF
    39         x = model->params->data.F32[2];
    40         y = model->params->data.F32[3];
    41 
    42         pmSourceAddModel (source->pixels, source->mask, model, false, false);
    43 
    44         psImageKeepCircle (source->mask, x, y, RADIUS, "OR", PSPHOT_MASK_MARKED);
    45         status = pmSourcePhotometry (&fitMag, &obsMag, model, source->pixels, source->mask);
    46         psImageKeepCircle (source->mask, x, y, RADIUS, "AND", ~PSPHOT_MASK_MARKED);
    47 
    48         pmSourceSubModel (source->pixels, source->mask, model, false, false);
    49         if (!status) continue;
     36        // get magnitudes, uncorrected for (x, y, rflux)
     37        model = pmSourceMagnitudes (source, NULL, RADIUS);
     38        if (model == NULL) continue;
    5039
    5140        mask->data.U8[Npsf] = 0;
    52         xPos->data.F64[Npsf] = x;
    53         yPos->data.F64[Npsf] = y;
    54         rflux->data.F64[Npsf] = pow(10.0, 0.4*fitMag);
    55         apResid->data.F64[Npsf] = obsMag - fitMag;
     41        xPos->data.F64[Npsf] = model->params->data.F32[2];
     42        yPos->data.F64[Npsf] = model->params->data.F32[3];
     43        rflux->data.F64[Npsf] = pow(10.0, 0.4*source->fitMag);
     44        apResid->data.F64[Npsf] = source->apMag - source->fitMag;
    5645
    5746        psVectorExtend (mask, 100, 1);
Note: See TracChangeset for help on using the changeset viewer.