File: wavelet_transform.cpp

package info (click to toggle)
boost1.83 1.83.0-5
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 545,632 kB
  • sloc: cpp: 3,857,086; xml: 125,552; ansic: 34,414; python: 25,887; asm: 5,276; sh: 4,799; ada: 1,681; makefile: 1,629; perl: 1,212; pascal: 1,139; sql: 810; yacc: 478; ruby: 102; lisp: 24; csh: 6
file content (43 lines) | stat: -rw-r--r-- 1,201 bytes parent folder | download | duplicates (9)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
/*
 * Copyright Nick Thompson, 2020
 * Use, modification and distribution are subject to the
 * Boost Software License, Version 1.0. (See accompanying file
 * LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
 */
#include <cstdint>
#include <cmath>
#include <boost/math/quadrature/wavelet_transforms.hpp>


int main()
{
    using boost::math::quadrature::daubechies_wavelet_transform;
    double a = 1.3;
    auto f = [&a](double t) {
        if(t==0) {
            return double(0);
        }
        return std::sin(a/t);
    };

    auto Wf = daubechies_wavelet_transform<decltype(f), double, 8>(f);

    double s = 7;
    double t = 0;

    auto g = [&a](double t)->std::complex<double> {
        if (t==0) {
            return {0.0, 0.0};
        }
        return std::exp(std::complex<double>(0.0, a/t));
    };

    auto Wg = daubechies_wavelet_transform<decltype(g), double, 8>(g);
    std::cout << "W[f](s,t) = " << Wf(s,t) << "\n";
    std::cout << "W[g](s,t) = " << Wg(s, t) << "\n";
    std::cout << Wg(0.0, 3.5) << "\n";
    std::cout << Wf(0.0, 4.8) << "\n";
    std::cout << "W[f](-s,t) = " << Wf(-s, t) << "\n";
    std::cout << "W[g](-s,t) = " << Wg(-s, t) << "\n";

}