ГОСТ Р ИСО/МЭК 10373-6—2015
/**•»»••»»••»»*•• absolute fou rier coefficient ••*» *•*•*•/
U S B [k]-<douhle)sqit{cl
_
reul*cl
_
reul ♦ cl
_
lm ag*ol
_
lm ag);
L S B f k )
- {double)sqrt{c2
_
real*c2
_
real«c2
_
im ag*c2
_
im ag);
/************** Half window tine •***»**••*+••***•*••••»•/
LMAtime!k|-vt.lme[jt-Njclddle); /* Half window Litre */
k» *■;
if
(k > lout) break; /* st.op if array size la reached»/
i
freeOfuc!;
tree(Yus);
free(Yle>;
tree(Yls);
return k;
\
t
End ГFT
%**%****%***********************************************************% ^
/*****fr****% ***********% ***************************************************************% ^
/**» Nolse_STD :Noise standard deviation •**/
/*♦♦**♦#*♦#*******♦***♦♦**♦♦**♦***♦***♦♦**♦♦**♦♦**♦♦**♦♦**♦♦**♦♦**♦♦**♦♦**♦♦**♦***♦***♦♦у
/*** Description:***/
/*** This function calculates the standard deviations*•*/
/*** at fc«fs and fc-fs as required by the noise•**/
/*** precondition test of 1SC/1EC 103T3-6.***/
/**• Results are meaningful only when the sense coil’a***/
/*** signal is recorded with a reference P1CC.***/
/*%*#♦♦/
/*** Arguments:***/
/*** n_LMA - numoer of input values***/
/*** USBl] - load modulation amplitude at fc+fs•**/
/*** LSB[| - load modulation amplitude at fc-fs**.*/
/*** pSTD_USB- Standard deviation at. rctfs•**/
/»** pSTD_LSB- standard deviation at fC-fS***/
I
***♦♦♦/
/»«*»*•»*»*«**«»*»*»**»»**«%*»****+**#**+»*»#»«*#»«*#»«*#»«*#»«*#»«*#»«*#»«*#»«*#»«*#»+*y
void Noise STD{int n_LMA,double USBi],double LSBI], doude *pSTC_USB,double *pSTD_LSB)
r
double P_USB-0rP_LSB-0;
int i;
/**************** square summation *********************!
for( 1-0;Kn LMA;i♦*)
PJJSB ♦- USB(i]*USBIi|;
P_LSB *- L5B(i|*LSB[1);
I
»pSTD_ESB-sqrt(P_t;SB/n_LMA>;
»pSTD~LSB’Sqrt(P_LSB/n_LMA>;
f *****************************666 ******** 6*6**6***6************************************* f
/»** MAIN Program •**/
f *******************6*666*6***** **6**66************************************************* /
int main {int. arge, char *argv(l)
I
char CnameI2bfc);
char tout(256);
int sampie_count;
int lout;/«Maximun length of result arrays *1
199