SUBROUTINE GAINORM ( Z6, UMAX, VMAX, IPERF, IANT, IFS )

Argument Definitions (+ indicates altered content)
INTEGER            IANT,       IFS,        IPERF
REAL              +UMAX,      +VMAX,      +Z6
Description
     calculation of the gain normalizing factor 
 
      dimension w(90) 
 
pre-set angles of maximum radiation for simple cases 
in the vertical plane
Source file:gainorm.f
External Functions and Subroutines Called
SUBROUTINE         AZMAX,      GAINREL
Local Variables (+ indicates altered content)
INTEGER           +I
REAL              +RMAX,      +U,         +V,         +VM
REAL              +VMAX1,     +VMIN1,     +WMX,        Z9