ANSI/FP,ANSI/-SP=ANSI,GETCHR,MTQIO,TYPBLK,CLSREN,OPNFIL,UCASE,RENAME
LB:[1,1]F77FCS/LB
/
MAXBUF=512
GBLDEF=.PRINT:177777
GBLDEF=RCI$:177777
GBLDEF=LCI$:177777
UNITS=4
ACTFIL=4
ASG=MT:1,SY:2:3,TI:4
GBLPAT=ANSI:$ACCPT:4
GBLPAT=ANSI:$TYPE:4
//