|
using System;
using System.Collections.Generic;
using System.Text;
using DiagramUI.Interfaces;
using DataPerformer.Interfaces;
namespace DataPerformer
{
/// <summary>
/// Euler processor
/// </summary>
public class EulerProcessor : DifferentialEquationProcessor
{
/// <summary>
/// Singleton
/// </summary>
new static public readonly DifferentialEquationProcessor Processor = new EulerProcessor();
/// <summary>
/// Auxiliary variable
/// </summary>
private double[] w;
/// <summary>
/// Constructor
/// </summary>
private EulerProcessor()
{
}
/// <summary>
/// Performs step of integration
/// </summary>
/// <param name="t0">Step start</param>
/// <param name="t1">Step finish</param>
public override void Step(double t0, double t1)
{
isBusy = true;
if (Dim == 0)
{
return;
}
double dt = t1 - t0;
int i = 0;
double t = t0;
foreach (IMeasurements m in equations)
{
for (int j = 0; j < m.Count; j++)
{
w[i] = (double)m[j].Parameter();
++i;
}
}
StaticExtensionDataPerformerBase.Time = t;
StaticExtensionDataPerformerBase.Desktop.ResetUpdatedMeasurements();
UpdateMeasurements();
i = 0;
foreach (IMeasurements m in equations)
{
IDifferentialEquationSolver s = m as IDifferentialEquationSolver;
s.CalculateDerivations();
for (int j = 0; j < m.Count; j++)
{
IDerivation der = m[j] as IDerivation;
w[i] = w[i] + Measure.GetDouble(der.Derivation) * dt;
++i;
}
s.CopyVariablesToSolver(i - m.Count, w);
}
isBusy = false;
}
/// <summary>
/// Sets consumers
/// </summary>
/// <param name="collection">Consumers</param>
/// <returns>Lists of parameters</returns>
public override void Set(object collection)
{
base.Set(collection);
UpdateDimension();
}
/// <summary>
/// Updates dimension
/// </summary>
public override void UpdateDimension()
{
int n = Dim;
w = new double[n];
}
}
}
|
By viewing downloads associated with this article you agree to the Terms of Service and the article's licence.
If a file you wish to view isn't highlighted, and is a text file (not binary), please
let us know and we'll add colourisation support for it.
Ph. D. Petr Ivankov worked as scientific researcher at Russian Mission Control Centre since 1978 up to 2000. Now he is engaged by Aviation training simulators http://dinamika-avia.com/ . His additional interests are:
1) Noncommutative geometry
http://front.math.ucdavis.edu/author/P.Ivankov
2) Literary work (Russian only)
http://zhurnal.lib.ru/editors/3/3d_m/
3) Scientific articles
http://arxiv.org/find/all/1/au:+Ivankov_Petr/0/1/0/all/0/1