符号を生成する多項式 g(x)

生成多項式=(1+x+(x^2)) (1+x+(x^4)) (1+x+(x^2)+(x^3)+(x^4))

情報ベクトル={1,1,0,0,0}

u[x]=Collect[
(情報ベクトル.Table[(x^((4-i))),{i,0,4}])(x^10)+
PolynomialMod[(情報ベクトル.Table[(x^((4-i))),{i,0,4}])(x^10),{生成多項式,関係式,2}],x]

マスク：101010000010010 をかける

マスク=x+(x^4)+(x^10)+(x^12)+(x^14)

PolynomialMod[u[x]+マスク,2]

形式情報=Table[Coefficient[PolynomialMod[u[x]+マスク,2],x,14-i],{i,0,14}]

解読[v_]:=Table[Mod[v+{1,0,1,0,1,0,0,0,0,0,1,0,0,1,0},2][[i]],{i,1,5}]

解読[{0,1,1,0,1,0,1,0,1,0,1,1,1,1,1}]

解読[{1,0,1,1,0,1,1,0,1,0,0,1,0,1,1}]