%0.01 percent PROBABLE RAIN RATE (MM/HR.)
R01=80;

%aR^b COEFFICIENTS, a,b?"
A=1;
B=1;

%SITE ALTITUDE (KM)
HS=0;

%LATITUDE (DEG)
LAT=20;

%SATELLITE ELEVATION ANGLE (deg)
ELD=10;

%PERCENT PROBABILITY THE CALCULATED ATTENUATION WILL BE EXCEEDED 
P=0.01;

EL=ELD*3.14159/180.0;
AS=A*R01^B;

if (LAT<=36) 
   H=4.0;
else
   H=4.0-0.075*(LAT-36.0);
end;

LS=(H-HS)/sin(EL);
L0=35.0*exp(-0.015*R01);
LE=LS/(1+LS*cos(EL)/L0);
A01=AS*LE;

AA=0.12*A01*(P^(-0.546-0.043*log(P)/log(10.0)));
Attenuation=AA