conv1.m

来自「华东理工大学自动化系《控制系统分析、设计和应用》教材配套程序实例,有关说明： 」· M 代码 · 共 14 行

function C=conv1(var)
% Convolution and multi-polynomials multiplication
% var are multi-polynomials 

% Copyright 2000-2001 ECUST. 
%   $Revision: 1.1 $  $Date: 2002/01/22 22:08:34 $

C=var{1};
for i=2:length(var)
    C=conv(C,var{i});
end;
% example 
% var={[1 2 3 1],[2 3 1],[1 2 1]}
% c=conv1(var)