allanger/paulxstretch
1
0
Fork 0
Code Issues 1 Pull Requests 1 Actions Packages Projects Releases 2 Activity

Glah

Browse Source
This commit is contained in:
xenakios 2018-04-03 02:07:47 +03:00
parent 3401384eff
commit 3729c4ec28
1 changed files with 3 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
Source/PS_Source/Stretch.cpp
View File

@ -95,13 +95,12 @@ void FFT::smp2freq()
void FFT::freq2smp()
{
REALTYPE inv_2p15_2pi=1.0f/16384.0f*(float)c_PI;
for (int i=1;i<nsamples/2;i++)
for (int i=1;i<nsamples/2;i++)
{
unsigned int rand = m_randdist(m_randgen);
REALTYPE phase=rand*inv_2p15_2pi;
data[i]=freq[i]*cos(phase);
data[nsamples-i]=freq[i]*sin(phase);
data[i]=freq[i]*cos(phase);
data[nsamples-i]=freq[i]*sin(phase);
};
data[0]=data[nsamples/2+1]=data[nsamples/2]=0.0;