Asterisk - The Open Source Telephony Project  18.5.0
Functions
deemp.c File Reference
#include "f2c.h"
Include dependency graph for deemp.c:

Go to the source code of this file.

Functions

int deemp_ (real *x, integer *n, struct lpc10_decoder_state *st)
 

Function Documentation

◆ deemp_()

int deemp_ ( real x,
integer n,
struct lpc10_decoder_state st 
)

Definition at line 106 of file deemp.c.

References lpc10_decoder_state::dei1, lpc10_decoder_state::dei2, lpc10_decoder_state::deo1, lpc10_decoder_state::deo2, and lpc10_decoder_state::deo3.

Referenced by synths_().

107 {
108  /* Initialized data */
109 
110  real *dei1;
111  real *dei2;
112  real *deo1;
113  real *deo2;
114  real *deo3;
115 
116  /* System generated locals */
117  integer i__1;
118  real r__1;
119 
120  /* Local variables */
121  integer k;
122  real dei0;
123 
124 /* Arguments */
125 /* Local variables that need not be saved */
126 /* Local state */
127 /* All of the locals saved below were not given explicit initial */
128 /* values in the original code. I think 0 is a safe choice. */
129  /* Parameter adjustments */
130  if (x) {
131  --x;
132  }
133 
134  /* Function Body */
135 
136  dei1 = &(st->dei1);
137  dei2 = &(st->dei2);
138  deo1 = &(st->deo1);
139  deo2 = &(st->deo2);
140  deo3 = &(st->deo3);
141 
142  i__1 = *n;
143  for (k = 1; k <= i__1; ++k) {
144  dei0 = x[k];
145  r__1 = x[k] - *dei1 * 1.9998f + *dei2;
146  x[k] = r__1 + *deo1 * 2.5f - *deo2 * 2.0925f + *deo3 * .585f;
147  *dei2 = *dei1;
148  *dei1 = dei0;
149  *deo3 = *deo2;
150  *deo2 = *deo1;
151  *deo1 = x[k];
152  }
153  return 0;
154 } /* deemp_ */
const int n
Definition: cli.h:165
float real
Definition: lpc10.h:79
INT32 integer
Definition: lpc10.h:80