Description ROUTINE TABULATES THE "MUFS" USING A VECTORED FORMAT SCHEME PRINTS A "DASH" IF "MUFS" .LE. ONE AND THE VALUE OTHERWISE
Source file: outmuf.f
I/O Operations: Unit ID Unit No Access Form Operation LUO SEQ FMTD W Operation codes A=rewind,B=backspace,C=close,E=endfile I=inquire,O=open,R=read,W=write
External Functions and Subroutines Called SUBROUTINE OUTTOP
Local Variables (+ indicates altered content) CHARACTER*6 +IFMT(14), +IGMT, +ILMT, +NFMT(4) INTEGER +J, +JT, +K, +KOUNT REAL +XFMT(5)
Referenced Common Block Variables (+ indicates altered content) FILES INTEGER LUO ION INTEGER METHOD MUFS REAL ALLMUF(24) MUFS REAL ESMUF(24) MUFS REAL FOT(24), HPF(24) MUFS REAL XLUF(24) OUTLAB CHARACTER*5 LABEL(11) OUTPRT INTEGER +LINES TIME REAL UTIME(24) TIME REAL XLMT(24)