function Ir=dekoder15_11(r)
R=r;
s1=rem(r(1)+r(3)+r(5)+r(7)+r(9)+r(11)+r(13)+r(15),2);
s2=rem(r(2)+r(3)+r(6)+r(7)+r(10)+r(11)+r(14)+r(15),2);
s3=rem(r(4)+r(5)+r(6)+r(7)+r(12)+r(13)+r(14)+r(15),2);
s4=rem(r(8)+r(9)+r(10)+r(11)+r(12)+r(13)+r(14)+r(15),2);

s=s1*2^0+s2*2^1+s3*2^2+s4*2^3;
if s~=0
    R(s)=rem(r(s)+1,2);
end
Ir=[R(3) R(5) R(6) R(7) R(9) R(10) R(11) R(12) R(13) R(14) R(15)];