unarmath.hpp

神经网络用于X荧光分析的源码。输入元素峰的强度

// Borland C++ Builder
// Copyright (c) 1995, 2005 by Borland Software Corporation
// All rights reserved

// (DO NOT EDIT: machine generated header) 'Unarmath.pas' rev: 10.00

#ifndef UnarmathHPP
#define UnarmathHPP

#pragma delphiheader begin
#pragma option push
#pragma option -w-      // All warnings off
#pragma option -Vx      // Zero-length empty class member functions
#pragma pack(push,8)
#include <System.hpp>	// Pascal unit
#include <Sysinit.hpp>	// Pascal unit
#include <Windows.hpp>	// Pascal unit
#include <Math.hpp>	// Pascal unit

//-- user supplied -----------------------------------------------------------

namespace Unarmath
{
//-- type declarations -------------------------------------------------------
typedef DynamicArray<double >  unARMath__1;

typedef DynamicArray<DynamicArray<double > >  TFloatMatrix;

typedef DynamicArray<double >  TFloatVector;

typedef bool __fastcall (*TFitting_Formula)(int StartPosition, int StopPosition, double * FittedParams, const int FittedParams_Size, double * FittedValues, const int FittedValues_Size);

//-- var, const, procedure ---------------------------------------------------
extern PACKAGE void __fastcall AddParamsForCalibrFit(const TFloatMatrix RV, const TFloatMatrix LV, const Word SC, const Word RVC, const Word LVC);
extern PACKAGE void __fastcall NLMRprepare(const TFloatMatrix RV, bool const * PP, const int PP_Size, Word ParamCount, Word SamplesCount);
extern PACKAGE bool __fastcall ResidsToDistribution(const double StartY, const double StopY, const int StartPosition, const int StopPosition, const int ChanCount, double const * ResidsValues, const int ResidsValues_Size, double &Step, double * DistrX, const int DistrX_Size, double * DistrY, const int DistrY_Size);
extern PACKAGE double __fastcall MaxFloatArray(const int StartPosition, const int StopPosition, int &MaxPosition, double const * FloatArray, const int FloatArray_Size);
extern PACKAGE double __fastcall MinFloatArray(const int StartPosition, const int StopPosition, int &MaxPosition, double const * FloatArray, const int FloatArray_Size);
extern PACKAGE bool __fastcall CalcWeigtArray(const bool PoisonWeighted, const int StartPosition, const int StopPosition, double const * MeasValues_Y, const int MeasValues_Y_Size, double * WeightArray, const int WeightArray_Size);
extern PACKAGE double __fastcall Standard_Deviation(const bool PoisonWeighted, const int StartPosition, const int StopPosition, const int FreedomDegree, double const * MeasValues_Y, const int MeasValues_Y_Size, double const * FittedValues, const int FittedValues_Size, double const * WeightArray, const int WeightArray_Size);
extern PACKAGE bool __fastcall Residuals(const bool PoisonWeighted, const int StartPosition, const int StopPosition, double const * MeasValues_Y, const int MeasValues_Y_Size, double const * FittedValues, const int FittedValues_Size, double * ResidsValues, const int ResidsValues_Size);
extern PACKAGE bool __fastcall Autocorrelation(const bool PoisonWeighted, const int StartPosition, const int StopPosition, double const * MeasValues_Y, const int MeasValues_Y_Size, double const * FittedValues, const int FittedValues_Size, double * AutoCorrValues, const int AutoCorrValues_Size, int &Count);
extern PACKAGE void __fastcall Fitting(const int Fitting_Formula_No, const int StartPosition, const int StopPosition, const bool PoisonWeighted, const double IterStep, double &StdDev, int &Error_Count, const double Epsilon, const int MaxIter, int &Iter, double const * MeasValues_Y, const int MeasValues_Y_Size, double const * MeasValues_X, const int MeasValues_X_Size, double * FittedValues, const int FittedValues_Size, const int ParamCount, double * FittedParams, const int FittedParams_Size, double * FittedParamsStdDev, const int FittedParamsStdDev_Size);
extern PACKAGE void __fastcall CalcFitFunction(const int Fitting_Formula_No, const int StartPosition, const int StopPosition, double * FittedValues, const int FittedValues_Size, double const * FittedParams, const int FittedParams_Size);
extern PACKAGE bool __fastcall LinRegression(double const * X, const int X_Size, double const * Y, const int Y_Size, const Word PointCount, double &Slope, double &Offset, double &Correlation, double &StdDev, double &Bias);

}	/* namespace Unarmath */
using namespace Unarmath;
#pragma pack(pop)
#pragma option pop

#pragma delphiheader end.
//-- end unit ----------------------------------------------------------------
#endif	// Unarmath