clear all;
% amplitudes of 7 multipath arrivals
a=[0.6154 0.7919 0.9218 0.7382 0.1763 0.4057 0.9355];
% arrival times of 7 multipath arrivals
t=[0.9169 0.4103 0.8936 0.0579 0.3529 0.8132 0.0099];
i=0; % frequency index
for omega=0:0.05:100; % angular freuencies
multipath_arrival=a.*exp(j*omega*t);
i=i+1;
abs_H(i)=abs(sum(multipath_arrival)); % the i-th transfer function
end
omega=0:0.05:100;
plot(omega, abs_H)
ylabel('amplitude of transfer function')
xlabel('angular freuency')
title('frequency dependent multipath fading')