From 9ff5ccdea43ff2a954c1a400516dc6858e188e9c Mon Sep 17 00:00:00 2001 From: Thomas Grill Date: Sat, 18 Jan 2003 04:35:33 +0000 Subject: "" svn path=/trunk/; revision=344 --- externals/grill/fftease/src/swinger~.cpp | 2 ++ 1 file changed, 2 insertions(+) (limited to 'externals/grill/fftease/src/swinger~.cpp') diff --git a/externals/grill/fftease/src/swinger~.cpp b/externals/grill/fftease/src/swinger~.cpp index 39fbd9a1..b2ecba34 100644 --- a/externals/grill/fftease/src/swinger~.cpp +++ b/externals/grill/fftease/src/swinger~.cpp @@ -49,10 +49,12 @@ V swinger::Transform(I _N2,S *const *in) // replace signal one's phases with those of signal two const F a1 = ( i == _N2 ? _buffer1[1] : _buffer1[even] ); const F b1 = ( i == 0 || i == _N2 ? 0. : _buffer1[odd] ); + // amplitude only const F amp = hypot( a1, b1 ); const F a2 = ( i == _N2 ? _buffer2[1] : _buffer2[even] ); const F b2 = ( i == 0 || i == _N2 ? 0. : _buffer2[odd] ); + // phase only const F ph = -atan2( b2, a2 ); _buffer1[even] = amp * cos( ph ); -- cgit v1.2.1