PRTINT,PRTINT/SH=PRTINT,[70,2]PASLIB
/
LIBR=SYSRES:RO
EXTSCT=......:4000
GBLDEF=HPSIZE:4000
EXTSCT=PAS$$:20000
STACK=32
//