rspolyadd.m

RS编码程序设计

%
%   File Name   :   RsPolyAdd.m
%   Abstract    :   GF(2^4)元素多项式加法
%                    
%   Version     :   1.0     2008-5-26
%*************************************************************************

function [PolySum] = RsPolyAdd(LPoly, RPoly)

MaxLength = max(length(LPoly), length(RPoly));

%to realize the sum operation of poly
if(length(LPoly) > length(RPoly))
    MaxLength = length(LPoly);
    RPoly = [RPoly zeros(1, MaxLength-length(RPoly))];
elseif(length(LPoly) < length(RPoly))
    MaxLength = length(RPoly);
    LPoly = [LPoly zeros(1, MaxLength-length(LPoly))];
else
    MaxLength = length(LPoly);
end;    

for ii = 1:MaxLength
    PolySum(ii) = RsSymbolAdd(LPoly(ii), RPoly(ii));
end;