IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Ignore:
Timestamp:
Aug 24, 2009, 8:40:34 AM (17 years ago)
Author:
eugene
Message:

various petrosian / radial profile analysis improvements

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/eam_branches/20090715/psphot/src/psphotEllipticalContour.c

    r25105 r25178  
    7373    psMinimizeLMChi2(myMin, covar, params, constraint, x, y, yErr, psphotEllipticalContourFunc);
    7474
     75    /// XXX rationalize? if epsilon > 1, flip major and minor axes (rotate by 90 degrees)
     76    if (params->data.F32[PAR_EPSILON] < 1.0) {
     77        petrosian->axes.major = params->data.F32[PAR_RMIN] / params->data.F32[PAR_EPSILON];
     78        petrosian->axes.minor = params->data.F32[PAR_RMIN];
     79        petrosian->axes.theta = params->data.F32[PAR_PHI];
     80    } else {
     81        petrosian->axes.major = params->data.F32[PAR_RMIN];
     82        petrosian->axes.minor = params->data.F32[PAR_RMIN] / params->data.F32[PAR_EPSILON];
     83        petrosian->axes.theta = params->data.F32[PAR_PHI] + 0.5*M_PI;
     84    }
     85
    7586    fprintf (stderr, "# fitted values:\n");
    7687    fprintf (stderr, "Po:  %f\n", params->data.F32[PAR_PHI]*PS_DEG_RAD);
    7788    fprintf (stderr, "Ep:  %f\n", params->data.F32[PAR_EPSILON]);
    7889    fprintf (stderr, "Rm:  %f\n", params->data.F32[PAR_RMIN]);
    79 
    80     /// XXX rationalize? if epsilon > 1, flip major and minor axes (rotate by 90 degrees)
    81     petrosian->axes.major = params->data.F32[PAR_RMIN] / params->data.F32[PAR_EPSILON];
    82     petrosian->axes.minor = params->data.F32[PAR_RMIN];
    83     petrosian->axes.theta = params->data.F32[PAR_PHI];
    8490
    8591    // show the results
Note: See TracChangeset for help on using the changeset viewer.