Description

hfarea.f

Source file:	hfciraf.f

I/O Operations:

Unit ID Unit No Access Form Operation * 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 NINT GENERIC ABS

External Functions and Subroutines Called

INTEGER LCOUNT SUBROUTINE CURMUF, ESIND, F2VAR, GEOM SUBROUTINE GEOTIM, IONSET, LUFFY, OUTCIRAF SUBROUTINE REDAILY, REDMAP, SANG, SETLUF SUBROUTINE SETOUT, TIMVAR, UNLINK, VIRTIM

Local Variables (+ indicates altered content)

INTEGER ERROR_CODE, +I, +IFREQ INTEGER +IPFG, +ITP, +IUR, +JT INTEGER +JTP, +METH, +NCH_RUN LOGICAL*1 +DOESIT

Referenced Common Block Variables (+ indicates altered content)

ALPHA CHARACTER*3 IMON(12) CCANCEL_BATCH INTEGER ICANCEL_BATCH CCIRAF REAL CIRAF_LAT(911) CCIRAF REAL CIRAF_LON(911) CCIRAF_TP INTEGER IDX_TP(911) CCIRAF_TP INTEGER NTP CDAILY INTEGER IDAILY(12) CDAY INTEGER +IDAY CONTRL INTEGER MONTHS(12) CONTRL INTEGER MSPEC CONTRL REAL SUNSP(12) CQUIET INTEGER IQUIET CRUN_DIRECTORY CHARACTER*50 RUN_DIRECTORY DON REAL GCDKM, +RLATD DON REAL +RLONGD, +SSN DON REAL TLATD, TLONGD FILES INTEGER LU5, LU6 FILES INTEGER +LUI, +LUO FRQ REAL +FREL(29) ION INTEGER IHRO, METHOD LPATH REAL GCDLNG MUFS REAL +ALLMUF(24) SSP INTEGER +MONTH TIME INTEGER IT, +JTX TON INTEGER +NF