close all;
clear;

% Nastavenie a vykreslenie waveletov:
typ='db2';
iter=10;

[phi,psi,t]=wavefun(typ,iter);

figure('name','spojite: wavelet psi (modrou) a funkcia mierky phi (cervenou)');
hold on;
plot(t,phi,'red');
plot(t,psi,'blue');
pocet=length(t);
min=t(1);
max=t(pocet);
dlzka=max-min;

typ='db2';
[h_,g_,h,g]=wfilters(typ);

figure('name','diskretne: wavelet h(n) (modrou) a funkcia mierky g(n)(cervenou)');
hold on;
stem(h);
stem(g,'-.+r');


poceth=length(h);





