FreeCalypso > hg > gsm-codec-lib

annotate libtwamr/weight_a.h @ 556:18aca50d68df default tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
doc/Calypso-TCH-downlink: update for FR1 BFI-with-data
author Mychaela Falconia <falcon@freecalypso.org>
date Fri, 11 Oct 2024 01:54:00 +0000
parents 8c7d5eec544c
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
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