- Minor fixes
This commit is contained in:
16
fowrite.c
16
fowrite.c
@@ -749,25 +749,15 @@
|
||||
fAxis[i] = (float)i;
|
||||
}
|
||||
iStat = CalculateFitFromData(self->pFitter,fAxis,lSum,iTime);
|
||||
if(iStat != 1)
|
||||
{
|
||||
SCWrite(pCon,"WARNING: problem locating elastic peak",eWarning);
|
||||
}
|
||||
GetFitResults(self->pFitter,&fCenter,&fStdDev,&fFWHM,&fVal);
|
||||
fVal = fCenter - self->fElastic;
|
||||
if(fVal < 0.)
|
||||
fVal = - fVal;
|
||||
/* bad value, leave at theoretical value */
|
||||
if(fVal > 10.)
|
||||
{
|
||||
SCWrite(pCon,
|
||||
"WARNING: bad fit result, using theoretical elastic peak position",
|
||||
eWarning);
|
||||
}
|
||||
else
|
||||
{
|
||||
if(fVal < 10.)
|
||||
{
|
||||
self->fElastic = fCenter;
|
||||
}
|
||||
}
|
||||
free(lSum);
|
||||
free(fAxis);
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user