[foo-cvs] foo/libfoo/src FOOSineXoverXTable.m,1.5,1.6

[Martin R. <ru...@us...>]

Update of /cvsroot/foo/foo/libfoo/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv17674

Modified Files:
	FOOSineXoverXTable.m 
Log Message:
enabled kaiser windowing, xMax now _taps / 2

Index: FOOSineXoverXTable.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/src/FOOSineXoverXTable.m,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** FOOSineXoverXTable.m	27 Aug 2004 07:09:51 -0000	1.5
--- FOOSineXoverXTable.m	27 Aug 2004 17:02:01 -0000	1.6
***************
*** 38,42 ****
  #include "FOO/FOOSineXoverXTable.h"
  
! // #define KAISER_WINDOW // hann window otherwise
  
  #ifdef KAISER_WINDOW
--- 38,42 ----
  #include "FOO/FOOSineXoverXTable.h"
  
! #define KAISER_WINDOW // hann window otherwise
  
  #ifdef KAISER_WINDOW
***************
*** 96,101 ****
  - (double) function: (double)x
  {
!   double xMax = _taps / 2 - .5; // bug ???
!   // double xMax = _taps / 2;
    double y;
  
--- 96,100 ----
  - (double) function: (double)x
  {
!   double xMax = _taps / 2;
    double y;
  
***************
*** 113,118 ****
  
        y = x * M_PI;
!       y = sin(y) / y;
!       y *= bessel0(KAISER_KOEFF * sqrt(1 - (x * _scaler / _size) * (x * _scaler / _size))) / _besselconst;
  
  #else // hann window
--- 112,117 ----
  
        y = x * M_PI;
!       y = sin(y) / y; // sinc
!       y *= bessel0(KAISER_KOEFF * sqrt(1 - (x * _scaler / _size) * (x * _scaler / _size))) / _besselconst; // window
  
  #else // hann window