www.pudn.com > CryptoPhone-src-031122.zip > celp_sup.c

/* Copyright 2001,2002,2003 NAH6 
 * All Rights Reserved 
 * 
 * Parts Copyright DoD, Parts Copyright Starium 
 * 
 */ 
          /*LINTLIBRARY*/ 
 
#include  
#include "main.h" 
#include "celp_sup.h" 
 
          /*PROTOLIB1*/ 
/*************************************************************************** 
 
 ROUTINE 
               ham 
 
 FUNCTION 
               creates hamming window 
 
 SYNOPSIS 
               ham(win,n) 
   formal  
 
                       data    I/O 
       name            type    type    function 
       ------------------------------------------------------------------- 
       win            float    i/o     hamming window 
       n              int       i      dimension of win 
 
**************************************************************************/ 
void CreateHam( 
float 	win[], 
int	n) 
{ 
int 	i; 
float 	pi; 
 
        pi = 4.*atan(1.0); 
        for(i = 0; i