IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Changeset 20025


Ignore:
Timestamp:
Oct 9, 2008, 11:43:57 AM (18 years ago)
Author:
beaumont
Message:

Added a call to psastroLuminosityFunctionPlot

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/cnb_branch_20080830/psastro/src/psastroLuminosityFunction.c

    r17677 r20025  
    2727}
    2828
    29 pmLumFunc *psastroLuminosityFunction (psArray *stars) {
     29pmLumFunc *psastroLuminosityFunction (psArray *stars, pmLumFunc *rawFunc) {
    3030
    3131    if (stars->n == 0) return NULL;
     
    3636    double mMax = star->Mag;
    3737    for (int i = 0; i < stars->n; i++) {
    38         star = stars->data[i];
    39         mMin = PS_MIN (star->Mag, mMin);
    40         mMax = PS_MAX (star->Mag, mMax);
     38        star = stars->data[i];
     39        mMin = PS_MIN (star->Mag, mMin);
     40        mMax = PS_MAX (star->Mag, mMax);
    4141    }
    4242
    4343    int nBin = 1 + (mMax - mMin) / dMag;
    4444    if (nBin <= 1) {
    45         psLogMsg ("psastro", 4, "insufficient valid stars for this readout\n");
    46         return NULL;
     45        psLogMsg ("psastro", 4, "insufficient valid stars for this readout\n");
     46        return NULL;
    4747    }
    4848
     
    5454
    5555    for (int i = 0; i < stars->n; i++) {
    56         star = stars->data[i];
    57         if (!isfinite(star->Mag)) continue;
    58         int bin = (star->Mag - mMin) / dMag;
    59         if (bin < 0) psAbort("bin cannot be negative!");
    60         if (bin >= nBin) psAbort("bin cannot be > %d!", nBin);
    61         nMags->data.F32[bin] += 1.0;
     56        star = stars->data[i];
     57        if (!isfinite(star->Mag)) continue;
     58        int bin = (star->Mag - mMin) / dMag;
     59        if (bin < 0) psAbort("bin cannot be negative!");
     60        if (bin >= nBin) psAbort("bin cannot be > %d!", nBin);
     61        nMags->data.F32[bin] += 1.0;
    6262    }
    6363
     
    6767    int sPeak = 0;
    6868    for (int i = 0; i < nMags->n; i++) {
    69         if (nMags->data.F32[i] < nPeak) continue;
    70         iPeak = i;
    71         nPeak = nMags->data.F32[i];
    72         sPeak += nPeak;
     69        if (nMags->data.F32[i] < nPeak) continue;
     70        iPeak = i;
     71        nPeak = nMags->data.F32[i];
     72        sPeak += nPeak;
    7373    }
    7474
     
    8181    int n = 0;
    8282    for (int i = 0; i < nMags->n; i++) {
    83         if (nMags->data.F32[i] < 1) continue;
    84         if ((i > iPeak) && (nMags->data.F32[i] < 0.8*nPeak)) continue;
    85         lnMag->data.F32[n] = log10 (nMags->data.F32[i]);
    86         Mag->data.F32[n] = mMin + (i + 0.5)*dMag;
    87         n++;
     83        if (nMags->data.F32[i] < 1) continue;
     84        if ((i > iPeak) && (nMags->data.F32[i] < 0.8*nPeak)) continue;
     85        lnMag->data.F32[n] = log10 (nMags->data.F32[i]);
     86        Mag->data.F32[n] = mMin + (i + 0.5)*dMag;
     87        n++;
    8888    }
    8989    lnMag->n = n;
     
    100100
    101101    if (!psVectorClipFitPolynomial1D(line, stats, mask, 0xff, lnMag, NULL, Mag)) {
    102         psLogMsg ("psastro", 4, "Failed to fit the luminosity function\n");
    103         return(NULL);
     102        psLogMsg ("psastro", 4, "Failed to fit the luminosity function\n");
     103        return(NULL);
    104104    }
    105105
     
    108108    double mMaxValid = NAN;
    109109    for (int i = 0; i < Mag->n; i++) {
    110         if (mask->data.U8[i]) continue;
    111         if (isnan(mMinValid) || (Mag->data.F32[i] < mMinValid)) {
    112             mMinValid = Mag->data.F32[i];
    113         }
    114         if (isnan(mMaxValid) || (Mag->data.F32[i] > mMaxValid)) {
    115             mMaxValid = Mag->data.F32[i];
    116         }
     110        if (mask->data.U8[i]) continue;
     111        if (isnan(mMinValid) || (Mag->data.F32[i] < mMinValid)) {
     112            mMinValid = Mag->data.F32[i];
     113        }
     114        if (isnan(mMaxValid) || (Mag->data.F32[i] > mMaxValid)) {
     115            mMaxValid = Mag->data.F32[i];
     116        }
    117117    }
    118118
     
    129129    lumFunc->sPeak = sPeak;
    130130
     131    psastroLuminosityFunctionPlot(lnMag, Mag, lumFunc, rawFunc);
     132
    131133    psFree (lnMag);
    132134    psFree (nMags);
Note: See TracChangeset for help on using the changeset viewer.