IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Ignore:
Timestamp:
Apr 17, 2006, 7:10:08 AM (20 years ago)
Author:
magnier
Message:

fixed up object output file functions, small speed improvements

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/rel10_ifa/psModules/src/objects/pmSourceIO_CMP.c

    r6859 r6864  
    33 *  @author EAM, IfA
    44 *
    5  *  @version $Revision: 1.1.2.5 $ $Name: not supported by cvs2svn $
    6  *  @date $Date: 2006-04-14 21:43:59 $
     5 *  @version $Revision: 1.1.2.6 $ $Name: not supported by cvs2svn $
     6 *  @date $Date: 2006-04-17 17:10:08 $
    77 *
    88 *  Copyright 2004 Maui High Performance Computing Center, University of Hawaii
     
    3737    psMetadataItem *mdi;
    3838    psF32 *PAR, *dPAR;
    39     float dmag, lsky;
     39    float lsky = 0;
    4040    bool status;
    4141    psEllipseShape shape;
     
    9999        psLineAdd (line, "%6.1f ",  PAR[3]);
    100100        psLineAdd (line, "%6.3f ",  PS_MIN (99.0, source->psfMag + ZERO_POINT));
    101         psLineAdd (line, "%03d ",   PS_MIN (999, (int)(1000*dmag)));
     101        psLineAdd (line, "%03d ",   PS_MIN (999, (int)(1000*source->errMag)));
    102102        psLineAdd (line, "%2d ",    type);
    103103        psLineAdd (line, "%3.1f ",  lsky);
     
    249249    return (sources);
    250250}
    251 
    252 # if (0)
    253     PAR = model->params->data.F32;
    254 dPAR = model->dparams->data.F32;
    255 
    256 dmag = dPAR[1] / PAR[1];
    257 type = pmSourceDophotType (source);
    258 lsky = (PAR[0] < 1.0) ? 0.0 : log10(PAR[0]);
    259 
    260 psLineInit (line);
    261 psLineAdd (line, "%6.1f ", PAR[2]);
    262 psLineAdd (line, "%6.1f ", PAR[3]);
    263 psLineAdd (line, "%6.3f ", PS_MIN (99.999, source->fitMag + ZERO_POINT));
    264 psLineAdd (line, "%03d ",  PS_MIN (999, (int)(1000*dmag)));
    265 psLineAdd (line, "%2d ",   type);
    266 psLineAdd (line, "%3.1f ", lsky);
    267 psLineAdd (line, "%6.3f ", 99.999); // should be 'Mgal
    268 psLineAdd (line, "%6.3f ", PS_MIN (99.999, source->apMag + ZERO_POINT));
    269 psLineAdd (line, "%6.2f ", PAR[4]); // should be 'FHWM x'
    270 psLineAdd (line, "%6.2f ", PAR[5]); // should be 'FHWM y'
    271 psLineAdd (line, "%5.1f\n", 0); // should be theta
    272 
    273 # endif
Note: See TracChangeset for help on using the changeset viewer.