ГОСТ Р ИСО/МЭК 10373-6—2015
in t п
_
ША;/* Number о£ computed LMA */
in t statue;
double Си;l* C artier frequency */
double atd
_
USB,std
_
LSB,dt;
double *pTime, «pVolts, *pLMA
_
time, »pUSB, »pLSB;
fc-lJ.S fcei;
p rin t t( " \n " ) ;
p t lf lt l( v***#’#* * #’#* * #’#* * #* * #* * ,,**,*********1l*************#’#* * #’#* * #’#* * #’#* * #’#* * #’#* * #\n/*)
p rin tt <“ **** ISO/IEC 10373-6 EMD Test-Program *********************************\n" >
p rin tt {"**** Version: 1.0 January 2010 ****************************************\n")
p rin t£(” **♦«(according to ISO/IEC 10373-6 , clause b .b.2>•*********************\n “)
p rin t Ц’л**»****»*»*******»»»**»** ******************************************** *\n ,‘) ;
i£ (urge >
1
)
\
/* * * F irs t input parameter Is taken as input lile name **»/
strcp yПлате, a x g v (lj);
else
I
/•* •
No
input parameter ***f
p x in tl(“ \nCSV F ile name :");
scan Г<“ ’S", Гname);
i £ (istrehr(fnam e, ’.’)> streat(fnam e, “ .esv*);
i f ( ! (sample
_
count-File
_
in£o(£name , &dt)>) return 0;
lo u t- (in t) (sample
_
count/ (in t)(O .S + l.O /d t/fc ));
i f (lout > MAX
_
LMA) ""lout - MAX
_
LMA;
/*** Start o£ memory allocation
pTime- (double •) malloc(sample_count « siseof(double));
i£ (pTime — KELL)
<
p rin tl (“Cannot, alloca te memory");
return 0;
1
pV olts- (double *) malloc(sample
_
count * sire of(do uble;);
i f (pVolts — NULL)
\
print!("C annot allocate memory");
free(pTim e);
return 0;
I
* sire of(do uble));
pUSB- (double *> m alloc(lout
i f (pUSB — NULL)
i
p rIn t.f(“ Cannot allocate
memory");
free(pTim e); free(p V olts);
return 0;
I
pLSB- (double ♦) m alloc(lout * sizeor(double));
If (pLSB — NULL)
(
p iin tf( “Cannot allocate memory");
free (pTime); ! ree (pV olts); free (p’JSB) ;
return
0
;
i
pLMAtime- (double *) m alloc(lout * siseot(double));
i f (pLMA
_
lime - - NULL)
200