function c=koderCRC_15_7(i)
g=[1 0 0 0 1 0 1 1 1]; %redosled po predavanjima g(x)=1+x+x^4
i=[0 0 0 0 0 0 0 0 i]; %prosirenje informacione reci i(x)*x^(n-k)
             %u prva cetiri bita se smestaju redundantni biti kodne reci
             %u preostalih 11 bita su redom informacioni biti
G=fliplr(g); %redosled za matlab
I=fliplr(i);
[Q R]=deconv(I,G); %racuna se r(x) - redundantni biti
C=abs(rem(I+R,2)); %c(x) = i(x)*x^(n-k) + r(x)
                   %ubacuju se redundantni biti na prve tri lokacije kodne
                   %reci
c=fliplr(C);