SUBROUTINE HARRIS ( JANT, FILEANT, MODE, IDX, ANTFILE, FS, FE, BEAM_MAIN, OFFAZIM )
Argument Definitions (+ indicates altered content)
CHARACTER*21       ANTFILE
CHARACTER*10       FILEANT
CHARACTER          MODE
INTEGER            IDX,        JANT
REAL               BEAM_MAIN,  FE,         FS,         OFFAZIM
Description
11/98 Greg Hand modifications for Harris 
 
Given an external antenna type xx (90-99), 
1. create a data file ANTTYPxx.DAT 
2. execute the program ../BIN_WIN/ANTTYPxx.EXE rundirectory mode 
   where: 
         rundirectory = ~/itshfbc/run (default installation) 
         mode = (blank) = point-to-point 
              = a = area coverage
Source file:harris.f
I/O Operations:
Unit ID  Unit No       Access  Form   Operation
               99         SEQ  FMTD         O W  
               99                         C      
      *                   SEQ  FMTD           W  
               22         SEQ  FMTD         OR   
               22         SEQ          A         
               22                         C      

Operation codes A=rewind,B=backspace,C=close,E=endfile
                I=inquire,O=open,R=read,W=write
External Functions and Subroutines Called
INTEGER            IT_EXIST,   LCOUNT
SUBROUTINE         ANTSAVE,    YIELDIT
Local Variables (+ indicates altered content)
CHARACTER         +ALF
CHARACTER*12      +DAT,       +EXE
CHARACTER*300     +PROGRAM
INTEGER           +IAZIM,     +IELEV,     +IEXE_EXIST
INTEGER           +NCH,       +NCH_RUN
REAL              +AREAGAIN(91),          +EFF,       +FREQ
Referenced Common Block Variables (+ indicates altered content)
CRUN_DIRECTORY     CHARACTER*50       RUN_DIRECTORY