%Compute and show the integral of a Morlet wavelet.

t=-3:0.01:3;
b=0;
a=0.3;

g=(1/(a)).*(exp(-(((t-b)/a).^2)/2).*(exp(i.*(5.5).*((t-b)/a))));
g1=real(g);

plot(t,g1,'b');
h=patch(t,g1,'r');
axis([-2.9 2.9 -4.1 4.1]);
set(h,'Edgecolor',[0 0 1]);
title('Zero-Integral');
xlabel('Morlet wavelet:(1/a)\psi((x-b)/a), with a=0.3 and b=0');
grid;



%"Complex and Chaotic Nonlinear Dynamics. 
% Advances in Economics and Finance, 
% Mathematics and Statistics" 
% T.Vialar, Springer 2009.
% Copyright(c)