SUBROUTINE SIGDIS ( )

Description
ADJUST SIGNAL DISTRIBUTION TABLES FOR THIS PATH AND SET ABSORPTION 
LOSS PARAMETERS
Source file:sigdis.f
I/O Operations:
Unit ID  Unit No       Access  Form   Operation
               99         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            IAND
REAL               ALOG10,     AMAX1,      AMIN1
GENERIC            ABS,        EXP,        MAX
External Functions and Subroutines Called
REAL               PRBMUF,     XLIN
SUBROUTINE         SYSSY
Local Variables (+ indicates altered content)
INTEGER           +IDP,       +K,         +KFXX
REAL              +AC,        +DUMMY,     +DUMMY1,    +DUMMY2
REAL              +ESLSM,     +F2LSM,      FMP,       +FTAB
REAL              +GLAV,      +PES,       +PF2,        SLP
REAL               SUP,       +XADJ,      +XFMP,      +XKF
REAL              +XSL,       +XSLP,      +XSU,       +XSUP
Referenced Common Block Variables (+ indicates altered content)
CON                REAL               R2D
CVERSN             CHARACTER*8        VERSN
DON                REAL               GCDKM
FRQ                INTEGER            JMODE
GEOG               REAL              +ABIY(5),  +ARTIC(5)
GEOG               REAL               CLCK(5)
INFORM             INTEGER            INFO
MUFS               REAL               YFOT(4),   YHPF(4)
MUFS               REAL               YMUF(4)
RON                INTEGER            KFX
RON                REAL               FI(3,5),   FVERT(30,5)
RON                REAL               GLAT(5),   HTRUE(30,5)
SIGD               REAL              +ACAV,     +AFE
SIGD               REAL              +AGLAT,    +ASM
SIGD               REAL              +BFE,      +DSL
SIGD               REAL              +DSU,      +FEAV
SIGD               REAL              +HNU,      +HTLOSS
SIGD               REAL              +XNUZ,     +XVE
TON                REAL              +ADJ,      +ADS
TON                REAL              +SL,       +SLS
TON                REAL              +SU,       +SUS