function d_demap=zfic_mccdma(r_blast,H_carrier,Tx_AntennaNmb,Rx_AntennaNmb,wordsize,N,S,Subsymb,sgma,K)

for i=1:N
    y{i}=zf_osic(r_blast(:,:,i),H_carrier{i},Tx_AntennaNmb,Rx_AntennaNmb,wordsize);  %這個(gè)函數(shù)在哪里
end
for j=1:Tx_AntennaNmb
     for i=1:N
     yr{j}(i,:)=y{i}(j,:);
 end
end
for j=1:Tx_AntennaNmb
      datadespread(j,:)=S'*yr{j};
      d_demap(j,:)=demap(Subsymb,wordsize,datadespread(j,:));
end