EDIT NRALG06S,ALGOL51S
(M.!*DELSTART.D.!*DELEND.D1)999
TR.RELEASE .I.VERSION 51.D.PDS.
A.DATED .D1
TM.FROM2.P1D1M.FN FROM2.P1D.%END.D1
T(R.FROM2.I.ASLIST.A.).I._S2.P1)99
TM.FROM3.P1D1M.FN FROM3.P1D.%END.D1
T(R.FROM3.I.ASLIST.A.).I._S3.P1)999
TM.FROM1(.P1D1M.FN FROM1.P1D.%END.D1
T(R.FROM1(.I.ASLIST(.A.).I._S1.P1)999
TM.REPLACE1(.P1D1M.INE REPLACE1(.P1D.%END.D1
T(R.REPLACE1(.I.ASLIST(.R.,.I.)_S1=(.P1)999
TM.REPLACE2(.P1D1M.INE REPLACE2(.P1D.%END.D1
T(R.REPLACE2(.I.ASLIST(.R.,.I.)_S2=(.P1)999
TM.REPLACE3(.P1D1M.INE REPLACE3(.P1D.%END.D1
T(R.REPLACE3(.I.ASLIST(.R.,.I.)_S3=(.P1)999
T(A.!QIN.I.;.)999
T(A.!QOUT.R1)999
E
PARM OPT,NOLIST
IMP ALGOL51S,ALGOL51X,.LP,.OUT
PERMIT ALGOL51S
PERMIT ALGOL51X