ham.c
上传用户:szhypcb168
上传日期:2007-01-06
资源大小:2187k
文件大小:1k
源码类别:

语音压缩

开发平台:

Unix_Linux

  1. /**************************************************************************
  2. *
  3. * ROUTINE
  4. *               ham
  5. *
  6. * FUNCTION
  7. *               creates hamming window
  8. *
  9. * SYNOPSIS
  10. *               subroutine ham(win, n)
  11. *   formal 
  12. *
  13. *                       data    I/O
  14. *       name            type    type    function
  15. *       -------------------------------------------------------------------
  16. *       win(n)          float   i/o     hamming window
  17. *       n               int     i       dim of win
  18. *
  19. ***************************************************************************
  20. *
  21. * DESCRIPTION
  22. *
  23. *
  24. *
  25. ***************************************************************************
  26. *
  27. * CALLED BY
  28. *
  29. * celp  delay
  30. *
  31. * CALLS
  32. *
  33. *
  34. *
  35. **************************************************************************/
  36. #include <math.h>
  37. ham(win, n)
  38. int n;
  39. float win[];
  40. {
  41.   int i;
  42.   float pi;
  43.   pi = 4.0 * atan(1.0);
  44.   for (i = 0; i < n; i++)
  45.     win[i] = 0.54 - 0.46 * cos((2.0 * pi * (i)) / (n-1));
  46. }