function D=dictionnaire(motif,N,M,r)

%            function D=dictionnaire(motif,N,M,r)
%
% Algorithme réalisant un dictionnaire de signaux normalisés (en terme
% d'énergie) et de longueur N (en ligne) à partir d'un motif (donné en
% colonne) de longueur M<N que l'on décale dans le temps de r en r. Les
% atomes du dictionnaire sont les lignes de la matrice D.  

I=1;
D=[];
motif=motif';
y=motif*(motif)';
motif=motif/sqrt(y);
while I+M-1<=N
   x=[zeros(1,I-1) motif zeros(1,N-M-I+1)];
   I=I+r;
   D=[D;x];
end; 