aboutsummaryrefslogtreecommitdiff
path: root/externals/grill/fftease/src/fold.c
blob: 5b9ce476128f90d87d7d64d40a2b394fd11ccba0 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
/*
 * multiply current input I by window W (both of length Nw);
 * using modulus arithmetic, fold and rotate windowed input
 * into output array O of (FFT) length N according to current
 * input time n
 */
void fold( float *I, float  *W, int Nw, float *O, int N, int n )
{
#if 1
    int i;
    for ( i = 0; i < N; i++ ) O[i] = 0.;

    while ( n < 0 ) n += N;
    n %= N;

    for ( i = 0; i < Nw; i++ ) {
		O[n] += I[i]*W[i];
		if ( ++n == N )  n = 0;
    }
#else
   int i;

    for ( i = 0; i < N; i++ )
	O[i] = 0.;

    while ( n < 0 )
	n += N;
    n %= N;
    for ( i = 0; i < Nw; i++ ) {
	O[n] += I[i]*W[i];
	if ( ++n == N )
	    n = 0;
    }
#endif
}


/*
 * input I is a folded spectrum of length N; output O and
 * synthesis window W are of length Nw--overlap-add windowed,
 * unrotated, unfolded input data into output O
 */
void overlapadd( float *I, int N, float *W, float *O, int Nw, int n )
{
#if 1
	int i ;
    while ( n < 0 ) n += N ;
    n %= N ;

    for ( i = 0 ; i < Nw ; i++ ) {
		O[i] += I[n]*W[i] ;
		if ( ++n == N ) n = 0 ;
    }
#else
 int i ;
    while ( n < 0 )
	n += N ;
    n %= N ;
    for ( i = 0 ; i < Nw ; i++ ) {
	O[i] += I[n]*W[i] ;
	if ( ++n == N )
	    n = 0 ;
    }

#endif
}