function [sig_out] = dechirping(sig_in, sig_ref)

% Objecrtive : Mixing the incoming signal, sig_in, with the reference
% signal, sig_ref. 

sig_ref = cast(sig_ref, class(sig_in));

sig_out = bsxfun(@times, conj(sig_ref), sig_in);

end