/*
 ** Copyright 2003-2010, VisualOn, Inc.
 **
 ** Licensed under the Apache License, Version 2.0 (the "License");
 ** you may not use this file except in compliance with the License.
 ** You may obtain a copy of the License at
 **
 **     http://www.apache.org/licenses/LICENSE-2.0
 **
 ** Unless required by applicable law or agreed to in writing, software
 ** distributed under the License is distributed on an "AS IS" BASIS,
 ** WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 ** See the License for the specific language governing permissions and
 ** limitations under the License.
 */

/***********************************************************************
*      File: int_lpc.c                                                 *
*                                                                      *
*      Description:Interpolation of the LP parameters in 4 subframes.  *
*                                                                      *
************************************************************************/

#include "typedef.h"
#include "basic_op.h"
#include "cnst.h"
#include "acelp.h"

#define MP1 (M+1)


void Int_isp(
		Word16 isp_old[],                     /* input : isps from past frame              */
		Word16 isp_new[],                     /* input : isps from present frame           */
		Word16 frac[],                        /* input : fraction for 3 first subfr (Q15)  */
		Word16 Az[]                           /* output: LP coefficients in 4 subframes    */
	    )
{
	Word32 i, k;
	Word16 fac_old, fac_new;
	Word16 isp[M];
	Word32 L_tmp;

	for (k = 0; k < 3; k++)
	{
		fac_new = frac[k];
		fac_old = (32767 - fac_new) + 1;  /* 1.0 - fac_new */

		for (i = 0; i < M; i++)
		{
			L_tmp = (isp_old[i] * fac_old)<<1;
			L_tmp += (isp_new[i] * fac_new)<<1;
			isp[i] = (L_tmp + 0x8000)>>16;
		}
		Isp_Az(isp, Az, M, 0);
		Az += MP1;
	}

	/* 4th subframe: isp_new (frac=1.0) */
	Isp_Az(isp_new, Az, M, 0);

	return;
}