133 lines
3.2 KiB
C++
133 lines
3.2 KiB
C++
/*
|
|
* Copyright (C) 2010 Thorsten Liebig (Thorsten.Liebig@gmx.de)
|
|
*
|
|
* This program is free software: you can redistribute it and/or modify
|
|
* it under the terms of the GNU General Public License as published by
|
|
* the Free Software Foundation, either version 3 of the License, or
|
|
* (at your option) any later version.
|
|
*
|
|
* This program is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
*/
|
|
|
|
#include "processintegral.h"
|
|
#include "time.h"
|
|
#include <iomanip>
|
|
|
|
ProcessIntegral::ProcessIntegral(Engine_Interface_Base* eng_if) : Processing(eng_if)
|
|
{
|
|
m_Results=NULL;
|
|
m_FD_Results=NULL;
|
|
}
|
|
|
|
ProcessIntegral::~ProcessIntegral()
|
|
{
|
|
delete[] m_Results;
|
|
delete[] m_FD_Results;
|
|
m_Results = NULL;
|
|
m_FD_Results = NULL;
|
|
}
|
|
|
|
|
|
void ProcessIntegral::InitProcess()
|
|
{
|
|
delete[] m_Results;
|
|
delete[] m_FD_Results;
|
|
m_Results = new double[GetNumberOfIntegrals()];
|
|
m_FD_Results = new vector<double_complex>[GetNumberOfIntegrals()];
|
|
|
|
m_filename = m_Name;
|
|
OpenFile(m_filename);
|
|
|
|
for (int i=0;i<GetNumberOfIntegrals();++i)
|
|
{
|
|
for (size_t n=0; n<m_FD_Samples.size(); ++n)
|
|
{
|
|
m_FD_Results[i].push_back(0);
|
|
}
|
|
}
|
|
}
|
|
|
|
void ProcessIntegral::FlushData()
|
|
{
|
|
if (m_FD_Samples.size())
|
|
Dump_FD_Data(1.0/(double)m_FD_SampleCount,m_filename + "_FD");
|
|
}
|
|
|
|
|
|
void ProcessIntegral::Dump_FD_Data(double factor, string filename)
|
|
{
|
|
if (m_FD_Samples.size()==0)
|
|
return;
|
|
ofstream file;
|
|
file.open( filename.c_str() );
|
|
if (!file.is_open())
|
|
cerr << "ProcessIntegral::Dump_FD_Data: Error: Can't open file: " << filename << endl;
|
|
time_t rawTime;
|
|
time(&rawTime);
|
|
file << "%dump by openEMS @" << ctime(&rawTime) << "%frequency";
|
|
for (int i = 0; i < GetNumberOfIntegrals();++i)
|
|
file << "\treal\timag";
|
|
file << "\n";
|
|
|
|
for (size_t n=0; n<m_FD_Samples.size(); ++n)
|
|
{
|
|
file << m_FD_Samples.at(n) ;
|
|
for (int i = 0; i < GetNumberOfIntegrals();++i)
|
|
file << "\t" << std::real(m_FD_Results[i].at(n))*factor << "\t" << std::imag(m_FD_Results[i].at(n))*factor;
|
|
file << "\n";
|
|
}
|
|
|
|
file.close();
|
|
}
|
|
|
|
int ProcessIntegral::Process()
|
|
{
|
|
if (Enabled==false) return -1;
|
|
if (CheckTimestep()==false) return GetNextInterval();
|
|
|
|
CalcMultipleIntegrals();
|
|
int NrInt = GetNumberOfIntegrals();
|
|
double time = m_Eng_Interface->GetTime(m_dualTime);
|
|
|
|
if (ProcessInterval)
|
|
{
|
|
if (m_Eng_Interface->GetNumberOfTimesteps()%ProcessInterval==0)
|
|
{
|
|
file << setprecision(m_precision) << time;
|
|
for (int n=0; n<NrInt; ++n)
|
|
file << "\t" << m_Results[n] * m_weight;
|
|
file << endl;
|
|
}
|
|
}
|
|
|
|
if (m_FD_Interval)
|
|
{
|
|
if (m_Eng_Interface->GetNumberOfTimesteps()%m_FD_Interval==0)
|
|
{
|
|
for (size_t n=0; n<m_FD_Samples.size(); ++n)
|
|
{
|
|
for (int i=0; i<NrInt; ++i)
|
|
m_FD_Results[i].at(n) += (double)m_Results[i] * m_weight * std::exp( -2.0 * _I * M_PI * m_FD_Samples.at(n) * time );
|
|
}
|
|
++m_FD_SampleCount;
|
|
if (m_Flush)
|
|
FlushData();
|
|
m_Flush = false;
|
|
}
|
|
}
|
|
|
|
return GetNextInterval();
|
|
}
|
|
|
|
double* ProcessIntegral::CalcMultipleIntegrals()
|
|
{
|
|
m_Results[0] = CalcIntegral();
|
|
return m_Results;
|
|
}
|