!	REDFOR.COM
!
SET TT NOQUIET
R FORTRA
SRC:REDUCE=SRC:REDUCE/E
SRC:CRTSTY=SRC:CRTSTY/E
! SRC:SAVOP=SRC:SAVOP/E
! SRC:HDCHG=SRC:HDCHG/E
! SRC:READW=SRC:READW/E
! SRC:WRITW=SRC:WRITW/E
! SRC:CRTFIL=SRC:CRTFIL/E
^C