function [w] = mat_prod_arrow(x,v,z,y) %prodotto matrice vettore per matrici a freccia n=length(x); w=zeros(n,1); w(1)=x(1)*y(1)+v'*y(2:n); for k=2:n w(k)=z(k-1)*y(1)+x(k)*y(k); end end