SUBROUTINE OUTAREA ( IX, IY )
Argument Definitions (+ indicates altered content)
INTEGER            IX,         IY
Description
outarea.f 
 
 
   THIS ROUTINE OUTPUTS all variables for area coverage contour plott
Source file:outarea.f
I/O Operations:
Unit ID  Unit No       Access  Form   Operation
    LUO                   SEQ  FMTD           W  
      *                   SEQ  FMTD           W  

Operation codes A=rewind,B=backspace,C=close,E=endfile
                I=inquire,O=open,R=read,W=write
Intrinsic Functions Called
INTEGER            IABS,       NINT
External Functions and Subroutines Called
INTEGER            LCOUNT
REAL               XLIMIT6
SUBROUTINE         PROGRESS_LABEL,         PWRCUT,     SQUEEZ
SUBROUTINE         TXPWR
Local Variables (+ indicates altered content)
CHARACTER*10       ALFPWR
CHARACTER*6       +ALFS(24)
CHARACTER*12      +ANTBEAR
CHARACTER*3       +DAILY
CHARACTER*90      +LABEL
CHARACTER*5       +PATH
CHARACTER*4       +SLEW
INTEGER           +I,         +ISLEW,     +ITR,       +MAINBEAM
INTEGER           +NCH,       +NCHA,       NCHP
REAL              +ANGR,       POWER_CUT, +SNR50,     +SNR88
REAL              +SNR91,     +SNR_LW,    +SNR_UP,    +XLATD
REAL              +XLONGD
Referenced Equivalenced Variables (+ indicates altered content)

EQUIV              CHARACTER*6       +ALFS()     Local Var
                   CHARACTER*90      +LABEL      Local Var
Referenced Common Block Variables (+ indicates altered content)
ALPHA              CHARACTER*3        IMON(12)
ALPHA              CHARACTER*10       ITRAN(2)
ALPHA              CHARACTER*2        MODE(13),  MODER(13)
CANTENNA           CHARACTER*24       ANTFILE(20)
CANTENNA           CHARACTER*70       ANTNAME(20)
CANTENNA           REAL               BEAMMAIN(20)
CAREACH            CHARACTER          AREACH
CDAILY             INTEGER            IDAILY(12)
CGAINS             REAL               GAINR(13)
CGAINS             REAL               GAINT(13)
CHOURS             INTEGER            IHOURS(24)
CONTRL             INTEGER            JLONG,     MONTHS(12)
CONTRL             REAL               SUNSP(12)
CQUIET             INTEGER            IQUIET
CVERSN             CHARACTER*8        VERSN
DON                REAL               RLATD,     RLONGD
DON                REAL               TLATD,     TLONGD
DUDL_NOIS          REAL               DL_NOIS(13)
DUDL_NOIS          REAL               DU_NOIS(13)
FILES              INTEGER            LUO
FRQ                REAL               FREL(29)
ION                INTEGER            NPSL
PANTENNA           REAL               PWRKW(20)
SNCOM              REAL              +SNXX(13)
SON                INTEGER            NHP(13)
SON                REAL               ANGLE(13)
SON                REAL               ANGLER(13)
SON                REAL               CPROB(13)
SON                REAL               DBLOS(13)
SON                REAL               DBLOSL(13)
SON                REAL               DBLOSU(13)
SON                REAL              +DBU(13),  +DBW(13)
SON                REAL               DELAY(13)
SON                REAL               PROBMP(13)
SON                REAL              +RELIAB(13)
SON                REAL               RNEFF(13)
SON                REAL              +SNDB(13),  SNPR(13)
SON                REAL               SNRLW(13)
SON                REAL               SNRUP(13)
SON                REAL              +SPROB(13)
SON                REAL               VHIGH(13)
SON                REAL               XNYNOIS(13)
TON                INTEGER            NF

SUBROUTINE PROGRESS_LABEL ( LABEL )
Argument Definitions (+ indicates altered content)
CHARACTER*(*)      LABEL
Source file:outarea.f
Referenced Common Block Variables (+ indicates altered content)
CPROGRESS          CHARACTER*80      +ALF_LABEL
CPROGRESS          INTEGER            IAREA_BATCH