addpoly.m

来自「基于ＭＡＴＬＡＢ的辅助设计 简述了矩阵分析的重要性」· M 代码 · 共 17 行

function re=addpoly(p1,p2)
% ADDPOLY add two polynomies which do not have the same lenght
%
%    Author: Ole Barup Sorensen, Rapid Data Ltd 
%             
%    Copyright (c) 1989-94 by Rapid Data Ltd
%    Revision 09:01  30/03/94


l1=length(p1);
l2=length(p2);
if l1>l2,
  p2=[zeros(1,l1-l2) p2];
else
  p1=[zeros(1,l2-l1) p1];
end
re=p1+p2;