rssymbolrev.m

RS编码程序设计

%
%   File Name   :   RsSymbolRev.m
%   Abstract    :   GF(2^4)元素的求反
%                    
%   Version     :   1.0     2008-5-25
%*************************************************************************

function [Rev]=RsSymbolRev(Operand)

NumtoPower=[1,2,4,8,3,6,12,11,5,10,7,14,15,13,9];%create the table for searching

%operation
if(Operand==0)
     Rev=0;
else
    Rev = find(NumtoPower == Operand) - 1;
    Rev = NumtoPower(mod(-Rev, 15) + 1);%求反
    end;