SUBROUTINE GMLOSS ( )

Description
THIS SUBROUTINE CALCULATES THE GAIN MINUS LOSS FUNCTION
Source file:gmloss.f
External Functions and Subroutines Called
SUBROUTINE         SETTXR
Local Variables (+ indicates altered content)
INTEGER           +IA,        +IM,        +JJ,        +K
Referenced Common Block Variables (+ indicates altered content)
DON                REAL               AMIND
FRQ                INTEGER            ITXRCP(2)
LOSX               INTEGER            IAFTXR(3)
LOSX               REAL               ADVX(45,3)
LOSX               REAL               ANDVX(45,3)
LOSX               REAL               TGAINX(45,3)
LPATH              REAL              +TXRGML(45,2)
REFLX              REAL               DELFX(45,3)
REFLX              REAL               HPFLX(45,3)
ZON                INTEGER           +NMODE(7)
ZON                REAL              +ABPS(7),  +ADV(7)
ZON                REAL              +B(7),     +CREL(7)
ZON                REAL              +EFF(7),   +FLDST(7)
ZON                REAL              +FSLOS(7), +GRLOS(7)
ZON                REAL              +HN(7),    +HP(7)
ZON                REAL              +OBF(7),   +PROB(7)
ZON                REAL              +RELY(7),  +RGAIN(7)
ZON                REAL              +SIGPOW(7)
ZON                REAL              +SN(7),    +SPRO(7)
ZON                REAL              +TGAIN(7), +TIMED(7)
ZON                REAL              +TLOSS(7)