FreeCalypso > hg > gsm-codec-lib
view libgsmefr/weight_a.c @ 75:8d63b167a5d3
libgsmefr: lag_wind.c compiles
author | Mychaela Falconia <falcon@freecalypso.org> |
---|---|
date | Sat, 26 Nov 2022 06:39:36 +0000 |
parents | 49dd1ac8e75b |
children | b651adfce60d |
line wrap: on
line source
/************************************************************************* * * FUNCTION: Weight_Ai * * PURPOSE: Spectral expansion of LP coefficients. (order==10) * * DESCRIPTION: * a_exp[i] = a[i] * fac[i-1] ,i=1,10 * *************************************************************************/ #include "typedef.h" #include "basic_op.h" #include "count.h" /* m = LPC order == 10 */ #define m 10 void Weight_Ai ( Word16 a[], /* (i) : a[m+1] LPC coefficients (m=10) */ Word16 fac[], /* (i) : Spectral expansion factors. */ Word16 a_exp[] /* (o) : Spectral expanded LPC coefficients */ ) { Word16 i; a_exp[0] = a[0]; move16 (); for (i = 1; i <= m; i++) { a_exp[i] = round (L_mult (a[i], fac[i - 1])); move16 (); } return; }