MATLAB Listing

%Figure 6.13; ‘Mobile satellite communication; Principles and trends’ by M.Richharia;

%Orbital altitude versus satellite antenna diameter;

%See ‘Mobile satellite communications :Principles and Trends’ by MR for reference;

%Matlab source code written by AR/MR;

figure(‘color’,’white’);

hold;

height=1:1:40000;%orbital height;

CNodB=48;%C/No=48dB;

EIRPdB=-6;%dBW;

kdB=-228.6;%k=-228.6dB/K;

CNo=10^(CNodB/10);%Convert to number;

EIRP=10^(EIRPdB/10);

k=10^(kdB/10);

eta=0.5;

Ts=500; %Constant;

d=height.* sqrt(CNo*32/eta*k*Ts/EIRP)*1000;%satellite antenna diameter;

%CNo=Carrier to noise power spectral density;eta=antenna efficiency;k=Boltzman constant;Ts=System noise temperature;

%EIRP = Effective isotropically radiated power;

%Plot figure;

plot (height,d,’k’);

axis([0 12000 -inf 4.5]);%changed from 0 – 12000;

%legend;

xlabel(‘Orbital altitude (km)’);

ylabel(‘Satellite antenna diameter (m)’);

grid on;