Argument Definitions (+ indicates altered content)

INTEGER +IPFLAG

Description

LONG AND SHORT PATH SYSTEM PERFORMANCE AND LUFS. IPFG FUNCTION ---- ----------------------------- 100 SHORT PATH SYSTEM PERFORMANCE 200 LONG PATH SYSTEM PERFORMANCE 300 SHORT PATH LUF 400 LONG PATH LUF

Source file:	luffy.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

CHARACTER CHAR INTEGER IAND, MAX0, MIN0 REAL ALOG10 GENERIC ABS

External Functions and Subroutines Called

REAL PWRDB SUBROUTINE ALLMODES, ALOSFV, ANOIS1, ESMOD SUBROUTINE ESREG, FDIST, FINDF, FOBBY SUBROUTINE FRQCOM, GENION, GENOIS, GMLOSS SUBROUTINE INMUF, LECDEN, LNGPAT, MPATH SUBROUTINE OUTALL, RELBIL, SELMOD, SELTXR SUBROUTINE SERPRB, SETLNG, SIGDIS

Local Variables (+ indicates altered content)

CHARACTER +ITF CHARACTER*3 +MFLG(3) CHARACTER +XMDL CHARACTER*2 +YMODE(13,2), +ZMODER(13) INTEGER +IDX, +IF, +IFLAG, +IFQN INTEGER +IFX, +IG, +IHMAX, +IHMIN INTEGER +IHMX, +IHOP, +IHSRT, +IHSTP INTEGER +IL, +ILI, +IMAP, +INHP(13,2) INTEGER +INMODE(13), +IP, +IPFG INTEGER +IS, +IXHP, +K, NUMMOD REAL +DELPOW, +DELX, +DISINT, +DL REAL +DU, +FHIGH, +FLOW, +FVAL REAL +HOP, +PLUF, +RCNSE, +RHIGH REAL +RLOW, +SLPLD, +SMOOTH, +SSPLD REAL +XDBU(13,2), +XPROBMP(13,2) REAL +XRELIAB(13,2), +XSNDB(13,2) REAL +XSNPR(13,2), +XSNRLW(13,2) REAL +XSNRUP(13,2), +XSPROB(13,2) REAL +YANGLE(13,2), +YCPROB(13,2) REAL +YDBLOS(13,2), +YDBLOSL(13,2) REAL +YDBLOSU(13,2), +YDBW(13,2) REAL +YDELAY(13,2), +YRGAIN(13,2) REAL +YTGAIN(13,2), +YVHIGH(13,2) REAL +ZANGLER(13), +ZDL(13), +ZDU(13)

Referenced Common Block Variables (+ indicates altered content)

ALLMODE INTEGER +NMMOD, +NMODE(20) ALLMODE REAL +B(20), +EFF(20) ALLMODE REAL +FLDST(20) ALLMODE REAL +HN(20), +HP(20) ALLMODE REAL +PROB(20), +RGAIN(20) ALLMODE REAL +SIGPOW(20) ALLMODE REAL +SN(20), +TGAIN(20) ALLMODE REAL +TIMED(20) ALLMODE REAL +TLHGH(20) ALLMODE REAL +TLLOW(20) ALLMODE REAL +TLOSS(20) ALPHA CHARACTER*3 IMON(12) ALPHA CHARACTER*10 ITRAN(2) ALPHA CHARACTER*2 +MODE(13), +MODER(13) CGAINS REAL +GAINR(13) CGAINS REAL +GAINT(13) CONTRL INTEGER +JLONG, MSPEC DON REAL GCD, GCDKM DON REAL RSN, SSN FRQ INTEGER +ITXRCP(2) FRQ INTEGER JMODE FRQ REAL +FREA(13), FREL(29) FRQ REAL +FREQ INFORM INTEGER IHLNG, IHSHR INFORM INTEGER INFO ION INTEGER LUFP, METHOD MODES REAL +GHOP MUFS INTEGER MODMUF, NHOPMF(4) MUFS REAL +XLUF(24), YMUF(4) OUTLAB CHARACTER*2 LAYTYP(5) OUTPRT INTEGER LINBOT(26) REFLX REAL DMAXKM(3) REFLX REAL DSKPKM(3) RON INTEGER KFX SNCOM REAL +SNXX(13) SON CHARACTER +MDL(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) SSP INTEGER MONTH TIME INTEGER IT TIME REAL GMT TON REAL +REL