IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Ignore:
Timestamp:
Feb 17, 2006, 7:13:42 AM (20 years ago)
Author:
magnier
Message:

bulk merge of eam_rel9_p0 onto this branch

File:
1 edited

Legend:

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

    r5257 r6448  
    3131
    3232    if (deriv != NULL) {
     33        psF32 *dPAR = deriv->data.F32;
     34
    3335        // note difference from a pure gaussian: q = params->data.F32[1]*r
    3436        psF32 t = PAR[1]*r*r;
    3537        psF32 q = t*(PAR[7] + 2.25*pow(z, 1.25));
    3638
    37         deriv->data.F32[0] = +1.0;
    38         deriv->data.F32[1] = +r;
    39         deriv->data.F32[2] = q*(2.0*px*PAR[4] + PAR[6]*Y);
    40         deriv->data.F32[3] = q*(2.0*py*PAR[5] + PAR[6]*X);
    41         deriv->data.F32[4] = -2.0*q*px*X;
    42         deriv->data.F32[5] = -2.0*q*py*Y;
    43         deriv->data.F32[6] = -q*X*Y;
    44         deriv->data.F32[7] = -t*z;
     39        dPAR[0] = +1.0;
     40        dPAR[1] = +r;
     41        dPAR[2] = q*(2.0*px*PAR[4] + PAR[6]*Y);
     42        dPAR[3] = q*(2.0*py*PAR[5] + PAR[6]*X);
     43        dPAR[4] = -2.0*q*px*X;
     44        dPAR[5] = -2.0*q*py*Y;
     45        dPAR[6] = -q*X*Y;
     46        dPAR[7] = -t*z;
    4547    }
    4648    return(f);
     
    5557
    5658    beta_lim[0][0].data.F32[0] = 1000;
    57     beta_lim[0][0].data.F32[1] = 10000;
     59    beta_lim[0][0].data.F32[1] = 3e6;
    5860    beta_lim[0][0].data.F32[2] = 5;
    5961    beta_lim[0][0].data.F32[3] = 5;
     
    7375
    7476    params_max[0][0].data.F32[0] = 1e5;
    75     params_max[0][0].data.F32[1] = 1e6;
     77    params_max[0][0].data.F32[1] = 1e8;
    7678    params_max[0][0].data.F32[2] = 1e4;  // this should be set by image dimensions!
    7779    params_max[0][0].data.F32[3] = 1e4;  // this should be set by image dimensions!
     
    147149
    148150    // we can do this much better with intelligent choices here
    149     for (z = 0.0; z < 20.0; z += dz) {
     151    for (z = 0.0; z < 30.0; z += dz) {
    150152        f = 1.0 / (1 + PAR[7]*z + pow(z, 2.25));
    151153        if (f < limit)
     
    198200    status &= ((dPAR[1]/PAR[1]) < 0.5);
    199201
    200     if (status)
    201         return true;
    202     return false;
    203 }
     202    if (!status)
     203        return false;
     204    return true;
     205}
Note: See TracChangeset for help on using the changeset viewer.