www.pudn.com > lpc.zip > irc2pc_i.c
/****************************************************************** * * IRC2PC Version 48 * ****************************************************************** * * Convert Reflection Coefficients to Predictor Coeficients * * Inputs: * RC - Reflection coefficients * ORDER - Number of RC's * GPRIME - Excitation modification gain * Outputs: * PC - Predictor coefficients * *G2PASS - Excitation modification sharpening factor */ #include "ourstuff.h" #include "config.ch" #include "lpcdefs.h" #includeirc2pc_i( rc, pc, gprime, g2pass, where ) int_type rc[MAXORD][11], pc[], gprime, *g2pass; int_type where; { int_type i,j; int_type temp[MAXORD]; *g2pass = 16384; for(i=0;i >14))) >> 14; } *g2pass = ((long_type)gprime*(long_type)((int)(16384.*sqrt(*g2pass/16384.)))) >> 14; pc[0] = rc[0][where] >> 2; for(i=1;i >2)*pc[i-j-1])>>12); } for(j=0;j>2; } }