Changeset 9529 for trunk/psphot/src/models/pmModel_SGAUSS.c
- Timestamp:
- Oct 12, 2006, 4:36:54 PM (20 years ago)
- File:
-
- 1 edited
-
trunk/psphot/src/models/pmModel_SGAUSS.c (modified) (5 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/psphot/src/models/pmModel_SGAUSS.c
r8882 r9529 37 37 psF32 p = pow(z, PAR[PM_PAR_7] - 1.0); 38 38 psF32 r = 1.0 / (1 + z*p + pr*pr3); 39 psF32 f = PAR[PM_PAR_ FLUX]*r + PAR[PM_PAR_SKY];39 psF32 f = PAR[PM_PAR_I0]*r + PAR[PM_PAR_SKY]; 40 40 41 41 if (deriv != NULL) { 42 42 // note difference from a pure gaussian: q = params->data.F32[1]*r 43 psF32 t = PAR[PM_PAR_ FLUX]*r*r;43 psF32 t = PAR[PM_PAR_I0]*r*r; 44 44 psF32 q = t*(PAR[PM_PAR_7]*p + 4*PAR[PM_PAR_8]*pr3); 45 45 … … 245 245 norm *= 0.01; 246 246 247 psF64 Flux = PAR[PM_PAR_ FLUX] * Area * norm;247 psF64 Flux = PAR[PM_PAR_I0] * Area * norm; 248 248 249 249 return(Flux); … … 262 262 263 263 if (flux <= 0) return (1.0); 264 if (PAR[PM_PAR_ FLUX] <= 0) return (1.0);265 if (flux >= PAR[PM_PAR_ FLUX]) return (1.0);264 if (PAR[PM_PAR_I0] <= 0) return (1.0); 265 if (flux >= PAR[PM_PAR_I0]) return (1.0); 266 266 267 267 // convert Sx,Sy,Sxy to major/minor axes … … 272 272 axes = EllipseShapeToAxes (shape); 273 273 psF64 dr = 1.0 / axes.major; 274 psF64 limit = flux / PAR[PM_PAR_ FLUX];274 psF64 limit = flux / PAR[PM_PAR_I0]; 275 275 276 276 // XXX : we can do this faster with an intelligent starting choice … … 329 329 status = true; 330 330 status &= (dP < 0.5); 331 status &= (PAR[PM_PAR_ FLUX] > 0);332 status &= ((dPAR[PM_PAR_ FLUX]/PAR[PM_PAR_FLUX]) < 0.5);331 status &= (PAR[PM_PAR_I0] > 0); 332 status &= ((dPAR[PM_PAR_I0]/PAR[PM_PAR_I0]) < 0.5); 333 333 status &= (fabs(PAR[PM_PAR_8]) < 0.5); 334 334 status &= (dPAR[PM_PAR_8] < 0.1);
Note:
See TracChangeset
for help on using the changeset viewer.
