shithub: aubio

Info  •  Files  •  Log  •  Branches

src/mathutils.c: fix parzen and welch

--- a/src/mathutils.c

+++ b/src/mathutils.c

@@ -109,11 +109,11 @@

       break;

     case aubio_win_welch:

       for (i=0;i<size;i++)

-        w[i] = 1.0 - SQR((2*i-size)/(size+1.0));

+        w[i] = 1.0 - SQR((2.*i-size)/(size+1.0));

       break;

     case aubio_win_parzen:

       for (i=0;i<size;i++)

-        w[i] = 1.0 - ABS((2*i-size)/(size+1.0));

+        w[i] = 1.0 - ABS((2.*i-size)/(size+1.0));

       break;

     default:

       break;