//Exa 6.6
clc;
clear;
close;
// given :
f_MHz=172 // frequency in MHz
c=3*10^8 // speed of light in m/s
lambda=c/f_MHz // wavelength in m
La=478/f_MHz // length of driven element in feet
Lr=492/f_MHz // length of reflector in feet
Ld=461.5/f_MHz // length of director in feet
S=142/f_MHz // element spacing in feet
disp(La,"length of driven element in feet:")
disp(Lr,"length of reflector in feet:")
disp(Ld,"length of director in feet:")
disp(S,"element spacing in feet:")