SUBROUTINE UPPLWR()
* Location: fpret1.f,538-554
* Commons: /OPTS/:R
END SUBROUTINE
CROSS REFERENCE FOR SUBROUTINE UPPLWR() - Primary File Only - [HELP] ---------------------------------------------------------------------------- Name Class Type Location(s) in fpret1.f ---------------------------------------------------------------------------- CASE, /OPTS/ VAR CH*1 539d 540T 541 543 545 INVERT() SUBR 546 LOWER() SUBR 544 UPPER() SUBR 542
To
SUBROUTINE UPPER()
C UPPERCASE THE INPUT LINE (ASCII ASSUMED)
* Location: fpret1.f,554-573
* Commons: /LINE/:SR
END SUBROUTINE
CROSS REFERENCE FOR SUBROUTINE UPPER() - Primary File Only - [HELP] ---------------------------------------------------------------------------- Name Class Type Location(s) in fpret1.f ---------------------------------------------------------------------------- I VAR int4 565t= 566 567 ICHAR() INTRN over 561 562 563 564 IN_LENGTH, /LINE/ VAR INT4 556d 558T 565 LINE(132) [eqv /LINE/LINEIN] ARRAY INT1 559T 560d 566 567= LINEIN, /LINE/ [eqv] VAR CH*132 556d 557T 560d 566e 567e=e [LINEOUT, /LINE/] VAR CH*132 556d 557T LOWA VAR INT1 559T 561= 566 567 LOWZ VAR INT1 559T 562= 566 [OUT_LENGTH, /LINE/] VAR INT4 556d 558T UPPA VAR INT1 559T 563= 567 UPPZ VAR INT1 559T 564= LOCAL NAMES SET, BUT NOT REF'D, IN SUBROUTINE UPPER() - Primary File Only - [HELP] ---------------------------------------------------------------------------- Name Class Type Location(s) Set in fpret1.f ---------------------------------------------------------------------------- UPPZ VAR INT1 564=
To