FreeCalypso > hg > gsm-codec-lib
annotate libtwamr/weight_a.h @ 422:1ceda5586d01
implement twamr-tseq-enc test program
author | Mychaela Falconia <falcon@freecalypso.org> |
---|---|
date | Tue, 07 May 2024 06:27:20 +0000 |
parents | 8c7d5eec544c |
children |
rev | line source |
---|---|
395
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
1 /* |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
2 ******************************************************************************** |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
3 * |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
4 * GSM AMR-NB speech codec R98 Version 7.6.0 December 12, 2001 |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
5 * R99 Version 3.3.0 |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
6 * REL-4 Version 4.1.0 |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
7 * |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
8 ******************************************************************************** |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
9 * |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
10 * File : weight_a.h |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
11 * Purpose : Spectral expansion of LP coefficients. (order==10) |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
12 * Description : a_exp[i] = a[i] * fac[i-1] ,i=1,10 |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
13 * |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
14 * |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
15 ******************************************************************************** |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
16 */ |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
17 #ifndef weight_a_h |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
18 #define weight_a_h "$Id $" |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
19 |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
20 /* |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
21 ******************************************************************************** |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
22 * INCLUDE FILES |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
23 ******************************************************************************** |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
24 */ |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
25 #include "typedef.h" |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
26 |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
27 /* |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
28 ******************************************************************************** |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
29 * DEFINITION OF DATA TYPES |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
30 ******************************************************************************** |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
31 */ |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
32 |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
33 /* |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
34 ******************************************************************************** |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
35 * DECLARATION OF PROTOTYPES |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
36 ******************************************************************************** |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
37 */ |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
38 |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
39 void Weight_Ai ( |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
40 Word16 a[], /* (i) : a[m+1] LPC coefficients (m=10) */ |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
41 const Word16 fac[],/* (i) : Spectral expansion factors. */ |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
42 Word16 a_exp[] /* (o) : Spectral expanded LPC coefficients */ |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
43 ); |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
44 |
8c7d5eec544c
libtwamr: integrate weight_a.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
45 #endif |