function output = convenc(G,k,input)
t=12;
input = randint(1,t,[0,1])
k = 1;
G = [1 0 1 1 0 1 1 1 1;1 1 0 1 1 0 0 1 1;1 1 1 0 0 1 0 0 1];
L = size(G,2)/k
n = size(G,1)
a0 = reshape(G',1,[])
a=[a0,zeros(1,(t-1)*L)];
l = size(input,2)
for i=1:(t-1)
a1=[zeros(1,L*i),a0,zeros(1,(t-1)*L-L*i)];
a=[a;a1];
end
size(a)
output=rem(input*a,2)
m=0;
p=0;
for i=1:126
if output(1,i)==1
m=m+1;
else p=p+1;
end
end
disp(m)
disp(p)
clear;