fftw_test_basic.cpp
Go to the documentation of this file.00001 #include "CTsSpectrum.h"
00002 #include "../Abstract Classes/types.h"
00003 #include <fstream>
00004 #include <iostream>
00005 #include <miscfunc.h>
00006 #include <fstream>
00007 #include <boost/lambda/lambda.hpp>
00008 #include <boost/numeric/ublas/vector.hpp>
00009 using namespace std;
00010
00011 int main ()
00012 {
00013 CTsSpectrum Spectrum1(true);
00014 const int points = 200;
00015 const double PI = 3.14159265359;
00016
00017
00018
00019
00020
00021 ublas::vector<double> TimeSeries1(points);
00022 ublas::vector<double> TimeSeries2(points);
00023 ublas::vector<double> CorrTs(points);
00024 ublas::vector<complex<double> > FreqDomain1(TimeSeries1.size()/2+1);
00025 const int calculations = 100;
00026
00027
00028 for (int i = 0; i < points; ++i)
00029 TimeSeries1(i)=sin(4 * PI * i/points);
00030
00031 Spectrum1.CalcSpectrum(TimeSeries1.begin(),TimeSeries1.end(),FreqDomain1.begin(),FreqDomain1.end());
00032 Convolve(TimeSeries1,TimeSeries1,CorrTs);
00033 ofstream tsfile("tsold");
00034 for (int i = 0; i < TimeSeries1.size(); ++i)
00035 tsfile << TimeSeries1(i) << CorrTs(i) << endl;
00036 Spectrum1.CalcTimeSeries(FreqDomain1.begin(),FreqDomain1.end(),TimeSeries2.begin(),TimeSeries2.end());
00037 ofstream newfile("tsnew");
00038 for (int i = 0; i < TimeSeries2.size(); ++i)
00039 newfile << TimeSeries2(i) << endl;
00040 }