if strcmp(name_expr,'CP4B') & ch_el(1)==0,
  fprintf(' Antenna elevation is zero...  Changing to the correct value\n')
  ch_el =[30.0*ones(1,8)]
end
if strcmp(name_expr,'CP1H') & ch_el(1)<5,
  fprintf(' Antenna elevation is less than 5..Changing to the correct value\n')
  ch_el = [77.8*ones(1,8)]
end
