d1=322519174; % id of omer sassoni
d1=[ de2bi(d1) 0 0 0 ]; % id in binary + 000 to make it length of 32
d2=322213208; % id of ofek poraz
d2=[ de2bi(d2) 0 0 0 ]; % id in binary + 000 to make it length of 32
d = [ d1 d2 ]; % merge them
s = d; %
subplot(2,1,1);
stem(d);
d = 0.322519174 + 0.322213208; % this our id
for v = 0
h= [0.9 0.8 -0.7 -0.6 (d/10)];
x = s;
x = transmitter(x,v);
t = CyclicPrefix(x,v);
t = ova(t,h);
z = RemoveCyclicPrefix(t,v);
H = fft(h,64);
H=diag(H); % Create diagonal matrix
after = [];
for i = 1:10 % just for doing it for any symbol
z_i = z((64*(i-1)+1):64*i); % cut the symboles
Z = fft(z_i);
Z = transpose(Z); % doing the transponse
convolve_deleter = H'*Z;
after =[after QPSK_decoder(convolve_deleter)];
end
subplot(2,1,2)
stem(after - repmat(s,1,20))
end