- Timestamp:
- Feb 17, 2006, 7:13:42 AM (20 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/rel10_ifa/psModules/src/objects/models/pmModel_QGAUSS.c
r5257 r6448 31 31 32 32 if (deriv != NULL) { 33 psF32 *dPAR = deriv->data.F32; 34 33 35 // note difference from a pure gaussian: q = params->data.F32[1]*r 34 36 psF32 t = PAR[1]*r*r; 35 37 psF32 q = t*(PAR[7] + 2.25*pow(z, 1.25)); 36 38 37 d eriv->data.F32[0] = +1.0;38 d eriv->data.F32[1] = +r;39 d eriv->data.F32[2] = q*(2.0*px*PAR[4] + PAR[6]*Y);40 d eriv->data.F32[3] = q*(2.0*py*PAR[5] + PAR[6]*X);41 d eriv->data.F32[4] = -2.0*q*px*X;42 d eriv->data.F32[5] = -2.0*q*py*Y;43 d eriv->data.F32[6] = -q*X*Y;44 d eriv->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; 45 47 } 46 48 return(f); … … 55 57 56 58 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; 58 60 beta_lim[0][0].data.F32[2] = 5; 59 61 beta_lim[0][0].data.F32[3] = 5; … … 73 75 74 76 params_max[0][0].data.F32[0] = 1e5; 75 params_max[0][0].data.F32[1] = 1e 6;77 params_max[0][0].data.F32[1] = 1e8; 76 78 params_max[0][0].data.F32[2] = 1e4; // this should be set by image dimensions! 77 79 params_max[0][0].data.F32[3] = 1e4; // this should be set by image dimensions! … … 147 149 148 150 // 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) { 150 152 f = 1.0 / (1 + PAR[7]*z + pow(z, 2.25)); 151 153 if (f < limit) … … 198 200 status &= ((dPAR[1]/PAR[1]) < 0.5); 199 201 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.
