% The function calculates and displays continuous
% wavelet transforms for some simple functions

function wavelet_02
  
echo off, clc
clear all


t = [0:0.01:10.23];

f = sin(20.0 * t);

%f(1:512) = sin(20.0 * t(1:512));
%f(513:1024) = sin(100 * (513:1024));

%f(1:1024) = 0.0;
%f(156:356) = 1.0;

figure(1); plot(f);

awt = AWT(f);
figure(2); ImageCWT(abs(awt),'Overall','gray');

%f = sin(100.0 * t);
awt = AWT(f);
figure(3); ImageCWT(abs(awt),'Individual','gray');

