function Hzp=matrizcanalzp(h,L,M); %es la misma funcion q matrizcanalZp xo cambiando el while por un if
%h es un vector con los coeficientes del canal
%la matriz Hzp tendra dimensiones PxP
P=L+M;
Q=length(h);
matriz=zeros(P);
for j=1:P
i=1;
for k=1:P
if i<=Q
if j==k
matriz(k,j)=h(i);
i=i+1;
elseif (k-j)==(i-1);
matriz(k,j)=h(i);
i=i+1;
end
end
end
end
Hzp=matriz;
e-REdING. Biblioteca de la Escuela Superior de Ingenieros de Sevilla.
