FreeCalypso > hg > gsm-codec-lib
annotate libtwamr/ol_ltp.h @ 458:e26b974f7ba3
doc/AMR-study-utils: update for the current situation
author | Mychaela Falconia <falcon@freecalypso.org> |
---|---|
date | Fri, 10 May 2024 18:45:36 +0000 |
parents | f17e42c63058 |
children |
rev | line source |
---|---|
417
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
1 /* |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
2 ******************************************************************************** |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
3 * |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
4 * GSM AMR-NB speech codec R98 Version 7.6.0 December 12, 2001 |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
5 * R99 Version 3.3.0 |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
6 * REL-4 Version 4.1.0 |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
7 * |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
8 ******************************************************************************** |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
9 * |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
10 * File : ol_ltp.h |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
11 * Purpose : Compute the open loop pitch lag. |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
12 * |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
13 ******************************************************************************** |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
14 */ |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
15 #ifndef ol_ltp_h |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
16 #define ol_ltp_h "$Id $" |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
17 |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
18 /* |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
19 ******************************************************************************** |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
20 * INCLUDE FILES |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
21 ******************************************************************************** |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
22 */ |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
23 #include "tw_amr.h" |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
24 #include "typedef.h" |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
25 #include "p_ol_wgh.h" |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
26 |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
27 /* |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
28 ******************************************************************************** |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
29 * DECLARATION OF PROTOTYPES |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
30 ******************************************************************************** |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
31 */ |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
32 int ol_ltp( |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
33 pitchOLWghtState *st, /* i/o : State struct */ |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
34 vadState *vadSt, /* i/o : VAD state struct */ |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
35 enum Mode mode, /* i : coder mode */ |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
36 Word16 wsp[], /* i : signal used to compute the OL pitch, Q0 */ |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
37 /* uses signal[-pit_max] to signal[-1] */ |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
38 Word16 *T_op, /* o : open loop pitch lag, Q0 */ |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
39 Word16 old_lags[], /* i : history with old stored Cl lags */ |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
40 Word16 ol_gain_flg[], /* i : OL gain flag */ |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
41 Word16 idx, /* i : index */ |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
42 Flag dtx /* i : dtx flag; use dtx=1, do not use dtx=0 */ |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
43 ); |
f17e42c63058
libtwamr: integrate ol_ltp.c
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
44 #endif |