function rs_example
% (15, 9) reed-solomon
%input
m = 4; % Number of bits per symbol
n = 2^m-1; k = 9; % Word lengths for code
msg = gf([10 4 8 3 1 12 5 15 2],m); % Two rows of m-bit symbols
code = rsenc(msg,n,k)
err = gf([0 15 0 2 0 1 0 0 0 0 0 0 0 0 0], m);
rcv = code + err
dec = rsdec(rcv, n, k) 