Kdb=7;
%N=l00000;
r=rice_fading(Kdb,100000);
RdB=20*log10(r);
Rt=[min(RdB):max(RdB)];
for m=1:length(Rt)
fade=find(RdB<Rt(m));
Nm=length(fade);AF(m)=Nm/100000;
end
semilogy(Rt,AF,'k-o');
grid;