% tx.m
% tx
disp('Transmitting')
read
data_in_pol = bin2pol(data_in); % Converts binary data to polar data
tx_chunk
% perform ifft to create time domain waveform representing data
td_sets = zeros(num_chunks,fft_size);
for i = 1:num_chunks
td_sets(i,1:fft_size) = real(ifft(spaced_chunks(i,1:fft_size)));
end
tx_dechunk