X-Git-Url: http://git.treefish.org/~alex/seamulator.git/blobdiff_plain/e19dd20d04a2a92b3d91bd25a69210a2351b08c9..40fe15ee6190427f3bbc5db4ff640442626cc3bb:/sea.cpp?ds=inline diff --git a/sea.cpp b/sea.cpp deleted file mode 100644 index 30593f2..0000000 --- a/sea.cpp +++ /dev/null @@ -1,75 +0,0 @@ -#include "sea.h" - -#include -#include -#include - -#include "watersurface.h" - -const double Sea::PHILLIPS_CONSTANT{1}; -const double Sea::GRAVITATIONAL_CONSTANT{6.67408e-11}; - -Sea::Sea(WaterSurfacePtr surface) : - m_surface{surface}, - m_windDirection{1, 0}, - m_windSpeed{10}, - m_randomGenerator{m_randomDevice()}, - m_normalDistribution{0.0, 1.0} -{ - m_fourierAmplitudes.resize(pow(m_surface->size(), 2)); - generateFourierAmplitudes(); -} - -void Sea::update() -{ - for (int y = 0; y < m_surface->size(); ++y) { - for (int x = 0; x < m_surface->size(); ++x) { - m_surface->at(x, y) - .setHeight(((double)std::rand()/(double)RAND_MAX)); - } - } -} - -double Sea::phillipsSpectrum(double k_x, double k_y) const -{ - const double k = sqrt(pow(k_x, 2) + pow(k_y, 2)); - const double L = pow(m_windSpeed, 2) / GRAVITATIONAL_CONSTANT; - - const double cosineFactor = pow((k_x / k) * m_windDirection[0] + - (k_y / k) * m_windDirection[1], 2); - - return PHILLIPS_CONSTANT * exp(-1 / pow(k * L, 2)) / pow(k, 4) * - cosineFactor; -} - -ComplexPair Sea::generateFourierAmplitude(double k_x, double k_y) -{ - std::complex cDist(m_normalDistribution(m_randomGenerator), - m_normalDistribution(m_randomGenerator)); - - return {cDist * sqrt(phillipsSpectrum(k_x, k_y)) / sqrt(2), - std::conj(cDist) * sqrt(phillipsSpectrum(-k_x, -k_y)) / sqrt(2)}; -} - -ComplexPair& Sea::fourierAmplitudeAt(int n, int m) -{ - return m_fourierAmplitudes.at - (n + m_surface->size()/2 + - (m + m_surface->size()/2) * m_surface->size()); -} - -double Sea::spatialFrequencyForIndex(int n) const -{ - return 2 * M_PI * n / m_surface->size(); -} - -void Sea::generateFourierAmplitudes() -{ - for (int m = -m_surface->size()/2; m < m_surface->size()/2; ++m) { - for (int n = -m_surface->size()/2; n < m_surface->size()/2; ++n) { - fourierAmplitudeAt(n, m) = - generateFourierAmplitude(spatialFrequencyForIndex(n), - spatialFrequencyForIndex(m)); - } - } -}