FreeCalypso > hg > gsm-codec-lib
annotate libtwamr/lag_wind.tab @ 477:4c9222d95647
libtwamr encoder: always emit frame->mode = mode;
In the original implementation of amr_encode_frame(), the 'mode' member
of the output struct was set to 0xFF if the output frame type is TX_NO_DATA.
This design was made to mimic the mode field (16-bit word) being set to
0xFFFF (or -1) in 3GPP test sequence format - but nothing actually depends
on this struct member being set in any way, and amr_frame_to_tseq()
generates the needed 0xFFFF on its own, based on frame->type being equal
to TX_NO_DATA.
It is simpler and more efficient to always set frame->mode to the actual
encoding mode in amr_encode_frame(), and this new behavior has already
been documented in doc/AMR-library-API description in anticipation of
the present change.
| author | Mychaela Falconia <falcon@freecalypso.org> |
|---|---|
| date | Sat, 18 May 2024 22:30:42 +0000 |
| parents | a8dab7028e4d |
| children |
| rev | line source |
|---|---|
|
384
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
1 /* |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
2 ******************************************************************************** |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
3 * |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
4 * GSM AMR-NB speech codec R98 Version 7.6.0 December 12, 2001 |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
5 * R99 Version 3.3.0 |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
6 * REL-4 Version 4.1.0 |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
7 * |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
8 ******************************************************************************** |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
9 * |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
10 * File : lag_wind.tab |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
11 * Purpose : Table of lag_window for autocorrelation. |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
12 * $Id $ |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
13 * |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
14 ******************************************************************************** |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
15 */ |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
16 /*-----------------------------------------------------* |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
17 | Table of lag_window for autocorrelation. | |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
18 | | |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
19 | noise floor = 1.0001 = (0.9999 on r[1] ..r[10]) | |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
20 | Bandwitdh expansion = 60 Hz | |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
21 | | |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
22 | | |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
23 | lag_wind[0] = 1.00000000 (not stored) | |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
24 | lag_wind[1] = 0.99879038 | |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
25 | lag_wind[2] = 0.99546897 | |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
26 | lag_wind[3] = 0.98995781 | |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
27 | lag_wind[4] = 0.98229337 | |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
28 | lag_wind[5] = 0.97252619 | |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
29 | lag_wind[6] = 0.96072036 | |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
30 | lag_wind[7] = 0.94695264 | |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
31 | lag_wind[8] = 0.93131179 | |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
32 | lag_wind[9] = 0.91389757 | |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
33 | lag_wind[10]= 0.89481968 | |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
34 -----------------------------------------------------*/ |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
35 |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
36 static const Word16 lag_h[10] = |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
37 { |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
38 32728, |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
39 32619, |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
40 32438, |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
41 32187, |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
42 31867, |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
43 31480, |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
44 31029, |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
45 30517, |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
46 29946, |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
47 29321 |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
48 }; |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
49 |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
50 static const Word16 lag_l[10] = |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
51 { |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
52 11904, |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
53 17280, |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
54 30720, |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
55 25856, |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
56 24192, |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
57 28992, |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
58 24384, |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
59 7360, |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
60 19520, |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
61 14784 |
|
a8dab7028e4d
libtwamr: integrate lag_wind.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
62 }; |
